ASP javascript 转asp vbscript,谁能把下面的代码转换下

asp javascript代码:<a href=reply.asp?<%= Server.HTMLEncode(MM_keepNone) + ((MM_keepNone!="")?"&":"") + "id=" + rs1.Fields.Item("id").Value %>>回复</a>这个该怎么转换?
2026年09月24日 15:27
有2个网友回答
网友(1):

如果你要转换很多这样的问号表达式,最好写一个函数
<%
Function Iif(exp, tv, fv)
If exp Then Iif = tv Else Iif = fv
End Function
%>
"", "&", "") & "id=" & rs1.Fields.Item("id").Value %>>回复

网友(2):

<%
dim aaa
if MM_keepNone<>"" then
aaa=Server.HTMLEncode(MM_keepNone)&"&"
else
aaa=""
end if
%>
" >文字
你看看行不行