[如何远程调用ACCESS数据库]使用了TCP/IP,ADO及XML(需要安装Microsoft XML 4.0。)。分服务器和客户端两部分,服务器可以多用户同时连接。远程连接access数据库有很多方法,我以前已经比较详细的回答过(见下面...+阅读
第一步:建立一个标准EXE工程,并且在菜单--工程加添一个类模块和一个计时器(DataEnvironment1,可以在部件--设计器里找到)
第二步:在工程----引用----找到microsoft activex date objects 2.5 library并且在其前面勾选
第三步:点中设计器DataEnvironment1右键"查看对象"会弹出其相关属性,connection1右键---属性
选中microsoft jet 4.0 ole db provider 继续“下一步(N)”,弹出“数据链接属性”选中“连接”选项卡,
指定下列设置以连接到access数据:
1.选择或输入数据库名称
路径:自己选择access数据的路径...
2.输入登录数据库的信息:
用户名称:常规下默认为:admin
密码:默认为空
最后测试连接
测试连接成功后,把它的数据源connectionsource的路径复制过来。这时可以开始编写连接访问数据的代码了
把代码写在类模块里,代码如下:
Option Explicit '全局强制声明变量Dim ADOLJ As Connection '定义一个连接对象的变量Dim strACCESS As String '定义一个字符串变量(你可以理解为把access数据库的路径放在变量中方便调用,让字符串变量帮我们记住路径。)Public Sub main()strACCESS = "把刚才复制的路径粘贴在这里即可"Set ADOLJ = New Connection '定义一个新的连接对象ADOLJ.Open strACCESS '用对象变量打开数据数据库(前面已提过了数据路径已经放在变量straccess中了)MsgBox "连接ACCESS 2003 成功", vbOKOnly, "提示"Form1.Show 1 '这里form1是主界面,可以理解为当正常连接到数据库的话那么就是显示主界面(具体是那个窗体作为主界面楼主可以自由选择)End Sub为了节省篇幅,还有比较详细的步骤(比如相关的截图)我已省略掉,如果楼主还不能明白的话,那么可以参考我相关的回答
最后切记要把sub main设为启动对象!
以下为关联文档:
VB6.0使用ADO对象连接数据库1. 定义连接对象 Global DBconnect As New ADODB.Connection 2. 执行连接语句 If DBconnect.State = adStateOpen And Not IsEmpty(adStateOpen) Then DBconnect.Close 连接OD...
VB怎么实现访问远程access数据库这是网络编程 远程要有客户端(或服务端)程序的,如果没有远程程序作支持,一般会被对方防火墙、安全策略、服务等设置情况阻挡(除非对方是特定服务器计算机)。 访问远程access数据库...
你好!请问vb6 0中怎样远程访问access数据库在工程里引用microsoft activex data objects 2.7 library Dim cn As New ADODB.Connection, rs1 As New ADODB.Recordset, sql As String '在通用声明里定义,其中cn是连接对...
初学VB请教VB60连接SQL数据库具体步骤Dim conn As New ADODB.Connection Dim rs(10) As New ADODB.Recordset db = App.Path & "\db\data.mdb" conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Pa...
教你如何解决access数据库连接错误步骤一:请检查conn.asp中的连接字符是否正确,如果没有错误,还提示数据库连接出错,往下看access数据库连接错误。 步骤二:把数据库下载到本地(默认数据库 database/#newasp.mdb),用AC...
DW怎样连接Access2010数据库dim conn,connstr,rs,sqldatabase = db4.mdb 数据库路径Set conn=server.createobject(ADODB.Connection) 新建数据库连接对象connstr=provider=Microsoft.Jet.OLEDB.4.0;Da...
Access数据库作业1. 内容 (1)选择自己感兴趣的有实际应用价值的题材。 (2)选择难度和规模合适的题材,以便按时、保证质量地完成系统设计。2. 课程设计指导 (1)熟悉选材业务当课程设计的题目选择后,首...
如何用VB代码创建mdb数据库Private Sub Command1_Click() CreateDatabase "c:\1.mdb" End Sub Public Sub CreateDatabase(ByVal sDatabaseFile As String) Dim cat Set cat = CreateObject("ADOX.Catalo...
如何用VB代码创建一个ACCESS的MDB文件Dim MyDB As Database, MyWS As WorkspaceDim AuTd As TableDef, TitTd As TableDef, PubTd As TableDefDim AuFids (2) As Field, TitFids (5) As Field, PubFids (10) As...