请教一个关于VB的问题
我用VB做学生成绩管理系统，为什么在一开始设计代码时我想把数据库引入到VB里，但我输完代码后报错我输的代码是Public ADOcn As Connection
Public Sub Main()
Dim strsql As String
strsql = "provider=SQLOLEDB;server=localhost;database=成绩;UID=mytext;PWD=1234"
If ADOcn Is Nothing Then
Set ADOcn = New Connection
ADOcn.Open strsql
End If
strMain.Show
End Sub
运行后提示
实时错误 ’-2147467259(80004005)’;
[DENEBLIB][connectionopen (connect())/]SQL server不存在或拒绝访问
这段话是什么意思，请高手解答
