简单问题

learnall 2004-01-30 12:02:00
怎么取域名的值?
比如:在地址栏中输入 http://www.263.net/ 需要得到 www.263.net
如果更换成 http://www.263.com/ 这时得到 www.263.com 并且显示出来
这个怎么实现呀? 用vbscript
...全文
41 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
纪俊 2004-01-30
  • 打赏
  • 举报
回复
<%=request.serverVariables("Http_REFERER")%>
这就是你刚才的地址
xieyj 2004-01-30
  • 打赏
  • 举报
回复
str="http://www.263.net/"
str=mid(str, 7, instrrev(str, "/") - 7)
msgbox str
learnall 2004-01-30
  • 打赏
  • 举报
回复
谢谢大家! 可能是我没说明白,不过我自己写出来了
Private Sub Command1_Click()
Dim webadd, cut, getadd
webadd = "http://www.263.net/111/2223"
Label1.Caption = webadd
arynum = Split(webadd, "//")
cut = Right(arynum(1), Len(arynum(1)))
arynum2 = Split(cut, "/")
getadd = arynum2(0)
Label2.Caption = getadd
End Sub
TrueAndFalse 2004-01-30
  • 打赏
  • 举报
回复
<%=Request.ServerVariables("SERVER_NAME")%>
citybird888 2004-01-30
  • 打赏
  • 举报
回复
<%str=request.serverVariables("Http_REFERER")%>
learnall 2004-01-30
  • 打赏
  • 举报
回复
得到的地址不是固定的! 也可能是www.csdn.net
我需要当前的域名地址! 用vb来写

28,407

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧