ASP高手快来啊
[*][*]0 or InStr(sURL,"`")0 or InStr(sURL,"'")0 or InStr(sURL," ")0 or InStr(sURL," ")0 or InStr(sURL,"'")0 or InStr(sURL,chr(34))0 or InStr(sURL,"")0 or InStr(sURL,",")0 or InStr(sURL,"0 or InStr(sURL,">")0 then
[*]Response.Status= "404 no found"
[*]Response.End
[*]end if
[*]first_name=split(sURL,".")
[*]if ubound(first_name)>2 then
[*]Response.Status= "404 no found"
[*]Response.End
[*]end if
[*]user=first_name(0)
[*]seldomain=first_name(1)&"."&first_name(2)
[*]if user="reg" then Response.Redirect "http://xxx.cn/reg/index.asp"
[*]'这里的这个指向是你给这个程序设置的域名的路径
[*]geturl=False
[*]msg=Application("domain_info")
[*]msg=split(msg,"|")
[*]for i=lbound(msg) to ubound(msg)-1 step 5
[*]if msg(i)=seldomain then
[*]geturl=True
[*]ad=msg(i+1)
[*]height=msg(i+2)
[*]width=msg(i+3)
[*]adurl=msg(i+4)
[*]exit for
[*]end if复制代码访问提示：
Microsoft VBScript 运行时错误 错误 '800a0009'
下标越界: ''
/index.asp，行 41
什么问题呢？球高手解答。。。
553993 发表于 2013-9-27 14:18
同样是空白
第30行后面插入下面两行，看一下输出结果：
Response.write sURL
Response.end 没人知道吗 不会 本帖最后由 奔跑的油条 于 2013-9-27 12:53 编辑
41行的，first_name(2)数组越界
造成此错误的原因：
35行first_name=split(sURL,".") 分割出来的数组下标没有2，也就是当前sURL中的"."号只有1个。
解决方法有两种：
1.41行前插入一行，输入如下代码：on error resume next
2.35行前插入一行，输入如下代码：sURL=sURL & "."
唉，回答一个问题，分都没有。
奔跑的油条 发表于 2013-9-27 12:52
41行的，first_name(2)数组越界
加了on error resume next后访问显示空白。又是什么问题呢？
553993 发表于 2013-9-27 13:33
加了on error resume next后访问显示空白。又是什么问题呢？
如果不能忽略错误，请使用第二种方法
奔跑的油条 发表于 2013-9-27 13:50
如果不能忽略错误，请使用第二种方法
同样是空白
奔跑的油条 发表于 2013-9-27 14:21
第30行后面插入下面两行，看一下输出结果：
Response.write sURL
现在是显示域名在页面上。而不是跳转到指定页面。
553993 发表于 2013-9-27 14:34
现在是显示域名在页面上。而不是跳转到指定页面。
你不能把输出内容贴出来的？
奔跑的油条 发表于 2013-9-27 14:41
你不能把输出内容贴出来的？
我整个程序传上去你看看。就是index.asp这个文件
地址http://pan.baidu.com/s/1FZ2T8
页:
[1]