为啥这段代码运行不了
日期：2014-05-17 浏览次数：20742 次
为什么这段代码运行不了？
<%
If request.Form("soutext")!=Empty then
Response.Write request.Form("soutext")
end if
If Server.HTMLEncode(Request("reserch")!=Empty then
Response.Write Server.HtmlEncode(Request("reseach"))
end if
%>
------解决方案--------------------
<%
If request.Form("soutext")!=Empty then
Response.Write request.Form("soutext")
end if
If Server.HTMLEncode(Request("reserch")!=Empty then
Response.Write Server.HtmlEncode(Request("reseach"))
end if
%>
------解决方案--------------------
- VB.NET code
!=Empty '改為 is not null
------解决方案--------------------
- VB.NET code
'應是,寫習慣了
Not request.Form("soutext") Is Nothing
------解决方案--------------------
vbscript 中 不等于 是 <>
------解决方案--------------------
如果Request("reserch")=null是不能使用Server.HTMLEncode(),对于以上代码，我建议写成：- VB code
<%
dim soutext,reserch
soutext=trim(request.Form("soutext"))&""
reserch=trim(Request("reserch"))&""
'添加&""可避免值出现布尔、null类型
If soutext<>"" then
Response.Write soutext
end if
If reserch<>"" then
Response.Write Server.HtmlEncode(reserch)
end if
%>
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
