asp Server.urlencode使用
aspServer.urlencode对URL(带参数)进行编译,但打开时显示找不到网页,是不是在参数接收页面要进行对编码的反译?具体怎样做?谢谢!...
asp Server.urlencode对URL(带参数)进行编译,但打开时显示找不到网页,是不是在参数接收页面要进行对编码的反译?具体怎样做?谢谢!
展开
2013-09-17
展开全部
用这个试试吧!
function vencoded(venshop)
for i=1 to len(venshop)
if mid(venshop,i,1)<>chr(13) then
ven=asc(mid(venshop,i,1))+5
if ven>127 or ven<33 then
ven=ven-95
end if
vena=vena&chr(ven)
else
vena=vena&"+"
end if
next
vencoded=vena
end function
function vencode(venshop)
for i=1 to len(venshop)
if mid(venshop,i,1)<>"+" then
ven=asc(mid(venshop,i,1))-5
if ven>126 then
ven=ven-95
elseif ven<32 then
ven=ven+95
end if
vena=vena&chr(ven)
else
vena=vena&chr(13)
end if
next
vencode=vena
end function
解密:vencode(venshopcom)
加密:vencoded(venshopcom)
function vencoded(venshop)
for i=1 to len(venshop)
if mid(venshop,i,1)<>chr(13) then
ven=asc(mid(venshop,i,1))+5
if ven>127 or ven<33 then
ven=ven-95
end if
vena=vena&chr(ven)
else
vena=vena&"+"
end if
next
vencoded=vena
end function
function vencode(venshop)
for i=1 to len(venshop)
if mid(venshop,i,1)<>"+" then
ven=asc(mid(venshop,i,1))-5
if ven>126 then
ven=ven-95
elseif ven<32 then
ven=ven+95
end if
vena=vena&chr(ven)
else
vena=vena&chr(13)
end if
next
vencode=vena
end function
解密:vencode(venshopcom)
加密:vencoded(venshopcom)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询