为何从数据库中选出的汉字是乱码?
wzh 2000-07-28 11:16:00 我在global.ass文件中写如下代码:
<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
' 跳过任何错误
On Error Resume Next
Application.Lock
' 创建应用程序级的ADO数据库连接对象
Set DBConn = Server.CreateObject("ADODB.Connection")
DBDSN="DRIVER={SQL Server};"
DBDSN=DBDSN & "Server=DATASERVER;" & "DataBase=TEST;"
DBDSN=DBDSN& "uid=sa;" & "pwd="
DBERPConn.Open DBDSN
Set Application("DBConn") = DBConn
Application.Unlock
End Sub
Sub Application_OnEnd
' 跳过任何错误
On Error Resume Next
Application.Lock
' 删除应用程序级的ADO数据库连接对象
Set DBConn = Application("DBConn")
DBConn.Close
Set Application("DBConn") = Nothing
Application.UnLock
End Sub
Sub Session_OnStart
End Sub
Sub Session_OnEnd
End Sub
</SCRIPT>
打开记录用如下代码:
<%
Application.Lock
set Conn = Application("DBConn")
sqlstring="........"
set rs=conn.execute(sqlstring)
Application.unlock
%>
如此选出的数据,其汉字部分为乱码。
请各位朋友不吝赐教,多谢!