vb中如何设置adodc 的datasource为变量?
来源:百度知道 编辑:UC知道 时间:2024/08/31 02:02:39
vb中如何设置datasource为变量?
若数据库被改变路径,如何再让其连接上
我想搞个输入框,当报错时显示,将输入的值设置为adodc的source
有什么办法吗?最好将赋值语句也打上 谢了!
设置adodc的datasource为变量
若数据库被改变路径,如何再让其连接上
我想搞个输入框,当报错时显示,将输入的值设置为adodc的source
有什么办法吗?最好将赋值语句也打上 谢了!
设置adodc的datasource为变量
1、使用 Set 语句设置 DataSource,如下所示:
Set Text1.DataSource = ADODC1
2、当报错时显示,将输入的值设置为adodc的source
On Error GoTo prcERR: '捕捉错误,在函数或子程序开头
'代码
'……
Exit Sub
prcERR:
'错误处理,在函数结尾处
Text1.Text = Adodc1.RecordSource
Debug.Print Err.Number, Err.Description
用datagrid 连接access数据库时
Dim strs as string
Dim cn As New ADODB.Connection
If cn.State = 1 Then cn.Close
strs = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\text1.text" '数据库名
cn.Open strs
Adodc1.ConnectionString = strs
Adodc1.CommandType = adCmdUnknown
Adodc1.RecordSource = "select * from xx '数据库表名
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1 ' 数据来源