私のIBM MQはUTF-8形式で保存されたXMLファイルを受け入れていません。私はそれがBOMフォーマットなしでUTF-8を受け入れるかどうか試してみたい。私は複数のことを試みましたが、ファイルを非BOM形式で保存できませんでした。私のコードは以下の通りです。 Dim objStreamUTF8 : Set objStreamUTF8 = CreateObject("ADODB.Stream
私は以下のデータを持っています:列1は多数のカテゴリを持ち、列2は各カテゴリの値を持っています。この情報を変換またはピボットして、複数の列にわたってカテゴリグループの各値を表示する必要があります。 col1 col2
----------------
1 a
2 b
2 c
2 d
3 e
3 f
4 g
4 h
そして、この結果を必要とす
こんにちは私は以下のようなコードを持っています。実行すると以下の行にエラーが表示されます。エラーは "実行時エラー80004005無効な引数"です。私は問題を解決するためにいくつかのヒントを探していたが、それらのどれも私を助けなかった。アドバイスありがとう。 Sub TestInsertToSharepoint()
Dim cn As ADODB.Connection
Dim rs As A
現在ExcelのブックにあるセルにSQLクエリを格納し、セル値を変数に渡すフレームワークをテストしています。この変数は、その後rs.Open query, cnを通じて実行されます: Dim rs As ADODB.Recordset
Dim cn As ADODB.Connection
と私は、 "クエリ" のためにこれらを試してみました: Dim query as String
Dim
Excelで生成された結果を書き込むために、VBAを使用してMySQLに接続しようとしています。私はそれぞれ約100列を含む何千もの行を書く必要があります。ですから、結果を書き始める前にMySQLに接続するために別々のサブルーチンを作成してから、各行に対して「挿入」クエリを実行し、最後に接続を閉じる必要があります。 sub main
dbconnect
for i = 1 to
こんにちは、私はadodbを使ってcsvファイルからデータを取得しようとしています。現在のワークシートにレコードをコピーしようとしていますが、ヘッダーはコピーできますが、以下のレコードはソースファイルからコピーできません。 本当にありがとうございます。 Public Sub ConnectExcel()
Dim cn As ADODB.Connection
Dim rs As ADODB.R
私はオンラインで見つけることができるすべての反復を試みましたが、私は実際のカウントの代わりに-1^を自分のレコードセットカウントに返しています。私はCursorType, LockType, & CursorLocationの複数の組み合わせを試しました。ここに私のコードです。 Sub test()
Dim FullQry As String
Dim qry1 As Strin
vb.netでShare Pointへの接続文字列を開こうとしていますが、コードはcnt.Openコマンドで表示され、永久に実行されますがエラーは表示されません。以前はVBAで構文を使用していました。 Dim cnt As ADODB.Connection
Dim rst As ADODB.Recordset
cnt.Open("Provider=Microsoft.ACE.OLEDB.12.