VB.NETでのTextBoxのＤ＆Ｄについて教えて

質問

テキストボックスにインターネットエクスプローラ上から
リンクをＤ＆Ｄをする場合、もってくるものの表面上の文字列を
取得するにはどのようにしたら良いでしょうか。

現在（省略あり）下のようになっているのですが、
これだと、urlが出てしまいます。
例えば「トップページに戻る」という文字に
http://www.***.ne.jpが設定されていた場合、
urlではなく「トップページに戻る」という文字を取得したいです。

〓DragEnterのプロシージャ〓
If e.Data.GetDataPresent("UniformResourceLocator") Then
e.Effect = DragDropEffects.Link

〓DragDropのプロシージャ〓
Dim url As String = e.Data.GetData(DataFormats.Text).ToString()
TextBox1.Text = url

よろしくおねがいいたします。

回答No.1

temtecomai2 · ベストアンサー

<WebブラウザからドロップされたリンクのURLを取得する>
http://dobon.net/vb/dotnet/control/dropfromwebbrowser.html

ただ、これだとサーバの文字コードが Shift-JIS の場合だけになってしまうと思うので、他の文字コードにも対応させる必要があります。
<文字コードを判別する>
http://dobon.net/vb/dotnet/string/detectcode.html
文字コード判別用の関数を、このサイトに載っているコードを参考に関数化してしまい、先の例で Shift-JIS を決め打ちしている箇所で文字コード判別関数を呼び出せばいけます。
> txt = GetCode(bs).GetString(bs)

お礼

ご回答ありがとうございます。
文字コードのことについても教えて頂きありがとうございます。
こちらの方法で色々試してみたいと思います。