Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
868to872
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
868to872
868to872
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

SQL per VBA

SQL per VBA
19.05.2007 22:47:52
PeTeR
Hallo VBA-Freaks,
ich bräuchte bitte ein kleines Musterbeispiel wie man in VBA per ADO die SQL-Befehle INSERT INTO und DELETE verwendet. Muss dazu per ODBC eine DNS definiert sein?
Vielen Dank für eure Hilfe
PeTeR

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: SQL per VBA
20.05.2007 09:15:00
Rolf
Hallo Peter,
hier mal ein Beispiel für INSERT TO
fG
Rolf
Option Explicit
Public Const strFolder$ = "C:\temp\"
Public Const strTestFile$ = "test.xls"

Sub start_InsertRecord()
ChDir strFolder
Call insertRecord(strTestFile, "db", "1234,#2007-05-20#,4711,'abcd',1234.56")
'Parameter: Datei, benannter Bereich, Datensatz=Beleg-Datum-Konto-Buchungstext-Betrag
End Sub



Sub insertRecord(strDestFile$, strRange$, strRecord)
Dim objCon As Object, strSQL$
strSQL = "INSERT INTO " & strRange & " VALUES (" & strRecord & ")"
Set objCon = CreateObject("ADODB.Connection")
With objCon
.Open "Provider=Microsoft.Jet.OLEDB.4.0;Excel 8.0;DATABASE=" & strDestFile
.Execute (strSQL)
.Close
End With
End Sub


Anzeige
AW: SQL per VBA
21.05.2007 10:49:00
PeTeR
Hallo Rolf,
vielen Dank für das tolle Beispiel!! Ich müsste aber von Excel die Daten in den SQL-Server übertragen (mit VBA per ADO als SQL-Befehl).
Hast noch so ein Beispiel für mich?
Herzlichen Dank
PeTeR

AW: SQL per VBA
21.05.2007 22:50:42
PeTeR
Hallo Rolf,
nochmals ganz herzlichen Dank für Deine Hilfe :-))
PeTeR
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige