nicht angemeldet
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>