Hallo!
> Ich verwende sowas:
>
> newID = InsertRS "tabelle", Array("feld1","feld2"), Array("wert1",2)
>
> function InsertRS(table,fields,values)
> dim rs
> Set rs = Server.CreateObject("ADODB.Recordset")
> rs.CursorType = adOpenStatic
> rs.LockType = adLockOptimistic
> rs.open "SELECT * FROM " & table & " WHERE 0=1",
> connectionString
> rs.AddNew fields, values
> rs.Update
> InsertRS = rs(0)
> rs.close
> Set rs = Nothing
> end function
So habe ich es auch, allerdings ohne rs.Update (weil �berfl�ssig nach
rs.AddNew mit Parametern). Auch bearbeite ich in der Funktion die
"Access-Trigger", so dass meine Applikation sowohl mit Access als auch
SQL-Server arbeiten k�nnen.
Vielleicht ist es auch sinnvoll, die ID nicht mit rs(0), sondern mit
rs.Fields("ID").value zu suchen, weil die Reihenfolge ja auch mal anders
sein kann. In Deinem Fall musst Du bei jeder Tabelle immer zuerst die ID
definieren. In Access wirkt das Verschieben von Feldern nur auf die
Anzeige und nicht auf die gespeicherte Reihenfolge.
Freundliche Gr��e
Joachim van de Bruck
| [aspdedatabase] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdedatabase/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdedatabase.asp
