Am Freitag 13 Mai 2005 09.03 schrieb Claudia Drechsle: > Hallo, > hier zwei Foren, die speziell OO Basic behandeln: > http://de.openoffice.info/viewforum.php?f=18 > http://www.ooo-portal.de/index.php?module=pnForum&func=viewforum& >forum=21 Viel Gl�ck, > claudia > > > Hallo, > > > > Kann mir hier keiner weiterhelfen? Wo kann ich suchen? > > > > Danke > > Fichte.Buche > > > > ----- Original Message ----- > > From: "fichte buche" > > <[EMAIL PROTECTED]> > > > To: > > <[email protected]> > > > Sent: Monday, April 25, 2005 9:21 AM > > Subject: [de-users] Datensatz in Datenbank [ODBC-dBase] > > einf�gen per Makro > > >> Hallo, > >> > >> Ich versuch gerade meine Datenbank die ich derzeit noch > > �ber die direkt > > >> d-Base Verbindung von OOo aus habe jetzt umzustellen auf > > ODBC mit d-Base > > >> Treiber, damit auch gleichzeitig auf die Datenbank zu > > gegriffen werden > > >> kann. > >> In der Datenbank ist das sonst kein Problem nur wenn ich > > �ber das Makro in > > >> eine Tabelle schreiben will funktioniert das nicht mehr. > >> Ich hab folgendes Makro: > >> > >> Dim DatenbankKontext as Object > >> Dim Datenquelle as Object > >> Dim Verbindung as Object > >> Dim Statement as Object > >> Dim DBBestellArtikel as Object > >> > >> DatenbankKontext = > > createUnoService("com.sun.star.sdb.DatabaseContext") > > >> Datenquelle = DatenbankKontext.getByName("ODBC") > >> Verbindung = Datenquelle.getConnection( "", "" ) > >> Statement = Verbindung.createStatement() > >> DBBestellArtikel = Statement.executeQuery("SELECT * FROM > > BestArt")
probier mal: While DBBestellArtikel.next() > >> DBBestellArtikel.next > >> msgbox DBBestellArtikel.getString (4) > >> > >> DBBestellArtikel.moveToInsertRow() > >> DBBestellArtikel.updateString (2, Codeakt) > >> DBBestellArtikel.updateString (4, Nameakt) > >> DBBestellArtikel.updateString (5, Unternameakt) > >> DBBestellArtikel.insertRow() > >> > >> msgbox DBBestellArtikel.getString (4) > >> > >> DBBestellArtikel.close() Wend 'next' hat seine Eigenarten > >> Statement.close() > >> Verbindung.close() > >> > >> In der ersten msgbox wir der richtig Wert angezeigt > > allerdings beim > > >> moveToInsertRow() kommt der Fehler: > >> BASIC-Laufzeitfehler. > >> Es ist eine Exception aufgetreten > >> Type: com.sun.star.sdbc.SQLException > >> Message: Function sequence error. mfG Wolfgang --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
