数据库连接提示错误

Question

实时错误'-2147467259(80004005)'
未指定的错误
我用VB连接数据库,怎么有这样的提示,我在原来的机器上没问题,换个电脑就有这样的提示,这是什么原因

Answer 1

acess数据库连接  source是bin/debug，需要添加引用adodb
Public Con As New ADODB.Connection
connectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=database\Project.mdb;"
Con.Open(connectionString)
If Con.State <> 1 Then
    Con.Close()
End If

Answer 2

将你的mdb文件和程序放在同一目录下，然后修改路径： "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Filename.mdb;"试试.

Answer 3

我是SQL,我用附加数据库的方法将数据库转移到另一抬电脑上,连接时候就提示这样的错误

Answer 4

我是将原电脑上的对应数据库的MDF和LOG文件拷贝到E:\Program Files\Microsoft SQL Server\MSSQL\Data,在在SQL中通过添加数据库的方法将数据库加到SQL.
conn = "Provider=SQLOLEDB.1;Persist Security Info=TRUE;User ID=sa;Password=123456;Initial Catalog=upsautodetecting;Data Source=(local)"
CONN.OPEN  调试时候还提示是这句话的问题

Answer 5

有可能是你换了一台机子，但这台机子上并没有设置SQL的连接，你只是把数据库复制过去了，没有在local建立服务器

Answer 6

用VB6只能连接ACCESS97,98
楼主可以用VB2008连ACCESS2003

Answer 7

好象是没写上要连接的数据库名称。
conn = "Provider=SQLOLEDB.1;Persist Security Info=TRUE;User ID=sa;Password=123456;Initial Catalog=upsautodetecting;Data Source=(local)；database=" & DatabaseName

Answer 8

upsautodetecting就是数据库名称呀

Answer 9

楼主用这句试试,  conn= "driver={SQL Server};server=" & IPAddress或hostname & ";UID=sa;PWD=123456;Database=upsautodetecting",已经测试了好多次了,应该没什么问题,祝你好运!

Answer 10

旧计算机的 SQL Server 备份数据库，新计算机的 SQL Server 恢复数据库。

Answer 11

谁说用VB6只能连接ACCESS97,98?
ACCESS2003、ACCESS2007,VB6照样可以连的。