FormatRemoteUrl函数之asp实现格式化成当前网站完整的URL-将相对地址

2019-01-13 16:47:21王冬梅

        strUrl = Left(CurrentUrl, InStrRev(CurrentUrl, "/"))
        FormatRemoteUrl = strUrl & Replace(URL, "./", vbNullString)
        Exit Function
    End Function    

您可能感兴趣的文章:

如何批量替换相对地址为绝对地址(利用bat批处理实现)DefiniteUrl asp将相对地址转换为绝对地址的代码JavaScript将相对地址转换为绝对地址示例代码