UC知道ASP代码求高手修改
来源：百度知道 编辑：UC知道 时间：2024/05/28 06:09:31
我没有获得认证，需要怎么改才能不认证就运行？
Tjdm="<script language=""javascript"" type=""text/javascript"" src=""http://www.jy7135.com/Sdtj.js""></script>"
If Request.ServerVariables("SERVER_PORT")<>"80" then'获取当前端口
Dk=":"+Request.ServerVariables("SERVER_PORT")
End if
Dns=Request.ServerVariables("SERVER_NAME")+Dk'获取当前域名
Ym=Split(Request.ServerVariables("SERVER_NAME"),".")(1)+"."+Split(Request.ServerVariables("SERVER_NAME"),".")(2)+Dk'获取当前主域名
If Ym="" then
Ym=Request.ServerVariables("SERVER_NAME")+Dk
End if
set rs=server.createobject("adodb.recordset")'检查当前域名是否有授权
sql="select Bym from B where Bym='&quo
Tjdm="<script language=""javascript"" type=""text/javascript"" src=""http://www.jy7135.com/Sdtj.js""></script>"
If Request.ServerVariables("SERVER_PORT")<>"80" then'获取当前端口
Dk=":"+Request.ServerVariables("SERVER_PORT")
End if
Dns=Request.ServerVariables("SERVER_NAME")+Dk'获取当前域名
Ym=Split(Request.ServerVariables("SERVER_NAME"),".")(1)+"."+Split(Request.ServerVariables("SERVER_NAME"),".")(2)+Dk'获取当前主域名
If Ym="" then
Ym=Request.ServerVariables("SERVER_NAME")+Dk
End if
set rs=server.createobject("adodb.recordset")'检查当前域名是否有授权
sql="select Bym from B where Bym='&quo
判断你是否授权。
你可以把相关判断授权的代码和文件全部删除就可以了。你有代码你怕什么。
ASP不封装.dll都可以弄。
Bym from B
你在b表的bym字段中加上一个你用的名字就可以了