《图片如何实现自动横向和竖向显示.doc》由会员分享，可在线阅读，更多相关《图片如何实现自动横向和竖向显示.doc（3页珍藏版）》请在金锄头文库上搜索。
1、求助图片如何实现自动横向和竖向显示？(已解决)有些照片是竖向的，即宽度比高度小，1.2版缺省的是横向显示，系统定义图片大小为120x90、240x180等尺寸，因此，竖向的图片就被压扁了，很难看。在skin.asp文件中有下面这段代码控制图片的显示：function pic_url(pvar,pt)dim temp1,pic_varpic_var=pvarif pic_var= thenpic_var=joekoe_cms.web_upload&no_pic.gifelseif instr(pic_var,:/)1 thenpic_var=joekoe_cms.web_upload&pic_v
2、arend ifend ifselect case int(pt)case 1temp1=case 2temp1=case 3temp1=case 4 temp1=case 5 temp1=case 6 temp1=case 7 temp1=case 8temp1=case 9 temp1=case 10 temp1=case elsetemp1=pic_varend selectpic_url=temp1end function其中的pic_w和pic_h就是系统预先定义好的，如果能判断出要显示的图片的长和宽，将两个值交换一下就可以了，那位能告知取得要显示的图片的长和宽数值的vb代码如何写？
3、自己实现了！方法：在skin.asp文件的最后加入（一定要在最后！）： function pic_wsize(obj) img=new Image(); img.src=obj.src; return img.width; function pic_hsize(obj) img=new Image(); img.src=obj.src; return img.height; 然后将pic_url的函数修改如下：function pic_url(pvar,pt)dim temp1,pic_varpic_var=pvarif pic_var= thenpic_var=joekoe_cms.web_
4、upload&no_pic.gifelseif instr(pic_var,:/)1 thenpic_var=joekoe_cms.web_upload&pic_varend ifend ifselect case int(pt)case 1 temp1=img border=0 src= & pic_var & onload=javascript:if (pic_wsize(this)case 2 temp1=img border=0 src= & pic_var & onload=javascript:if (pic_wsize(this)case 3temp1=case 4 temp1=
5、img border=0 src= & pic_var & onload=javascript:if (pic_wsize(this)case 5 temp1=img border=0 src= & pic_var & onload=javascript:if (pic_wsize(this)case 6 temp1=case 7 temp1=case 8 temp1=img border=0 src= & pic_var & onload=javascript:if (pic_wsize(this)case 9 temp1=case 10 temp1=img border=0 src= & pic_var & onload=javascript:if (pic_wsize(this)case elsetemp1=pic_varend selectpic_url=temp1end function
