asp delphi 高手请帮忙
新来此论坛感觉研究气氛和感觉都不错 ，不错刚来就发求助帖子确实不好意思，可确实不懂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 翻译起来还真难
希望论坛有人能帮下忙
小弟在此谢过了
能不能帮帮忙啊，论坛有技术的人那么多帮下忙把
帮下忙吧，我没分了
其他语法都差不多或直接看得懂吧
&是字符串
相关问答：
<%On Error Resume Next
Set conn=Server.CreateObject("ADODB.Connection")
conn.begintrans
conn.Open ("Driver={SQL Server};server=(local);uid=sa;database=student;pwd=")
......
文件：folder.inc
HTML code:
<%
Dim folderini,pos,pageName
fPath = Request.ServerVariables("PATH_TRANSLATED")
pos = instrRev(fPath,"\")
folderini = Left(fPath,pos)+&qu ......
请各位高手帮解决,急!!!
<script language="JavaScript" type="text/javascript">
function CheckInput(){
if (document.frm.loginname.length =0){
alert('请正 ......
如题，如何实现？刷新后提交数据。
刷新一行？什么一行。。。
太笼统了。。。
如果是要页面部分刷新的话
去g.cn搜一下“ajax局部刷新”
就是刷新一个 <tr> </tr>里面的内容。用javascript� ......
