pathfilename=trim(Request.ServerVariables("SCRIPT_NAME"))
for i=len(pathfilename) to 1 step -1
if mid(pathfilename,i,1)="/" then
filename=right(pathfilename,len(pathfilename)-i)
exit for
end if
next
注意:获取文件名:(不带路径)= filename。
你可以在asp里面用这一句话来获取Request.ServerVariables("SERVER_NAME")
为了更加直观,在asp文件里面写上这一条语句试试:
你所访问的域名是:<%=Request.ServerVariables("SERVER_NAME")%>
就会把你的域名直接显示出来。
大概看了下,步骤如下:1。先读取http://www.linkzj.cn/的首页内容到一个字符串变量中tempfile
2。循环分析字符串tempfile直至结束
3。具体分析,本例应分析类似下面的字符串:
change_bg(this.id,0,100,6,1,30,100,'铁塔','www.hebeifeixiang.com')
即查找"change_bg("这个字符串在整个字符串中的位置比如位置为n1,
再从n1开始查找字符串"')",比如位置n2,
然后提取子字符串tempstr,
不知道asp是否有直接将字符串以某个字符为分隔符存入数组,如果有,分割字符用"," 这样这个临时数组中第八个下标存的是 网站名称,第九个下标存的是网址链接。
如果不能直接存入数组,那么用字符串命令查找第7个,号,和第8个,号,具体处理时要相应加减''字符所占字符数
欢迎分享,转载请注明来源:夏雨云
评论列表(0条)