Set cnn = New ADODB.Connection
    cnn.ConnectionString = "Provider=SQLOLEDB.1;Password=;Persist Security Info=True;User ID=sa;Initial Catalog=IndustryDB;Data Source=Localhost"
    cnn.Open
    Set rs = New ADODB.Recordset
红色的错误 ，有谁知道是什么问题吗？在线等回复。

实时错误-2147467259 (80004005)
[DBNETLJB][connectionoen (connect()).]SQL Server 不存在或拒绝访问。
弹出这窗口的，我都不明白，是什么意思，求高手回复。

cnn.open()

按你这样改，出现编译错误：语法错误。
急急，能加我Q来，教下我吗？Q95569616