新来此论坛感觉研究气氛和感觉都不错 ，不错刚来就发求助帖子确实不好意思，可确实不懂ASP
Function IsCHI(clChar)
Dim z
z = Hex(Asc(clChar))
IsCHI = (Len(z) = 4)
End Function
Function EnCode(clString)
Dim i
Dim x
Dim r
For i = 1 To Len(clString)
x = Mid(clString, i, 1)
If IsCHI(x) = True Then
r = r & Hex(Asc(x))
Else
If Hex(Asc(x)) = "D" Then
r = r & "O" & Hex(Asc(x)) & "DO"
ElseIf Hex(Asc(x)) = "A" Then
r = r
Else
r = r & "O" & Hex(Asc(x)) & "O"
End If
End If
Next
EnCode = r
r = ""
End Function
谁能帮忙翻译一下吗，看不懂ASP 翻译起来还真难
希望论坛有人能帮下忙
小弟在此谢过了
能不能帮帮忙啊，论坛有技术的人那么多帮下忙把
帮下忙吧，我没分了
其他语法都差不多或直接看得懂吧
&是字符串
<%if request.QueryString("start") <>"" then%>
<%if cint(start)>0 then%>
<a href="search.asp?q= <%=q%>&start= <%if request.Query ......
我原本是学jsp的可找了一个ASP的公司！我要重新学习！ 学习ASP！ 希望大家推荐一本好书给我谢谢
<ASP3.0高级编程> 网上有电子版的
发现网上asp信息时最多的 比其他的都多好多
yun
找本有应用事例的A ......
