Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


19769 / 76732 ←次へ | 前へ→

【62389】サーバーからの読み込み
質問  亜矢  - 09/7/16(木) 11:24 -

引用なし
パスワード
   よろしくお願いします。
今までは下記のプログラムの通り自分のパソコン内でデータを処理していましたが、mypathの部分はネットワーク(サーバー)に変わりました
mypathを"\\・・・以下のサーバーのPathにしましたが、
データが読めませんでした。解決方法を教えて頂きたいと思います。
また、参照設定は何を参照設定にすればいいのかも教えて頂きたいと
思います。
 

Sub データ読み込み()
Dim MyFso As Scripting.FileSystemObject
Dim myTxt As Scripting.TextStream
Dim Mat() As String
Dim mystr As String
Dim mypath As String
Dim myfilename As String
Dim myFF

Erase MMat
XX = 0
mypath = "C:\Users\aya\SEIBAN\"
myfilename = Dir(mypath, 0)
Do While Len(myfilename) > 0
  myFF = mypath & myfilename
  myfilename = Dir()


Set MyFso = CreateObject("scripting.filesystemobject")
Set myTxt = MyFso.OpenTextFile(Filename:=myFF, IOMode:=ForReading)
 途中省略

Loop
end sub
909 hits

【62389】サーバーからの読み込み 亜矢 09/7/16(木) 11:24 質問
【62390】Re:サーバーからの読み込み kanabun 09/7/16(木) 11:52 発言
【62399】Re:サーバーからの読み込み 亜矢 09/7/16(木) 17:01 お礼
【62391】Re:サーバーからの読み込み ワイルドキャッツ 09/7/16(木) 12:31 発言
【62392】Re:サーバーからの読み込み ワイルドキャッツ 09/7/16(木) 12:36 発言
【62393】Re:サーバーからの読み込み kanabun 09/7/16(木) 13:02 発言
【62394】Re:サーバーからの読み込み ワイルドキャッツ 09/7/16(木) 13:24 発言

19769 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free