• 締切済み

vbsにてショートカットが存在するか確認するほうほう。

vbsにてファイルが存在すればメッセージを表示する。というプログラムを作成しました。 しかし、そこのファイルがあるかという条件にショートカットがあるかどうかというのを加えたいのですが、fileexistsではうまくいきません。。。どうしたらいいのでしょうか？

みんなの回答

  • taka_tetsu
  • ベストアンサー率65% (1020/1553)
回答No.1

拡張子はつけましたか？ショートカットのファイルの拡張子は .lnk です。 そうではなく、とあるファイルに対するショートカットが存在するかどうかを調査したいということですか？

jazzstar
質問者

お礼

lnkつけたらできました！初歩的な質問ですいませんでした。ありがとうございました！

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. その他（プログラミング・開発）

関連するQ&A

  • vbsにてファイルが存在すればメッセージを表示する。というプログラムを作成したいです。

    vbsにてファイルが存在すればメッセージを表示する。というプログラムを作成したいのですが 普通にexistsを使ってプログラムを作ったのですが たとえばif文このファイルがあれば～ という分岐の次にまたこのファイルがあれば～という分岐をして４つくらいのファイルがすべて存在すればあるメッセージを表示する。というプログラムを作成したいのですが・・・つまりelseと逆にtrueなら次の分岐・・・という風に作成したいのです。どうかよろしくお願いします。

  • VBSをショートカットから編集

    VBSやBAT等のファイルをショートカットからテキストエディタ編集したいです。 現在 ・ダブルクリックから開く既定のプログラムはWSH実行されるようになっている(変更したくない) ・極力外部アプリケーションは使いたくないのでテキストエディタで編集したい という状態です。 毎回わざわざ右クリックから編集を選択して編集画面を開いているのですが、 キーボードショートカットのみで開きたいです。 (「Shiht+F10→E」等ではなく、「Ctrl+？」の様にワンステップで行えるものを探してます) もし上記不可能であれば、外部アプリでショートカットから編集が可能なものを教えていただけると幸いです。。 回答よろしくお願いします！

  • ＶＢＳで

    調べながら初めてＶＢＳを作成しました。なんとか動かせたのです（※ファイルを読込み、部分参照して、対象データだったら、Ｏｕｔｆｉｌｅ１に、そうでなかったらＯｕｔｆｉｌｅ２に）が、 こんなことができればいいなって思い始めたことがあります。 ”Ｏｕｔｆｉｌｅ２がゼロ件（ゼロ件チェックのようなもの）だったら、画面メッセージ（Ｏｕｔｆｉｌｅ２があります。など）を表示したい。”このようなことってできますか？

  • [asp/vbs]FileExistsのパスの指定方法について教えて下

    [asp/vbs]FileExistsのパスの指定方法について教えて下さい。 下記のような記述をした場合、インターネット上にファイルは存在しているのに 「無し」と判断されてしまいます。（"ファイルがありません"と表示される） 表示されるという事はasp自体は動いているのでしょうが、肝心のパスの設定が わからない状態です。 <%@ Language=VBScript %> －－－－－－－中略－－－－－－－ <% Set objFso = Server.CreateObject("Scripting.FileSystemObject") If objFso.FileExists("image/test.jpg") Then Response.Write "ファイルが存在します" End If Response.Write "ファイルがありません" %> このaspファイルが置かれているディレクトリ上にtest.jpgを置き、 If objFso.FileExists("test.jpg") Then と記述しても、やはり"ファイルがありません"と表示されてしまいます…。 また、フルパス（http://www～～test.jpg）と表示しても駄目でした。 おそらく根本的な問題だとは思うのですが、 どのように表記したら良いか、教えて頂けると助かります。

  • 存在しないショートカットを右クリックすると・・・

    質問させていただきます。 使用PCは、WindowsXP SP2 富士通のFMV NB50Sです。 説明が分かりにくいかもしれませんが、今起こっている現象をそのまま書きます。 1.「スタート→最近使ったファイル」の中のショートカットを整理するため、「右クリック→削除」で削除したい。 2.ところが消したいショートカットの元ファイルが存在しない為、右クリックすると 　「ショートカットの検索」もしくは「ショートカットエラー」のウィンドウが"二回"出る。 3.同じ画面が二回表示されてから、本来右クリックで現れる「削除(D)」などの欄が現れる。 4.左クリックする分には一回しか表示されない。 私はもう一台DELLのPCを持っているのですが、 そっちでは存在しないショートカットを右クリックしてもエラーメッセージが出ないでそのまま欄が現れます。 左クリックのときは富士通もDELLも同じです。（当たり前かもしれませんが。） ということで、富士通PCのこの「2回表示される」っていう動作をどうにかして失くすことはできないのでしょうか？ 私は「最近使ったファイル」のところを整理する機会が多くて 存在しないファイルを消すたびにいちいち二回表示されるとめんどくさいので、 出来ればこの現象が起こらないようになってもらいたいと思ってます。 「富士通の特性で直せないもの」なら諦めますが、 もし直せるものならばどなたかやり方をご教授願います。

  • ショートカットファイルから呼び出されたことを判別するためには

    VC++2008にて、サーバとの通信プログラムを作成しています。 ディレクトリやファイル名を書き込んだ、 特定拡張子のファイルを作成し、 そのファイルの拡張子を、作成したプログラムに 関連付けし、ファイルをクリックした際に、 ファイル内データを読み込んで、書き込まれている データにアクセスする機能を作成したいと考えています。 （通信プログラムを介したリンクファイル・ 　ショートカットファイルといった意味合いです） このショートカットファイルをダブルクリックした際、 関連付けた通信プログラムが自動起動するのですが、 ショートカットファイルからの起動かどうかを判別する 方法が分かりません。 また、通信プログラムが既に起動している場合は、 新たにプログラムが起動するのではなく、 立ち上がっている方のプログラム側が ショートカットにて呼び出されたことについての メッセージを受け取りたいのですが、 この方法についても実装方法が分かりません。 以上2点について、ご教授願えればと思います。 よろしく願いします。

  • vbsのショートカット作成で、引数に不具合がでる

    あるプログラムに対し、ショートカットを vbsで作成したいのですが、 リンク先の引数で不具合が発生します。 具体的には KeePassというアプリケーションで、 Database.kdeを開き、パスワードにpassを指定する、というものです。 "C:\...\KeePass.exe" "Database.kdb" -pw:"pass" vbsのソースはこちらです ------------------------------------------------------------ Dim WshShell, fso, ShrCut Set WshShell = WScript.CreateObject("WScript.Shell") Set fso = WScript.CreateObject("Scripting.FileSystemObject") Set ShrCut = WshShell.CreateShortcut(WSHShell.CurrentDirectory & "\KeePass.lnk") ShrCut.TargetPath = WSHShell.CurrentDirectory & "\KeePass.exe"" ""Database.kdb"" -pw:""pass" ShrCut.WorkingDirectory = WSHShell.CurrentDirectory ShrCut.IconLocation = WSHShell.CurrentDirectory & "\KeePass.exe" ShrCut.Save ------------------------------------------------------------ ショートカット作成後に実行すると、"passを探しています と表示されますが、 ショートカットのプロパティを開き、リンク先をコピペで更新すると、動作します。 宜しくお願い致します。

  • ｖｂｓ　配列の存在確認をしたい。

    VBSで、ドメインを取るプログラムを作りたくて 悪戦苦闘しています。 Dim reg Dim Matches Dim testUrl Set reg = CreateObject("VBScript.RegExp") reg.Pattern = "/{2}([^/]+)/" testUrl = "http://www.test.co.jp/test.html"　←ここは実際はメソッドの引数値が入ります Set Matches = reg.Execute(testUrl) msgbox Replace(Matches(0).Submatches(0),"www.","") 上記、きちんとしたurlが入ってくる場合はいいのですが、 そうとは限らず、testUrl = "http://www"　というような半端な 値が入ってきた場合、落ちてしまいます。 Matches（またはSubmatches）のインデクサがないからだと思われますが、 存在確認をするにはどうしたら良いか、教えていただけないでしょうか。

  • デスクトップ上のショートカットがおかしい

    先日、同じ内容を質問しましたが 解決できないので再度質問いたします お気に入りのHPを見つけて 毎日アクセスしたいのでブックマークではなく PC画面にショートカットとして置きたいのですが そのショートカットをクリックしても直接ページに飛んでくれません このショートカットの作成方法は 気に入ったページを開いた状態でファイルをクリックし 送信→ショートカットをデスクトップへ をクリックして作成した物です これを実際にデスクトップ上でクリックすると ------------------------------------------------ このファイルを開けません このファイルを開くには、作成もとのプログラム名が必要です インターネットで自動的にプログラムを検索するか、 またはコンピュータにあるプログラム一覧から手動で選択してください ------------------------------------------------ と出ますので 一覧からプログラムを選択→InternetExplorer それと この種類のファイルを開くときは、 選択したプログラムをいつも使う というチェックボックスにチェックを入れておりますが その後も必ずこのようなエラーが出てしまいます ショートカットの作り方も問題ありません urlのショートカットを作るには、そのページを開き、アドレスバーの左端に有るアイコンをデスクトップまでドラッグしてドロップか、 お気に入りのHPの何も無いところで右クリックをして「ショートカットの作成」をクリック。 デスクトップに出来たショートカットをダブルクリック どちらで作ってもダメです 結局毎回毎回IEを選ばないとそのページが表示されません 今まではショートカットをクリックするだけでHPに接続出来たのですが… 何がいけないのでしょうか？ よろしくお願いします

  • Windows エクスプローラのショートカット設定

    よろしくお願いします。 エクスプローラのショートカット等で、 指定フォルダのファイルリストを表示させたいのですが、 指定の拡張子のファイルだけを表示させたいのです。 そんなショートカットを作ることは可能でしょうか？ または、VBスクリプトでもいいのですが、 表示されたリストからマウス操作でファイルを選んで 「開く」とか「移動」とかのアクションします。 ショートカットの設定やVBSで使用するオブジェクトなどを教えてください。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する