注册 登录
编程论坛 ASP技术论坛

高手看下我的这个程序那个地方有问题啊。

hzxygm 发布于 2009-07-26 08:37, 302 次点击
高手看下我的这个程序那个地方有问题啊。运行后提示Microsoft VBScript 运行时错误 错误 '800a0006'  溢出 G:\ZSW\MARKET\../inc/img_hh.asp,行 160
有高手会的请联系我QQ:32709983  谢谢

代码如下:

function get_wh(str,ww,hh)
    set  pp=new  imgInfo
    w = pp.imgW(server.mappath(str))  
    h = pp.imgH(server.mappath(str))
    bb = w/h
    bbb = ww/hh
    cc = ww/w
    ccc = hh/h
    if w <= ww and h <=hh then
        w=w
        h=h
    else
        if bb >= bbb then
            w = ww
            h = h*(cc)
        else
            h = hh
            w = w*(ccc)
        end if
    end if
    set pp = nothing    
    get_wh= "weight="&w&" height="&h&""
end function
1 回复
#2
yms1232009-07-26 15:05
可能是图片的宽度或高度计算有问题,数值太大溢出。
1