应该用最后一个函数
不必用Server.HtmlEncode

最好用函数，因代码会有局限性，如中文与英文就有点区别，直接代码输出以后修改麻烦。用函数，以后有变化，只需改函数就可以。

www.5d.cn/bbs/newsdetail.asp?id=1346146&posts=current
www.lemongtree.net/bbs/newsdetail.asp?id=675735&posts=

size=1][/size][font=楷体_GB2312][/font]我在做一个显示数据的ASP网页时遇到这样的问题：
[/color]txl.asp:
<%@ LANGUAGE="javascript" CODEPAGE="936"%>
<!--#include file="Connections/conn.asp" -->
<%
var Recordset1 = Server.CreateObject("ADODB.Recordset";
[color=Red]Recordset1.ActiveConnection = MM_conn_STRING;
Recordset1.Source = "SELECT * FROM student ORDER BY no ASC ";
Recordset1.CursorType = 0;
Recordset1.CursorLocation = 2;
Recordset1.LockType = 1;
Recordset1.Open();
var Recordset1_numRows = 0;
%>

conn.asp：
<%
// FileName="Connection_ado_conn_string.htm"
// Type="ADO"
// DesigntimeType="ADO"
// HTTP="true"
// Catalog=""
// Schema=""
var MM_conn_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/mysite/database/txl.mdb"
%>

在运行中，出现了（红色）那里错误！
错误类型：
ADODB.Recordset (0x800A0BB9)
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
/mysite/txl.asp, 第 5 行

那应该怎样改！

Sub PutToShopBag( Prodid, ProductList )
If Len(ProductList) = 0 Then
ProductList = "'" & Prodid & "'"
ElseIf InStr( ProductList, Prodid ) <= 0 Then
ProductList = ProductList & ", '" & Prodid & "'"
End If
End Sub

请教版主这段代码的含义和作业

请问如何使页面上的单选框被点击之后向asp页面传送一个变量
就象本论坛的分页 点击“转到 。。。页“那个单选框会自动跳到相应的页面

连接数据库可以按以下的步骤
set conn =server.createObject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("/newgn/dadabase/cnbruce.mdb")