Try:Dim sConn As String
sConn = "DBQ=" & "c:\yourmdb.mdb") & ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};Uid=;"
Conn.Open sConn
sConn = "DBQ=" & "c:\yourmdb.mdb") & ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};Uid=;"
Conn.Open sConn
解决方案 »
- WINSOCK发送8KB以上的图片,不行
- 急!为何split返回值一直为空!!
- 别人遇到的问题,我也遇到勒.谁能告诉我怎么回事???
- 100分诚寻广东省东莞市虎门附近的VB老师。
- VB中截取字符串用什么方法?
- 如何动态添加控件?
- 关于在picturebox里面画点连线?
- 添加硬件设备后,系统做了那些事情?
- 怎样将与ADODB连接的acess数据库里的数据在导入excel时进行分类汇总?
- VB有没有Sleep这样的延时 函数? 在线等待!谢谢
- 求救ado的书?《Visul Basic 开发指南-ADO篇》有谁读过?
- 他只会用几个简单的控件,连API是什么都不懂, 就说精通VB了我真是不知怎样说他!
sConn = "DBQ=" & "c:\yourmdb.mdb" & ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};Uid=;"
Conn.Open sConn
Connect = "dsn=pos;uid=username;pwd=;database=pos"
第二种:
Connect = "DRIVER=Microsoft Access Driver (*.mdb);" _
& "UID=admin;" _
& "UserCommitSync=YES;" _
& "Threads=3;" _
& "SafeTransactions=0;" _
& "PageTimeout=5;" _
& "MaxScanRows=8;" _
& "MaxBufferSize=2048;" _
& "FIL=MS Access;" _
& "DriverId=281;" _
& "DefaultDir=C:\Mis2000;" _
& "DBQ=C:\Mis2000\pos.mdb;"
con.open connect
cn.open "driver = {sql server};server=servername;uid=sa;pwd=;database=dbname"'if database is access then
cn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\WWQ\SEARCH\SEARCH.MDB;Persist Security Info=False"'if database is odbc source then
cn.open "Provider=MSDASQL.1;Persist Security Info=False;User ID=sa;Data Source=sqltest"'or
cn.open "User ID=sa;Data Source=sqltest"