残念ながらVB6にはURLエンコード・デコードをする関数が標準では用意されてない。(.NETにはあるらしいんだけどね。。。) 1バイト文字だけだったら自分で関数を書いてもいいのだが、2バイト文字も扱わないとならないとなると、途端に書く気力が失せる。(自分だけかな?) そんな人のために、VB6から簡単にURLエンコード・デコードする方法。 '================================================== 'UrlEncodeUtf8: 文字列をUTF-8でエンコードするFunction '================================================== 'strSource: 元の文字列 '返り値: エンコードされた文字列 '===============================================