老师,写了个远程填报系统,昨天起,有的地方能登录,有的地方不能,不清楚是什么原因,在beforeopenProject里写了一段
Dim s As String = "Provider=SQLOLEDB.1;Password=xxxxxx;Persist Security Info=True;User ID=xxxx;Initial Catalog=销售前台综合填报;Data Source=xxxx.xxx.xxx.xxx"
try
Dim conn As ADODB.Connection
conn = New ADODB.Connection
conn.ConnectionString = s
conn.Open
conn.close
Catch ex As Exception
MessageBox.Show("SQL数据库" & Err.Description & "请联系管理员!","提示",MessageBoxButtons.OK,MessageBoxIcon.Error)
e.Cancel = True
e.HideSplashForm = True
End try
现在上不去的地方,提示一般性网络错误,但网页可以上,紧急求助
[此贴子已经被作者于2016/5/17 11:56:43编辑过]