> > M_ID = rsSelect.Fields("Menue_ID").Value
> > Set rsSelect = Nothing
------------^^^^^^^^
hier setzt du es nothing
> >
> > ' Tabelle vermieteter_Webspace �ffnen
> > Set rsSelect2 = CreateObject("ADODB.Recordset")
> > rsSelect2.CursorLocation = adUseClient
> > strSQL = "SELECT Kundennummer,Webnummer from
> vermieteter_Webspace"
> > rsSelect2.Open strSQL, CurrentProject.Connection,
> adOpenForwardOnly,
> > adLockOptimistic
> > ' Tabelle tblKundenmenue aktualisieren
> > While Not rsSelect.EOF
------------------^^^^^^^^^^^^
und hier erwartest du eine eigenschaft
die wird er dir nicht mehr geben k�nnen ...
christian
| [aspdecoffeehouse] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
