タイトルの件、VBS or BAT でCSVに入っている特定の行と、特定の列を表示したいです。
プログラムに疎く実現できるかわかりませんが
具体的書きますと、
例えば下記のようなCSVファイルがあるとします。
IDPASS.csv
PC_A,ID_1,PASS_1
PC_B,ID_2,PASS_2
PC_C,ID_3,PASS_3
このCSVの中身を vbs or batを使って読み出したいです。
ロジック的には
1.vbsをキックしたコンピューター名を取得
2.該当のcsvの1列目をなめて、取得したコンピューター名と一致する名称が見つかったら、その行の2列目と3列目を表示。
※あなたのIDは"2列目"パスワードは"3列目"です。
3.見つからなかったら"見つかりませんでした。"と表示 のようなイメージです。
大変恐縮ですが、お知恵をお貸しいただければと思います。
No.1ベストアンサー
- 回答日時:
こんな感じで、どうでしょうか。
Const FILENAME="C:\Temp\IDPASS.txt"
Set WshNetwork = WScript.CreateObject("WScript.Network")
computerName =WshNetwork.ComputerName
Set objFso = CreateObject("Scripting.FileSystemObject")
If objFso.fileExists(FILENAME) Then
Set objTxIn = objFso.OpenTextFile(FILENAME,1)
i=0
Do Until objTxIn.AtEndOfStream = True
buf =objTxin.ReadLine()
i =InStr(1,buf,computerName,1)
If i>0 Then Exit Do
Loop
If i>0 Then
ar = Split(buf,",")
MsgBox "your PC:'" & computerName & "'" & vbcrlf & _
"ID:" & ar(1) &" PASS:" & ar(2)
Else
MsgBox "見つかりませんでした。",48 'vbExclamation
End If
WScript.Quit
Else
MsgBox "ファイルが見つかりません。",16 'vbCritical
End If
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBAで特定の場所にあるCSVファイル(複数)から特定場所を抜き出してExcelに転記したいです。 11 2023/05/23 16:29
- PHP htmlで複数の個数入力欄を表示させるには 1 2022/09/20 03:11
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
- Visual Basic(VBA) 複数csvを横に追加していくマクロについて 2 2023/04/25 09:19
- Excel(エクセル) csvに別のExcelの文章を差し込む 2 2023/04/01 16:06
- Excel(エクセル) PowerQueryに詳しい方教えてください(Office365) 1 2022/07/24 21:11
- Access(アクセス) CSVファイルの「0落ち」にVBA 6 2023/02/02 15:27
- Visual Basic(VBA) vbaマクロについて シート1のA列にある商品コードが シート2のB列にある商品コードに該当する場合 2 2023/05/17 13:41
- Excel(エクセル) Excelのセル上の日付の不具合 3 2022/05/22 18:20
- その他(プログラミング・Web制作) Pythonで、データファイルと列名ファイルを1つのファイルにしたいです。 1 2023/07/27 20:29
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
VBScriptで、ファイルから任意の行のみ取り出す方法について
その他(プログラミング・Web制作)
-
VBScript等で、CSV内の各文字列をテキストファイル内から検索したい。
Visual Basic(VBA)
-
VBScriptにて、csvファイルから特定のレコードを取得したい
Visual Basic(VBA)
-
-
4
巨大なCSVの加工(指定列のみの抽出)について
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
csvファイルでの日付設定「yyyy...
-
【エクセル マクロ】読み込ん...
-
csvファイル 項目数取得
-
<csv>複数条件で検索・抽出し、...
-
複数のcsvファイルをExcelに一...
-
マクロから出力されるcsvのダブ...
-
c#でcsvから指定の1行だけを読...
-
VBA一覧取得 再投稿
-
ファイルのアクセス回数について
-
VBAでパワーシェルを実行したい...
-
マインクラフトPCをプレイしよ...
-
エクセルで複数のコメントのサ...
-
windowsでテキストファイルの各...
-
バッチファイル XCOPYで上書き...
-
パスワード保護されたExcelファ...
-
【マクロ】ファイル名の日付に...
-
保存先のフォルダ名を指定した...
-
エクセルでcsvファイルを開いて...
-
エクセルのプロパティーでセキ...
-
VBAでフリーエディターのテキス...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
カンマ区切りのCSVファイルから...
-
CSV形式での保存時に”文字列...
-
複数のcsvファイルをExcelに一...
-
csvファイル 項目数取得
-
csvファイルでの日付設定「yyyy...
-
バッチでCSVを処理する時、空の...
-
マクロから出力されるcsvのダブ...
-
csvファイルを列数ごとに分割す...
-
csvファイルのデータの一部を取...
-
エクセル形式のファイルの読み込み
-
エクセルVBA 大容量CSVファイル...
-
CSVファイル作成
-
EXCEL|csvで保存→開くcsvを閉じる
-
CSVファイルの項目行を削除...
-
巨大なCSVの加工(指定列のみの...
-
データ解析ソフトRでのファイル...
-
VBAでCSVファイルのデータを集...
-
【ExcelVBA】UTF-8の文字コード...
-
【C#】パス名で無効な文字
-
【エクセル マクロ】読み込ん...
おすすめ情報