こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

締切り済みの質問

ExcelVBAでSQLServerに追加するには。

教えてください!

ExcelVBAの[intNo]と[strNamse]を
ADOでSQLServerにレコード追加するにはどうしたらいいのですか?

[ExcelVBA]
Dim intNo as Integer = Range("A2")の値
Dim strName as String = Range("B2")の値

[SQLServer]
Data Source= NetworkPC1
Initial Catalog= DataBase1
ID=aa
Password=123456

テーブル= Syain
列1= No
列2= Name

投稿日時 - 2007-02-12 22:47:56

QNo.2747354

すぐに回答ほしいです

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

ANo.1

まず、参照設定をしてください
 'Microsoft ActiveX Data Object x.x Library'の追加

で、以下のコーディングでどうでしょう。
 Dim cnn As New ADODB.Connection
 cnn.Open "Provider=SQLOLEDB;Data Source=NetworkPC1;Initial Catalog=DataBase1;", "aa", "123456"
 cnn.Execute("INSERT Syain ([No], [Name]) VALUES (1,'HammerHead')")
動かしてないので文法エラーがあるかも。

投稿日時 - 2007-02-13 18:06:48

あなたにオススメの質問