我想在WEB客户端进行数据库的查询,即执行数据库端的代码,查询服务器端的数据库,并把查询结果集返回到客户端并显示在客户端的MSHFlexGrid控件中,该如何做呢?我做了一次,在服务器端的按钮中写了数据库查询代码,当点击按钮后数据也显示在服务器端的MSHFlexGrid中了,可在客户端点击此按钮后在脚本诊断窗口中总是出现“This user is not associated with a trusted SQL Server Connection“也就是说,此用户和SQL之间不是一个可信任的连接,我如何设置SQL和wincc呢?我的服务器端代码为:
Sub Record_View
Dim strConnectionString
Dim objConnection
Dim objCommand
Dim strSQL
Dim Rs
Dim MSHFlexGrid
strConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=liubaojin77;Initial Catalog=SHUJUJILU;Data Source=COMPUTER3\WINCC"
strSQL = "select * from WeightValue"
Set objConnection = CreateObject("ADODB.Connection")
objConnection.ConnectionString = strConnectionString
objConnection.Open
Set objCommand = CreateObject("ADODB.Command")
With objCommand
objCommand.ActiveConnection = objConnection
objCommand.CommandText = strSQL
End With
Set Rs=CreateObject("ADODB.Recordset")
Rs.Open objCommand, , 1, 3
Set MSHFlexGrid=HMIRuntime.Screens("MainPicture").ScreenItems("MSHFlexGrid")
Set MSHFlexGrid.DataSource = Rs
MSHFlexGrid.Refresh
Rs.Close
objConnection.Close
Set objCommand = Nothing
Set Rs=Nothing
Set objConnection = Nothing
Set MSHFlexGrid=Nothing
End Sub
我想问题出在strConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=liubaojin77;Initial Catalog=SHUJUJILU;Data Source=COMPUTER3\WINCC"
并且WEB登陆的用户名和密码在服务器的SQL中不被信任,可我在服务器中的SQL 2005中设置了和WEB登陆相同的用户名和密码还是不行,我该如何修改程序和设置呢?请高手给予指教,在此感谢?