投稿日 | : 2003/05/26(Mon) 13:05 |
投稿者 | : 魔界の仮面弁士 |
Eメール | : |
URL | : |
タイトル | : Re^3: 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を利用できません)