"We are back" « oc.at

ASP/VBS Select und Oracle(ADODB)

Maxx666 26.09.2002 - 15:49 946 2
Posts

Maxx666

Kitemaniac
Avatar
Registered: Sep 2001
Location: Longshore / West..
Posts: 712
hallo programma!

suche einen kurzes codeing, wo ein select statement mittels ADODB,
an eine Oracle Datenbank geschickt wird und das Ergebins ausgegeben wird.

soweit hab ichs schon zammenbracht (stimmt das und/oder was ist zu ergänzen)

set WSHShell = CreateObject("WScript.Shell")
Set Conn = Server.CreateObject("ADODB.Connection")
set RS = CreateObject("ADODB.recordset")

Conn.cursorlocation=adUseClient

SQL_Anweisung = "select konto from konto where monat = '200206' and kontonr = 12345678;"
Conn.open "DSN=test;UID=testuser;PWD=testpass"
RS = Conn.Execute(SQL_Anweisung)

Do while not RS.EOF
msgbox(RS) ???
Loop


leider hab ich bis jetzt noch nichts einfaches im internet gefunden, ohne gleich asp lernen zu müssen.

Ringding

Pilot
Avatar
Registered: Jan 2002
Location: Perchtoldsdorf/W..
Posts: 4300
Das recordset brauchst vorher nicht erzeugen, das geschieht mit execute automatisch. Dafür musst du dann beim execute SET RS=... verwenden. In der Schleife solltest du noch MoveNext ausführen :)

Sonst schaut's ganz ok aus. Kannst aber auch alternativ doch das Recordset händisch erzeugen, und dann als ActiveConnection die Connection angeben und mit Open die SQL Abfrage ausführen.

Maxx666

Kitemaniac
Avatar
Registered: Sep 2001
Location: Longshore / West..
Posts: 712
Zitat von Ringding
Das recordset brauchst vorher nicht erzeugen, das geschieht mit execute automatisch. Dafür musst du dann beim execute SET RS=... verwenden. In der Schleife solltest du noch MoveNext ausführen :)

Sonst schaut's ganz ok aus. Kannst aber auch alternativ doch das Recordset händisch erzeugen, und dann als ActiveConnection die Connection angeben und mit Open die SQL Abfrage ausführen.

tnx!
jetzt weiss ich auch warum als vb-script nicht funktioniert hat aber als asp funktioniert.

bei vbs ist set Conn = CreateObject("ADODB.Connection") einzugeben
bei asp ist set Conn = Server.CreateObject(...) einzugeben.

tja, so einfach. wenn mans richtig macht.... :D ;)

hier ist übrigends eine gute source für verschiedenste Datenbankzugriffe:

http://www.nextmill.net/support/databaseconnection.html
Kontakt | Unser Forum | Über overclockers.at | Impressum | Datenschutz