VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2003/05/26(Mon) 13:34 |
| 投稿者 | ： ulthima |
| ＵＲＬ | ： |
| タイトル | ： Re^4: openURLの文字化けについて |
> > 過去ログを見てサンプルを入手しましたが、Microsoft ActiveX Data Objectのバージョン
> > が2.1までしかありません。また、
>
> 2.1ではStreamオブジェクトが利用できません。もしStreamを使いたいのであれば、
> http://www.microsoft.com/japan/msdn/data/default.asp
> から、バージョン2.5以上のMDAC(Microsoft Data Access Components)を入手して下さい。
>
> # Streamを準備できない場合は、mlang.dll のConvertINetMultiByteToUnicode APIを
> # 直接呼び出して変換する……という手もあります。
>
> > Public Function ConvertCharset( _
> > ByRef SrcData() As Byte, _
> > ByVal SrcCharset As String, _
> > ByVal DestCharset As String) As Byte()
> > Dim Src As ADODB.Stream
> > Dim Dst As ADODB.Stream
> > の部分がコードエラーとなってしまいます。
>
> 上記のどの部分でしょうか？
>
> Function ConvertCharset で落ちているようであれば、As Byte() のかわりに
> As Variantで代用してください。
>
> その後の As ADODB.Stream の部分で落ちているのであれば、
> Microsoft ActiveX Data Object の 2.5, 2.6, 2.7, 2.8 のいずれかを
> 参照設定しておく必要があります。（2.1, 2.0, 1.5, 1.0ではStremを利用できません）
魔界の仮面弁士さんのご指摘通り行ったら動作しました。
魔界の仮面弁士 → 魔界の仮面弁士 が出力されました
本変換ソフトを自作のopenURL使用ソフトに組み込んでトライして見ます。
分からなくなったらまた投稿いたします。
本当にありがとうございました。
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）