3
SQL Statement in VBS ausführen für BG Info
SQL Statement in VBS ausführen
Hallo
Ich will ein SQL Statememt in VBA ausführen, das heißt SQL Statement mit VBA.
Also folgendes:
Ich brauche eine Info von Datenbank, die ich mithilfe BG Info ausgeben will (also auf Desktop).
Weil BG info nicht mit SQL anfangen kann, muss ich deshalb mein SQL Statement in VBA ausführen aber wie?
set feedback off
spool on
spool %TEMP%\pronr.txt
DECLARE
pronr VARCHAR2 (100);
BEGIN
SELECT TO_CHAR (blabla_pro_nr) INTO pronr FROM blabla;
DBMS_OUTPUT.put_line (pronr);
EXCEPTION
WHEN OTHERS
THEN
DBMS_OUTPUT.put_line (SQLERRM);
RAISE;
END;
spool off
set feedback on
Danke
Hallo
Ich will ein SQL Statememt in VBA ausführen, das heißt SQL Statement mit VBA.
Also folgendes:
Ich brauche eine Info von Datenbank, die ich mithilfe BG Info ausgeben will (also auf Desktop).
Weil BG info nicht mit SQL anfangen kann, muss ich deshalb mein SQL Statement in VBA ausführen aber wie?
set feedback off
spool on
spool %TEMP%\pronr.txt
DECLARE
pronr VARCHAR2 (100);
BEGIN
SELECT TO_CHAR (blabla_pro_nr) INTO pronr FROM blabla;
DBMS_OUTPUT.put_line (pronr);
EXCEPTION
WHEN OTHERS
THEN
DBMS_OUTPUT.put_line (SQLERRM);
RAISE;
END;
spool off
set feedback on
Danke
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 159453
Url: https://administrator.de/contentid/159453
Ausgedruckt am: 23.11.2024 um 02:11 Uhr
3 Kommentare
Neuester Kommentar
Hi,
ich habe hier mal nen Codesnippet aus einer Access VBA Anwendung von mir. Eventuell hilft es dir weiter:
Dim MyDB As DAO.Database, MyRec As DAO.Recordset
Set MyDB = CurrentDb
Set MyRec = MyDB.OpenRecordset("SELECT name FROM tabelle")
While Not MyRec.EOF
MsgBox(MyRec![name])
End While
Gruß,
pleqtronic
ich habe hier mal nen Codesnippet aus einer Access VBA Anwendung von mir. Eventuell hilft es dir weiter:
Dim MyDB As DAO.Database, MyRec As DAO.Recordset
Set MyDB = CurrentDb
Set MyRec = MyDB.OpenRecordset("SELECT name FROM tabelle")
While Not MyRec.EOF
MsgBox(MyRec![name])
End While
Gruß,
pleqtronic
Hallo,
Falsch. BGInfo kann sehr wohl mit MSSQ und MySQL
Hier im Forum findest du wie es in real geht mit einer SQL Datenbank. Dein Suchbegriff ist "Connection String BGInfo".
Gruß,
Peter
Falsch. BGInfo kann sehr wohl mit MSSQ und MySQL
Hier im Forum findest du wie es in real geht mit einer SQL Datenbank. Dein Suchbegriff ist "Connection String BGInfo".
Gruß,
Peter
Moin davidson,
du hast das hier unter "Windows.. weiss nich' genau" gepostet.
Ich denke, das ist nicht der richtige Bereich.
Allerdings vermischen sich hier ja ganz viele mögliche Bereiche... könnte "Tools" sein oder "Skripting"... oder "Kompost"...
Zu sehen sind auch SQL*Plus-Oracle-Fragmente...
... die aber eigentlich wieder nur einen simplen String (=ein Wort) zurückgeben und kein komplexes Resultset.
... angeblich könnte auch VBS in Frage kommen...heißt es..
oder doch eher VBA, sagst du.....
Bitte versuch doch nochmal zu sortieren...
?? Eine Textdatei auf einem Share? Dann braucht BgInfo aber eher keine Conectionstrings wissen?
?? VBA und VBS sind vermutlich irrelevante Sprechblasen... blind in den Wald geworfen... da frag ich nicht weiter nach...
Kurz gesagt.... bis hierhin finde den Thread gelinde gesagt überarbeitenswert, sozusagen reif für den Schredder.
Bitte überarbeite noch mal die Frage.
Grüße
Biber
du hast das hier unter "Windows.. weiss nich' genau" gepostet.
Ich denke, das ist nicht der richtige Bereich.
Allerdings vermischen sich hier ja ganz viele mögliche Bereiche... könnte "Tools" sein oder "Skripting"... oder "Kompost"...
Zu sehen sind auch SQL*Plus-Oracle-Fragmente...
... die aber eigentlich wieder nur einen simplen String (=ein Wort) zurückgeben und kein komplexes Resultset.
... angeblich könnte auch VBS in Frage kommen...heißt es..
oder doch eher VBA, sagst du.....
Bitte versuch doch nochmal zu sortieren...
- Was fragst du ab, wo holst du diesen Ein-Wort-Text für BgInfo?
?? Eine Textdatei auf einem Share? Dann braucht BgInfo aber eher keine Conectionstrings wissen?
?? VBA und VBS sind vermutlich irrelevante Sprechblasen... blind in den Wald geworfen... da frag ich nicht weiter nach...
Kurz gesagt.... bis hierhin finde den Thread gelinde gesagt überarbeitenswert, sozusagen reif für den Schredder.
Bitte überarbeite noch mal die Frage.
Grüße
Biber
