wxsh.net
当前位置:首页>>关于vb6.0怎么连接局域网内另一台电脑上的ACCESS数据库?的资料>>

vb6.0怎么连接局域网内另一台电脑上的ACCESS数据库?

conn.Open "provider=microsoft.jet.oledb.4.0;Jet OLEDB:Database password=05392755220;data source=" & "\\局域网另一台计算机名\数据库所在路径" & "\ku.mdb"

'在工程---部件中添加 microsoft ADO data contcrol 6.0 '在窗体添加两个adodc控件,分别连接好数据库和所需导入导出的表 'adodc1连接要导入的表,adodc2连接要导出的表 Private Sub Command1_Click() Dim i, j As Integer Adodc2.Refresh If Ad...

ACCESS 的连接字符: constr= "Driver={Microsoft Access Driver (*.mdb)};Dbq=c:\aaa.mdb;Uid=admin;Pwd=;" ' Pwd后面填写密码即可连接

在工程里找到部件 在部件里找到Microsoft ADO Control 6.0,勾上,点应用,工具拦上出现一个拉练样的控件为止。把ADO拖放到窗体上,VISIBLE属性设置成不可见。再拖放一个按钮,一个文本框,连接语句这么写: Private Sub Command1_Click() Adodc1...

一、新建一个"数据工程" 二、确定你的数据库是否存在。 三、以下代码 Private Sub Command1_Click() Dim conn As New ADODB.Connection conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\My Documents\数据检索二\mydate.mdb;Persis...

具体做法: 新建工程时选数据工程,此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件。 然后在FORM1窗体中添加ADODC控件和DATAGRID控件,将DATAGRID1的属性DATASOURCE选ADODC1,打开ADODC1控件属性页使用连接字符串,选生成,...

在工程里引用microsoft activex data objects 2.7 library Dim cn As New ADODB.Connection, rs1 As New ADODB.Recordset, sql As String '在通用声明里定义,其中cn是连接对象,rs1是记录集,sql是查询语句 Private Sub Form_Load() cn.Open "p...

s首先确认下是使用adodb还是adodc连接数据库。 网上的例子都不是通用的,你要看懂其中的代码,理解了之后才能写出自己的。

用ADOdb的方式去连接 Dim cn As adodb.Connection Set cn = New adodb.Connection cn.Open "driver={microsoft access driver (*.mdb)};uid=;pwd=;dbq=D:\任务集合\access问题\库存.mdb", False if cn.state = adOpenState then '这里是一些对数...

Private Sub Command1_Click() Dim xlapp As Variant Dim xlBook As Variant Dim xlSheet As Variant Dim sum As Long Set xlapp = CreateObject("excel.application") Set xlBook = xlapp.Workbooks.Open(App.Path & "\data\报表.xlt") '打开EX...

网站首页 | 网站地图
All rights reserved Powered by www.wxsh.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com