我在程序里需要保存很多图片,直接存到sql server 里又太麻烦,而且客户不能自己弄,
我想在服务器该程序的根目录建个文件夹PIC,在这里面放图片,只在sqlserver里存图片名就行了。
可是,我在客户端怎么调用这个文件夹的图片呢?
在程序里应该怎么写呢?
在本地机要这样写:Image1.Picture = LoadPicture(app.path & "/ddd.bmp")要是调用服务器上的应该怎么写呢?

解决方案 »

  1.   


    Me.Picture1.Picture = LoadPicture("\\88.128.10.7\d$\gcsj\music\vb6_sc\VSS\241.jpg")
      

  2.   

    '工程-》引用-》Microsoft Scripting RuntimeDim fso As New FileSystemObject
    '有一个 CopyFolder功能-->  复制文件夹
    FileSystemObject.CopyFolder "c:\mydocuments\letters\*", "c:\tempfolder\"
      

  3.   

    楼上这个是本地的,楼主的意思恐怕是用ftp 的copy这个也不难或者是做成个网页模式用webbrowser去看,这样的话是最简单的,无论哪种方法如果觉得我的建议好的会给我发短消息问我
      

  4.   

    要是把在程序启动的时候,把图片都加载到ImageList里,这样不就即不用老是去连服务器,又不用考文件了吗?嘿嘿,好主意,请高手指点!!
      

  5.   

    Me.Picture1.Picture = LoadPicture("\\88.128.10.7\d$\gcsj\music\vb6_sc\VSS\241.jpg")上面这种写法可以,可是,我用app.path 得到的是 d:\.....,如何改成d$\......??
      

  6.   

    文件夹共享后  路径就是  \\88.128.1.15\共享名\文件名      app.path 是取得你应用程序的当前路径呀?在客户端呀  你要从服务器取图片文件你会不知道服务器名或IP吗?
      

  7.   

    直接存到sql server 里又太麻烦,而且客户不能自己弄
    ------------------
    其实也不是很麻烦。 客户自已也可以弄呀。写一个图片保存的功能不就行了吗?也可保存图片路径嘛。