您正在使用IPV4(3.236.138.35)访问本站 您本次共访问本站 1 次
 用户名: 密 码: 验证码:     用QQ登录本站
首页 软件 编程 笑话 知识 公告 台风 日历 计算器
[公益]文明驾车我带头,文明行路我带头,礼貌让座我带头       悟空收录网      

【腾讯云】云服务器等爆品抢先购,低至4.2元/月      
[公益] 节省一分零钱 献出一份爱心 温暖世间真情      
2023年 元宵节 8
2023年 情人节 17
2024年 元 旦 338
2024年 春 节 378
 
您现在的位置:首页 >> ASP/ASP.net >> 内容
本类新增
本类热门文章
格式化远程图片地址为本地位置
内容摘要: '*****************************************************************'function(公有)'作用:格式化远程图片地址为本地位置'参数:imgurl(远程图片地址),imgfolder(本地图片目录),fristname(加入的前缀名称)'***************************......
'*****************************************************************

'function(公有)

'作用:格式化远程图片地址为本地位置

'参数:imgurl(远程图片地址),imgfolder(本地图片目录),fristname(加入的前缀名称)

'*****************************************************************

PublicFunctionFormatImgPath(byrefImgUrl,byrefImgFolder,byrefFristName,byrefnoimg)

strpath=""

ImgUrl=ImgUrl

ifinstr(ImgUrl,"Nophoto")orlenb(GetData(ImgUrl,0))<=0then

strpath=noimg

Response.Write""&strpath&""&vbcrlf

else

ifInstr(ImgUrl,".asp")then

strpath=FristName&"_"&Mid(ImgUrl,InStrRev(ImgUrl,"=")+1)&".jpg"

else

strpath=FristName&"_"&Mid(ImgUrl,InStrRev(ImgUrl,"/")+1)

endif

strpath=ImgFolder&"/"&strpath

strpath=Replace(strpath,"//","/")

ifleft(strpath,1)="/"thenstrpath=right(strpath,len(strpath)-1)

strpath=trim(strpath)

Response.Write""&strpath&""&vbcrlf

savedataImgUrl,strpath

endif

FormatImgPath=strpath

Endfunction

版权声明:本内容来源于网络,如有侵犯您的版权,请联系站长,本站收到您的信息后将及时处理。
上一篇:判断dll文件是否已经注册的ASP函数代 下一篇:取得远程数据
发布日期:2022/11/14
手机扫二维码直达本页
发布时间:18:37:34
点  击:9
录  入:齐天大圣
相关文章
Baidu

YiJiaCMS 6.3.5.220928(MSSQL) 闽ICP备05000814号-1
本空间由腾讯云(轻量应用服务器)提供,百度云加速提供加速防护
Copyright©2000-2023