手机可以浏览HTML文件,但一浏览ASP就报错?
whxxr 2005-02-22 05:43:14 在手机中输入http://222.134.11.111/asp/selasp.htm可以浏览到里面的内容,
HTML文件内容:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0041)http://localhost/asp/selasp.asp?kmbh=1002 -->
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.3790.0" name=GENERATOR></HEAD>
<BODY>银行存款yhck</BODY></HTML>
可是如果输入http://222.134.11.111/asp/selasp.asp?kmbh=1001后,报错,网页无法显示
ASP代码如下:
<%
function chinese2unicode(Str)
dim i
dim Str_one
dim Str_unicode
for i=1 to len(Str)
Str_one=Mid(Str,i,1)
Str_unicode=Str_unicode&chr(38)
Str_unicode=Str_unicode&chr(35)
Str_unicode=Str_unicode&chr(120)
Str_unicode=Str_unicode& Hex(ascw(Str_one))
Str_unicode=Str_unicode&chr(59)
next
Response.Write Str_unicode
end function
dim db,conn,connstr
db="j2meTest.mdb" '数据库路径,请真实填写
set Conn = server.CreateObject("ADODB.Connection")
connstr="provider=microsoft.jet.oledb.4.0;data source=" & server.MapPath(db)
conn.Open connstr
SQL="select kmmc,kmjc from kmzd where kmbh='" & request("kmbh") & "' order by kmbh"
set rs=conn.Execute(SQL)
chinese2unicode(rs.fields("kmmc"))
chinese2unicode(rs.fields("kmjc"))
%>