这段ASP代码有什么问题?

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="Connections/conn.asp" -->
<%
Dim Recordset1__mmcolparam
Recordset1__mmcolparam = "1"
If (session("mm_username") <> "") Then
Recordset1__mmcolparam = session("mm_username")
End If
%>
<%
Dim Recordset1__mmcolparam2
Recordset1__mmcolparam2 = "1"
If (session("mm_username") <> "") Then
Recordset1__mmcolparam2 = session("mm_username")
End If
%>
<%
Dim Recordset1
Dim Recordset1_cmd
Dim Recordset1_numRows

Set Recordset1_cmd = Server.CreateObject ("ADODB.Command")
Recordset1_cmd.ActiveConnection = MM_conn_STRING
Recordset1_cmd.CommandText = "select * from chat where name=? or toname=? or toname='all'"
Recordset1_cmd.Prepared = true