問題タブ [filesystemobject]

For Each objFile in objFolder.Filesシステムがこの行でメモリにどれだけ格納するか、およびのようなものを使用して反復することobjFile.Files.Countがより有益であるかどうかはわかりません。次のコードを使用すると、重大なパフォーマンスの問題が発生するかどうかを誰かが知っていますか？

ファイルサイズなどのファイル情報にアクセスする必要があります。

ActiveXObjectを作成できます。

ActiveXObject fileSystem = new ActiveXObject（ "Scripting.FileSystemObject"）;

しかし、今、FileSystemObjectのメソッドにアクセスするにはどうすればよいですか？

ありがとう！

作成しているvba関数でfilesystemobjectを使用するのに問題があります。エラーが発生し続けます：ランタイムエラー424オブジェクトが必要です

私はオンラインでたくさんのものを見つけましたが、どれもうまくいきませんでした。はい、参照をチェックしました。MicrosoftScriptingRuntimeがチェックされています。これがコードの抜粋です。私が間違っていることを教えてください。とりわけ、最初の行をNewFileSystemObjectとしてDimobjFSOに変更しようとしましたが、同じエラーが発生します。エラーは2行目に発生します。

次の方法でバイナリ ファイルを作成しました (可能なすべてのバイト値がバイナリ ファイルに含まれるようにするため)。

そして私はこのようにそれを読みました（それが機能することをテストするため）：

IE の JavaScript では、次のファイルを使用すると、ファイルのコピー (読み取り、書き込み) が正常に機能しますFileSystemObject。

出力されたバイナリファイルを読み込むと、00000000,00000001,00000010... などとなります。

しかし、それをjavascriptに読み込もうとすると、読み取りに失敗するようです:

その結果、test の配列には多数の 0 が含まれ、他のゼロ以外の項目がいくつかありますが、ほとんどは 0 です。

誰かがなぜそれが一方では機能し、他方では機能しないのか説明できますか? 値をJavaScriptに取得するにはどうすればよいですか?

ところで、これはクライアント マシンからのファイルの読み取りに関連する読み取りです。

理由はわかりませんが、次のコードが不明なエラーをスローし始めています。マクロが実行されると、Excelは応答を停止します。

• このエラーが発生するのはなぜですか？
• 同じ機能を持つ代替ルートは何ですか？

このコードは、Windows7マシンのExcel2010xlsmファイル内にあります。

わかりました-より少ないファイルを移動しようとするように経路を変更しました-そしてそれは躊躇しますが、最終的には実行されます。指定されたディレクトリにファイルが多すぎるため、上記が失敗しているのではないかと思います。現在753個のファイルがあります-多分多すぎますか？

RonDeBruinは、ロジックをテストまたは変更する方法について多くのアイデアを与えてくれました。1つの可能性は、最初に宛先フォルダーでDeleteFolderを使用し、次にターゲットフォルダーでCopyFolderを使用することです。

特定のディレクトリ内の現在のフォルダーとサブフォルダーに関する情報を取得するスクリプトがあります。それはうまく機能しますが、私は奇妙な問題に出くわしました:

従うべきことは他にもありますが、私の問題は、path not foundその関数を呼び出すときに を取得することです。

フォルダーは C:\ ドライブにありません。これは問題にはなりません。私はこれと同じスクリプトを実行しましたが、foldername = D:\folder\differentsubfolder完全に機能するものを変更しました。しかし、それを別のフォルダーに戻すと、パスが見つからないというエラーが表示されます。

また、set FSO = CreatObject("Scripting.FileSytemObject") 以下のすべてを IF ステートメント内に配置しようとしました。

IF FSO.FolderExists(フォルダ名) その後 ....

これはその IF ステートメントに入力されるため、VBS がそれを認識していると思われますが、それでもエラーが発生しline 17 (datafolder = oF.Size/1073741824)ます。

変数フォルダー名が配置されている完全なフォルダーパスを入力しようとしました（引用符で囲まれています）。

他のディレクトリを指しているvbsを実行しようとしましたが、100％実行されます。その特定のフォルダーだけです。フォルダ名にスペースはありません。私が見逃しているものは他にありますか？D:\ への完全な管理者アクセス権があります

Excel 2003を使用していますが、マクロに次のコードがあります。

これを実行すると、

「ランタイムエラー：5」

OpenTextFileでの無効なプロシージャ呼び出しまたは引数

これは本当に簡単に思えます (私は何百万回も実行しましたが、問題はありませんでした)。

Excel スプレッドシートのコンテンツに基づいて SQL スクリプトを作成したいと考えています。これを行うために、以下のコードを使用してテキスト ファイルを読み取るマクロを作成しました。

これは、テキスト ファイルを開いて追加し、新しい値をプラグインすることになっています。

残念ながら、それは常に追加ではなく上書きであり、それは私を夢中にさせています.

何か案は？

VBScript で、複数のフォルダー/ファイルの objFSO や objFolder のような "Scripting.FileSystemObjects" を管理するにはどうすればよいですか?

「メイン」コード セクションで、「Scripting.FileSystemObject」のインスタンス (グローバル) を宣言します。

次に、次のようないくつかの操作を実行します。

次に、ループでフォルダーを取得し、それを関数に渡します。

これまでのところ、すべてが明らかです...

ここで、関数内で次のようなことを行います:
a) objFolder からファイル名を収集する

b）他の（無関係な）パスにファイルが存在するかどうかを確認します

c) さまざまなファイルのサイズを取得します。

d) 各種ファイルの削除

e) 読み取り用にファイルを開く

f) 書き込み用にファイルを開く

g）さまざまなオブジェクトを渡す他のサブ/関数を呼び出す

h）（同じ）関数を再帰的に呼び出して、他のフォルダーを処理します

私の懸念は、フォルダー パス、開いているファイルなどの FileSystemObjects のさまざまな使用法が、後で FileSystemObjects を使用することによって「ステップオン」されないようにする必要があることです。

質問 1: 「メイン」と各 (または一部の) サブ/関数に対して「Scripting.FileSystemObject」(objFSO) の個別のインスタンスが必要ですか (または推奨されますか) ?

質問 2: 同様に、他のさまざまなオブジェクトを管理して、データが失われないようにするにはどうすればよいですか?

ケビン

あるケースでは Exception from HRESULT: 0x800A0046 (CTL_E_PERMISSIONDENIED)、vb.net のファイル システム オブジェクトを使用してファイルを作成し、データを書き込もうとしているときに発生しました。

この問題を解決するにはどうすればよいですか、親切なアドバイスをお願いします。