以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  这段代码在 win7里运行正常,在win2008r2里就显示  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=64888)

--  作者:jinzhengbe
--  发布时间:2015/3/4 12:26:00
--  这段代码在 win7里运行正常,在win2008r2里就显示
.NET Framework 版本:2.0.50727.5420
Foxtable 版本:2014.10.23.1
错误所在事件:菜单,导入图片,Click
详细错误信息:
GDI+ 中发生一般性错误。

代码如下
MainTable = Tables("商品")
For Each File As String In FileSys.GetFiles("C:\\图片\\")
    Dim f As Io.FileInfo =  FileSys.GetFileInfo(File)
    Dim r As Row = Tables("商品").AddNew
    r("ppp") = f.name
    
    Dim d As String = Tables("商品").Current("bh1")
    Dim s As String = Tables("商品").Current("cn_name")
    
    
    Dim img As image = getImage(file)
    Dim bmp As new bitmap(img, 180, 180 * (img.height / img.width))
    bmp.save("f:\\web\\upfile1\\as1\\" & s & "s.jpeg")
    bmp.Dispose

FileSys.CopyFile(file, "f:\\web\\upfile1\\as\\" & s & ".jpeg",True )
Next

--  作者:有点甜
--  发布时间:2015/3/4 14:06:00
--  
 肯定是你的路径或者文件名有问题。
--  作者:jinzhengbe
--  发布时间:2015/3/4 15:09:00
--  
果然是老狐狸啊,解决了,非常非常感谢~~~