C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

掲示板トップ C# と VB.NET 入門 新規作成 利用方法 ツリー表示 トピック表示 ランキング 記事検索 過去ログ
ログ内検索
  • キーワードを複数指定する場合は 半角スペース で区切ってください。
  • 検索条件は、(AND)=[A かつ B] (OR)=[A または B] となっています。
  • [返信]をクリックすると返信ページへ移動します。
キーワード/ 検索条件 /
検索範囲/ 強調表示/ ON (自動リンクOFF)
結果表示件数/ 記事No検索/ ON
大文字と小文字を区別する

No.8659 の関連記事表示

<< 0 >>
■8659 　Re[6]: ショートカットのリンク先を取得する方法
□投稿者/ とも -(2007/10/05(Fri) 11:18:46)
    皆さん説明不足ですいません。
    以下のコードで指示の部分で問題が発生しています。


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    Dim WSH As Object
    Dim WshSCut As Object
    Dim X1 As String
    Dim XX As String = Me.TextBox1.Text

    X1 = XX
    If LCase(IO.Path.GetExtension(Me.TextBox1.Text)) = ".lnk" Or LCase(IO.Path.GetExtension(XX)) = ".url" Then
    WSH = CreateObject("WScript.Shell")

    WshSCut = WSH.CreateShortcut(XX)
    X1 = WshSCut.TargetPath　　　　←ここで問題の値になる。
    WSH = Nothing
    WshSCut = Nothing
    End If

    MsgBox(X1)
    End Sub
記事No.8642 のレス /過去ログ20より / 関連記事表示
削除チェック/



<< 0 >>
パスワード/

- Child Tree -