gstrFileName = App.Path & "\serverConfig.txt"
    '  gstrFileName = "ftp://127.0.0.1/a/serverConfig.txt"
      这儿好像就有问题:因为App.Path是不是只能读取本地机的文件呀?我的意思是读取服务器端的文件,  就像 VB.net中的server.path,不知道在vb6中如何实现?改成ftp却提示找不到文件了。请教解决办法!
      

解决方案 »

  1.   

    App.Path 不是用来读取文件的。。
    看你怎样用这个字符串变量了,如果是 Open gstrFileName 是不行的。
      

  2.   

    具体使用方法如下:还请高手指教
    (准确的说是如何获得服务器的路径)
    gstrFileName = App.Path & "\serverConfig.txt"
        '  gstrFileName = "ftp://127.0.0.1/a/serverConfig.txt"
          这儿好像就有问题:因为App.Path是不是只能读取本地机的文件呀?我的意思是读取服务器端的文件,  就像 VB.net中的server.path,不知道在vb6中如何实现?改成ftp却提示找不到文件了。请教解决办法! 
    Dim FSys As New Scripting.FileSystemObject
     Set TStream = FSys.OpenTextFile(gstrFileName, ForReading) 
    dim server as string
    server = TStream.ReadLine