作者abliou (Art of Life)
看板Visual_Basic
标题Re: [VB6] data可以在执行阶段才指定DatabaseName吗？
时间Sun Jun 18 18:19:26 2006
下面就是我用来打开我的mdb档程式码....希望对你有帮助...
'==========================================================
Dim db As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim qs As New ADODB.Recordset
Provider = "provider = microsoft.jet.oledb.4.0"
Source = "data source = " & App.Path & "\db1.mdb"
db.Open Provider & ";" & Source
'版大讲的open方法在这...如果你的没有可能你的比较特殊吧....XD
rs.Open Text1.Text, db
qs.Open Text2.Text, db
temp = FreeFile
Open App.Path & "\hsa.txt" For Output As #temp
'使用前请先引入mdb需要的元件...物件的宣告也要记得做..
'============================================================
我只是初学者...因为工作需求所以全部自己看书...
如果有错的东西还请各位不吝指教....
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 218.166.142.67