すべて Microsoft 製品 Microsoft 365 Office Windows Surface Xbox セール サポート ソフトウェア Windows アプリ OneDrive Outlook Skype OneNote Microsoft Teams PC とデバイス Xbox を購入する アクセサリ VR & 複合現実 エンタメ Xbox Game Pass Ultimate Xbox Live Gold Xbox とゲーム PC ゲーム Windows ゲーム 映画とテレビ番組 法人向け Microsoft Azure Microsoft Dynamics 365 Microsoft 365 Microsoft Industry データ プラットフォーム Power Platform 法人向けを購入する Developer & IT .NET Visual Studio
そちらのコードをエクセルVBAにて実行したところ、そちらの問題となっているところが再現いたしました。 writeのパラメータがバイト型でなければならないようです。 http://homepage1.nifty.com/MADIA/vb/vb_bbs/20031 … VBAなので、byte()で宣言して、各配列に値をセットしたら、通りました。 型宣言できない状態では、ADODB.Streamオブジェクトを利用した実現は無理っぽいすね。 この回答への補足 これでなんとかうまくいきました。 dim sOut dim sIn set sOut = CreateObject("ADODB.Stream") set sIn = CreateObject("ADODB.Stream") With sOut .type = 2 .charset = "iso-8859-1" .open End With
VB.NET,ADO.NETで記述されたサンプルですね。当初の記載したサンプルと基本的には同様の操作となります。 ご希望のSQL分でハンドリングするのであれば、前述のWRITEXTを利用せざるえないと思います。 後、私の情報が古いところもあり、KBで http://support.microsoft.com/kb/258038/ja Streamオブジェクトを利用したADOのサンプルがありました。 こちらご覧ください。StreamオブジェクトにはWriteメソッドがありこちらでByte配列を渡せますので、うまくいくと思いますよ。 この回答への補足 「途中経過」 とりあえずDBへ書き込む事ができました。 後は、正しく書き込まれているか表示してみようと思います。 <%@ LANGUAGE = VBSCRIPT %> <% Const adOpenKeyset = 1 Const adLockO
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く