vb6.0 如何连接SQLSERVER2000？

来源：百度知道 编辑：UC知道 时间：2024/06/04 16:49:17
各位兄长我问一下，VB6.0怎么连接SQLSERVER2000啊，我编ASP编习惯了，

能否像ASP一样加个头文件就连上去了。

麻烦大家告诉我详细的连接方法，最好有详细的代码。
呵呵 一楼的兄弟 麻烦您给我发个完整点的VB程序来 比如说我的数据库叫YW 里面有张表叫A，现在我要向表中插条记录（INSERT语句内容就不用写了）

我对VB结构不了解，所以不知道头文件放在哪里？所以还是看完整的程序比较好，麻烦你了！

俺 是一楼的。
你的E_Mail是什么，我发给你一个我作的小程序。
今天快要下班了，你在百度里给我发消息吧。我上网就发给你。
＝－－－－－－－
发给你了。
－－－－－－－－－－－－－－－－－－－
工程－引用
Microsoft ActiveX Data Objects 2....（选一个高版本的）

Set conn = New ADODB.Connection
connStr = "Driver={SQL Server};DataBase=test;Server=(local);UID=sa;PWD=123"
conn.Open connStr
Set rs = New ADODB.Recordset

sql = "select * from ask_info"
rs.Open sql, conn, 1

用法和ASP一样的。
－－－－－－－－－－－－－－－－－－－－－－－－－

Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
conn.ConnectionString = "Driver={sql server};server=ZHONGDING;database=aa"
conn.ConnectionTimeout = 30
conn.Open
Adodc1.RecordSource = "加药机"
Adodc1.Recordset.AddNew '新加一条记录
'编辑字段值
Adodc1.Recordset("系统时间") = Trim(Now)
Adodc1.Recordset("加药时间") = Tr