寻程序员菜鸟问题~关于URL加端口~多谢~【地下城与勇士吧】

地下城与勇士吧关注：14,006,859贴子：482,785,616

2回复贴，共1页

寻程序员菜鸟问题~关于URL加端口~多谢~

我是高
无形之影
8

Function FileUrl(url,D)
     Dim PageUrl,PUrl
     PageUrl="http://"& Request.ServerVariables("SERVER_NAME")
     PUrl=Left(Request.ServerVariables("URL"),InStrRev(Request.ServerVariables("Url"),"/"))
     PageUrl=PageUrl & Purl & Mid(D,2,Len(D)) & "/" & url
     FileUrl=PageUrl
怎么加801端口?

送TA礼物

IP属地:辽宁