您的位置：程序门 -> vb -> 数据库（包含打印，安装，报表)

关于有dao连接sql 2000数据库

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

关于有dao连接sql 2000数据库

发表于：2008-02-11 21:15:48 楼主

哪位高手帮我看看以下代码哪里有错误?
我的计算机名是computer,数据库名是htgl,scbm是htgl下的表名,设置odbc的dsn为myserver
private workspace as workspace
private database as database
private recordset as recordset

private sub form_load（)
dim sql as string
set workspace = createworkspace（"", "admin", "", dbusejet)
set database = workspace.opendatabase（"computer", false, false, "odbc;dsn=myserver;uid=sa;pwd=;database=htgl")
sql = "select * from scbm"
set recordset = database.openrecordset（sql, dbopendynaset, dbseechanges)
end sub

发表于：2008-02-12 00:35:251楼得分:0

用ado來處理吧，連接字符串是
provider=sqloledb.1;persist security info=true;user id=sa;initial catalog=htgl;data source=myserver

发表于：2008-02-12 13:25:482楼得分:0

但我想知道dao是怎样通过odbc立即sql server的

其他资讯