ASP mit VB-Script, ohne Fehlerbehandlung

[Vinzenz Mai]

Hallo Gerhard,

warum zeigt die homepage folgende website nicht an?

das ist deswegen schwer zu sagen, weil der Code auf Fehlerbehandlung völlig
verzichtet.

<%
  dim db, connstr, rs

connstr="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Path & Database & ";"

set db = Server.CreateObject ("ADODB.Connection")

Das Erzeugen des Connection-Objektes kann fehlschlagen. In diesem Fall wird
das Fehler-Objekt gefüllt. Hier ist Fehlerbehandlung erforderlich.

db.Open (connstr)

kann fehlschlagen. Wo ist die Fehlerbehandlung?

set rs = db.Execute ("select * from geschaeftsfuehrung")

Naja, die SQL-Anweisung ist trivial - allerdings ist SELECT * böse [tm]. Aber: Auch diese Anweisung kann fehlschlagen. Wo ist die Fehlerbehandlung?

Do until rs.EOF
     response.write "<td align='center'>"
     response.write "<img src='images/mitarbeiter/" & rs(1) & "_" & rs(2) & ".jpg' alt='" & rs(2) & " " & rs(1) & "' /><br /><br />"
     response.write "<b>" & rs(2) & " " & rs(1) & "</b>"
     response.write "</td>"
     rs.MoveNext
  Loop

[...]

Weiterhin ist es eine gute Idee, für eine einzelne Seite nicht x-mal eine Verbindung zur Datenbank aufzubauen, sondern nur ein einziges Mal. Bei Access mag das noch verkraftbar sein, bei einem richtigen DBMS (wie z.B. MS SQL-Server) kostet das enorm viel Aufwand. Benutze die vorhandene Verbindung einfach weiter.

Freundliche Grüße

Vinzenz