Hallo Liste

Mit dem untenstehenden Code versuche ich vergebens eine ComboBox die ich als <object > 
eingebunden habe zu fuettern. Hat jemand einen besseren (funktionierenden :-)) 
Vorschlag????

Sub Window_OnLoad()
     dim myConn
     dim rsStatus
     dim strPath
     dim strSQL

     strPath = Server.MapPath("../database/UDL_prjMDB.udl")

     Set myConn = Server.CreateObject("ADODB.Connection")
     myConn.Open "file name="& strPath
     strSQL= "SELECT StatusName FROM Statvar"
     Set rsStatus= myConn.Execute(strSQL)

     <%   Do While Not rsStatus.EOF
               response.write "StatusComboBox.AddItem" & rsStatus("StatusName")
               rsStatus.MoveNext
          Loop
     rsStatus.Close
          myConn.Close %>
End Sub



Stefan Groetz




-------------------------------------------------------------- --
        Visit our Internet site at http://www.reuters.com

Any views expressed in this message are those of  the  individual
sender,  except  where  the sender specifically states them to be
the views of Reuters Ltd.

| [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

Antwort per Email an