要使用ADO控件,首先当然要添加控件了,在菜单“项目”-“组件”
中选中“Microsoft ADO Data Control 6.0 (SP6) (OLEDB)”,将其添加到控件面板中,相应的控件文件是:MSADODC.OCX
Dim sql
sql = "相应的操作数据库的sql语句"
With Adodc1
.ConnectionString = "Data Source=数据库服务IP地址;Initial Catalog=数据库名称;User Id=数据库用户名;Password=数据库密码;"
.CommandType = adCmdText
.RecordSource = sql
.Refresh
end with