asp中传递URL参数字符型转换为长整型

<%
id=trim(request("id"))

set rs=server.createobject("ADODB.recordset")
sql="select * from msg where ID=" & CLng(id)
rs.open sql,conn,1,3
if not rs.eof then
do while not (rs.eof or rs.bof)
rs.Delete
rs.movenext
loop
end if
rs.close
set rs=nothing
conn.Close
set conn = nothing
Response.Write("删除成功")
%>

先用trim 去点传递参数的空格