Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
896to900
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
896to900
896to900
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Wieder mal ODBC und SQL

Wieder mal ODBC und SQL
22.08.2007 14:09:09
Tomy

Hallo zusammen,
ich habe mal wieder eine Frage. Im Archiv hatte ich nicht so richtig was gefunden, daher hier der Eintrag.
Wieso kann ich nicht select *from XYZ angeben? in dem unten angeben Code.
Er läuft dann in einen Fehler rein: Laufzeitfehler 1004, SQL-Syntaxfehler?!
bei Zeile: .Refresh BackgroundQuery:=False
Aber hier erstmal der gesamte Text:
myUID = InputBox("Benutzername angeben", "Datenbank Abfrage: Benutzername")
myPWD = InputBox("Kennwort ", "Datenbank Abfrage: Kennwort")
myserver = InputBox("Server ", "Datenbank Abfrage: Server")
With ActiveSheet.QueryTables.Add(Connection:= _
"ODBC;DRIVER={Microsoft ODBC für Oracle};UID=" & myUID & ";PWD=" & myPWD & ";SERVER=" & myserver & ";", _
Destination:=Range("B3"))
.CommandText = Array( _
"SELECT *from Tabelle" & Chr(13) & "" & Chr(10) & "FROM TEST.Tabelle Tabelle" _
)
.Name = "Abfrage von TEST"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = True
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.Refresh BackgroundQuery:=False
End With
Wäre echt super, wenn mir mal wieder jemand helfen würde ;-)
Danke schonmal.
Gruß Tomy

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

Betreff
Datum
Anwender
Anzeige
AW: Wieder mal ODBC und SQL
22.08.2007 16:34:29
Renee
Hallo Tomy,
Sorry, aber bei dem Code wird mir schlecht...
Warum, siehst Du unter anderm hier: https://www.herber.de/forum/archiv/896to900/t897458.htm
Also pas auf mit Query.Add, sonst treffen wir Dich in einiger Zeit wieder mit Problemen wie "riesige Datei", "immer langsamer" etc.
Dann ergibt Dein Konstrukt in etwa einen solchen SQL-String


SELECT *from Tabelle
FROM TEST.Tabelle Tabelle


Das kann ja wohl nicht laufen. Richtiger wäre etwa


SELECT * FROM TABELLE


Greetz Renee

Anzeige
AW: Wieder mal ODBC und SQL
22.08.2007 20:21:54
Tomy
Hallo Renee,
danke für die Antwort, aber schlecht muss dir nicht wirklich werden. ;-)
Die besagte Tabelle ist eine eigens angelegte View für die Excel Datei. Ich werde die einmalig abfragen und dann aktualisieren lassen. Die Laufzeiten sind maximal im Sekundenbereich.
Da ich aber eh alle Felder der View (="Tabelle") brauche, kann ich doch auch "select * from" schreiben oder etwa nicht? Lag mein Fehler an dem "*from" statt "* from"?
Ich hatte nur das Makro mit schreiben lassen und die Abfrage der einzelnen Felder durch *from ersetzt. Der Rest war schon da: ..." & Chr(13) & "" & Chr(10) & "FROM TEST.Tabelle Tabelle" wobei mir der erste Teil nix sagt?! Bin halt nicht so fit in solchen Dingen, aber wir haben ja alle mal angefangen....hoffentlich verursache ich nicht noch weitere Übelkeit :o)
Danke schonmal.
Gruss Tomy

Anzeige
AW: Wieder mal ODBC und SQL
23.08.2007 09:45:16
Renee
Hallo Tomy,


statt:
.CommandText = Array( _
"SELECT *from Tabelle" & Chr(13) & "" & Chr(10) & "FROM TEST.Tabelle Tabelle" _
)
schreib:
.CommandText = Array("SELECT * FROM TEST.Tabelle")


Unter der Annahme, Deine Datenbank heisst TEST (sehr sinvoll!) und die Tabelle heisst Tabelle (noch sinnvoller!)...
Greetz Renee

AW: Wieder mal ODBC und SQL
23.08.2007 10:19:28
Tomy
Hallo Renee,
in dem Beispiel heißen die Dinge so, aber in der Realität habe ich schon andere Namen genommen, aber die wollte ich hier nicht reinschreiben. ;-)
Ich habe das ganze jetzt angepasst und jetzt läuft es wunderbar. Danke.
Ich hoffe, dir ist nicht zu übel geworden .... :o)
Gruß Tomy

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige