nicht angemeldet
Suche hilfe
html neuling sucht hilfe!
bitte helft mir. seite ist in .asp geschrieben
warum zeigt die homepage folgende website nicht an?
<html>
<head>
<title>Wer sind wir? - Geschäftsführung</title>
<link rel="stylesheet" type="text/css" href="formatierungen.css" />
<!--#include file="datenbankpfad.asp"-->
</head>
<body>
<h1>Geschäftsführung</h1>
<table border="0" align="center">
<tr>
<%
dim db, connstr, rs
connstr="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Path & Database & ";"
set db = Server.CreateObject ("ADODB.Connection")
db.Open (connstr)
set rs = db.Execute ("select * from geschaeftsfuehrung")
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
db.Close
set rs = nothing
set db = nothing
%>
</tr>
</table>
<h1>Verwaltung</h1>
<table border="0" align="center">
<tr>
<%
connstr="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Path & Database & ";"
set db = Server.CreateObject ("ADODB.Connection")
db.Open (connstr)
set rs = db.Execute ("select * from verwaltung")
Do until rs.EOF
response.write "<td align='center' width='200'>"
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
db.Close
set rs = nothing
set db = nothing
%>
</tr>
</table>
<h1>Raumpflege</h1>
<table border="0" align="center">
<tr>
<%
dim db, connstr, rs
connstr="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Path & Database & ";"
set db = Server.CreateObject ("ADODB.Connection")
db.Open (connstr)
set rs = db.Execute ("select * from reinigung")
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
db.Close
set rs = nothing
set db = nothing
%>
</tr>
</table>
</body>
</html>
-
Hello,
bitte helft mir. seite ist in .asp geschrieben
das sehe ich - siehst du wenigstens eine Fehlermeldung?
warum zeigt die homepage folgende website nicht an?
dazu ist es vermutlich wenig sinnvoll uns den serverseitigen ASP-Code zu zeigen, hilfreicher wäre das Ergebnis, das an den Browser geschickt wird.
MfG
Rouven--
-------------------
Unser Problem ist, dass wir eine Demokratie entwickelt haben, was nicht immer der richtige Weg ist -- Bernie Ecclestone zu den lästigen Diskussionen um Regeländerungen in der Formel 1 -
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, rsconnstr="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
-
Hello,
das ist deswegen schwer zu sagen, weil der Code auf Fehlerbehandlung völlig
verzichtet.es könnte dadurch auch leichter werden :-) Immerhin müsste der Server sang und klanglos eine nackte Fehlermeldung darstellen, sobald ihm irgendwas quer kommt... "Besser" so als ein generelles On Error Resume Next ohne anschließende Prüfung, wo man den Fehler nicht bemerkt.
MfG
Rouven--
-------------------
Ambition is the last refuge of failure. -- Oscar Wilde (Irish Poet, Novelist, Dramatist and Critic, 1854-1900) -
Hm... versteh hauptsächlich Bahnhof
aber dennoch eine großen dank für deine Bemühung.
mfg
-
Hello,
Hm... versteh hauptsächlich Bahnhof
auch wenn du mir jetzt eine Mail geschrieben hast - versuche doch erstmal das Problem genauer zu beschreiben. Was siehst du, wenn du die Seite aufrufst? Was zeigt dein Browser an? Was steht im Quelltext?
MfG
Rouven--
-------------------
Let Bygones Be Bygones -- Robert Pitscottie: "Chronicles of Scotland"
-
-