连接字符串以及需要安装的程序等等....
解决方案 »
- unknown software exception 错误
- ADO设置连接的字符集
- VB的Write语句具体用法,可以自定义格式么
- 请问,用ASP+VB的DLL控件写一个来电显示的程序?
- 紧急求救,关于返回一个结果集,给分100
- 100分求如何拷贝一个隐藏的控件内容为一个图像?(在线等待)
- 使用tabstrip控件的问题!
- 如何使同一个控件在两个窗体内都有效?
- 关于FIND查找相同记录问题
- 怎样在程序中实现mshflexgrid的滚动条自动滚动!
- 调用DLL时候出现Bad Dll calling convention错误,为什么?代码如下
- 请问谁有访问tif图片的控件?或者把tif转换为其他格式的方法?
Private Sub Command1_Click()
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
conn.Open "Driver=MySQL ODBC 3.51 Driver;" & _
"Server=LocalHost;" & _
"Port=3306;" & _
"Database=test;" & _
"Uid=;" & _
"Pwd="
conn.DefaultDatabase = "mysql"conn.CursorLocation = adUseClient
rs.Open "select * from user", conn
Set DataGrid1.DataSource = rsDataGrid1.Columns(0).Caption = "主机"
DataGrid1.Columns(1).Caption = "用户名"End Sub