Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Spalte über VBA hinzufügen

129 views
Skip to first unread message

Roman Mayer

unread,
Jul 6, 2004, 9:03:38 AM7/6/04
to
Hallo NG,

ich möchte eine Spalte in einer Tabelle hinzufügen. Ich habe es mit

sql_str = "ALTER TABLE tblTempDaten ADD fertigt Integer;"
CurrentDb.Execute (sql_str)

probiert, aber das geht nicht, obwohl der SQL String richtig ist. (Im
ausführungsfenster geht er)

Ich vermute mal, dass das execute falsch ist, aber ich habe nichts anderes
gefunden.

Gruß,
Roman


Roman Mayer

unread,
Jul 6, 2004, 9:18:33 AM7/6/04
to
Hi,

irgendwie hatte er die Variable noch mit einem alten Wert voll. In dem war
ein falscher Syntax.

Es geht also!

Gruß

"Roman Mayer" <roman....@de.bosch.com> schrieb im Newsbeitrag
news:cce7vs$qla$1...@ns1.fe.internet.bosch.com...

Henry Habermacher [MVP Access]

unread,
Jul 6, 2004, 9:19:01 AM7/6/04
to
Hallo Roman

Roman Mayer wrote in news:cce7vs$qla$1...@ns1.fe.internet.bosch.com:

Die Klammer kannst Du Dir schenken.

Versuch mal folgendes:

Dim db As Database
Dim strSQL as String
set db = Currentdb
strSQL = "ALTER TABLE tblTempDaten ADD fertigt Integer;"
db.Execute strSQL, dbFailOnError
Set db = Nothing

Damit solltest Du sehen, was schief läuft.

Die tblTempDaten ist schon in der Anwendung selber, oder? Falls diese in
der BE ist, musst Du

Set db = OpenDatabase(<Dein Pfad und Name der BE>)

setzen, bevor Du das SQL Statement abschickst.

HTH
Henry


--
Keine E-Mails auf Postings in NGs senden!
Don't send e-mails to postings in newsgroups!
KB: http://support.microsoft.com/default.aspx
FAQ: http://www.donkarl.com/AccessFAQ.htm
OH: Online Hilfe von Microsoft Access (Taste F1)
Downloads: http://www.dbdev.org

Peter Doering

unread,
Jul 6, 2004, 9:20:59 AM7/6/04
to
Hallo,

On Tue, 6 Jul 2004 15:03:38 +0200, Roman Mayer wrote:

> ich möchte eine Spalte in einer Tabelle hinzufügen. Ich habe es mit
>
> sql_str = "ALTER TABLE tblTempDaten ADD fertigt Integer;"
> CurrentDb.Execute (sql_str)

CurrentDB.Execute sql_str, dbFailOnError

IMO muesste es aber ADD COLUMN heissen.

Gruss - Peter

--
Ich beantworte keine Fragen per Email.
Mitglied im http://www.dbdev.org
FAQ: http://www.donkarl.com

Henry Habermacher [MVP Access]

unread,
Jul 6, 2004, 9:51:15 AM7/6/04
to
Hallo Peter

Peter Doering wrote in news:2kvn9qF...@uni-berlin.de:

> IMO muesste es aber ADD COLUMN heissen.

Geht auch ohne, jedoch beim SQL Server nicht mit. Daher lasse ich es
unter Jet auch immer weg.

Gruss

0 new messages