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



谁帮我看下这段数据库连接代码的问题,急,对了,马上给分!


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


谁帮我看下这段数据库连接代码的问题,急,对了,马上给分!
发表于：2007-02-01 16:00:09 楼主
access数据库bbs1.mdb   密码:1111
set   conn1=server.createobject（ "adodb.connection ")
conn1.open   "provider=microsoft.jet.oledb.4.0;data       source= "       &       app.path       & "\bbs1.mdb;persist       security       info=false;jet       oledb:database       password=1111 "

运行时提示:microsoft   vbscript   运行时错误   （0x800a01a8)
缺少对象:   'app '
这是怎么回事?
或者谁能提供一段代码?对了马上给分!

发表于：2007-02-01 16:25:091楼 得分:0
先引用ado类
        dim   cnn   as   adodb.connection
        set   cnn   =   new   adodb.connection
        cnn.provider   =   "microsoft.jet.oledb.4.0 "
        cnn.connectionstring   =   "data   source= "   &   app.path   &   "\db\db.mdb "
        cnn.open
        密码自己加
发表于：2007-02-01 16:36:032楼 得分:0
www.connectionstrings.com
发表于：2007-02-01 17:23:123楼 得分:0
你好,sxwz2007
不用密码的我很早就连通了,关键是数据加了密码的连接代码不会!
能把完整代码写出来吗?谢谢
dim   cnn   as   adodb.connection
        set   cnn   =   new   adodb.connection
        cnn.provider   =   "microsoft.jet.oledb.4.0 "
        cnn.connectionstring   =   "data   source= "   &   app.path   &   "\db\db.mdb ";jet       oledb:database       password=1111 "
        cnn.open
这样可不可以?
发表于：2007-02-01 17:41:104楼 得分:0
vbscript环境里没有app这个东西？我不太清楚，你把   app.path   换成绝对路径试试看。
发表于：2007-02-01 17:44:305楼 得分:0
"provider=microsoft.jet.oledb.4.0;data   source=c:\mydatabase.mdb;jet   oledb:database   password=mydbpassword; "

你密码后面加标点符号了么

发表于：2007-02-02 06:43:486楼 得分:0
好像不用绝对路径   直接用   .   来代替当前工作路径   .\db\db.mdb

相关文章
其他资讯

快速检索
分类导航标签a

最新资讯
热门点击