你知道ADO控件和DATA控件有沖突嗎?試一試下面的例子:
DimdbAsDatabase
DimrsAsRecordset
Setdb=OpenDatabase("d:stockyline.mdb")
Setrs=db.OpenRecordset("selectcount(*)astotalcountfromylinewhere條件")***
MsgBox(rs(0))
rs.Close
db.Close
Setrs=Nothing
Setdb=Nothing
‘注明,這個例子在一般情況下運行正常
只有當一個FROM中已有ADO控件,你運行上面的例子
程序就會在***處的語句中出現實時錯誤'13',類型不匹配的錯誤
這就是ADO控件和DATA控件的沖突,如果你想共存的話,下面的對你就有用了。
1.如果你是新建一個程序
當你新建一個程序時,在FROM中要先添加DATA控件,再添加ADO控件,OK一切正常
2.如果你已有一個程序,還想添加一個FROM(其中包括DATA控件)
解決方法是:1.新建FORM,建一個DATA控件,輸入你要輸入的代碼,保存文件
2.添加文件,把你原來的工程文件添加進來
3.改變工程屬性,把啟動對象設置為你原來的工程
注意事項:ADO控件在DATA控件前面加入=“錯誤”
ADO控件在DATA控件後面加入=“正確”->