Sabine: keine Fehlermeldungen - trotzdem klappt es nicht

Beitrag lesen

Hi, bin im Moment an einem Projekt dran und steh noch ganz am Anfang meiner "Laufbahn" - bräuchte also dringend Hilfe.

Habe eine HTML-Seite mit einer dazugehörigen ASP-Seite. Ziel ist einfach über das HTML-Formular Daten aus der Datenbank abzurufen und auszugeben.

Bitte nicht erschrecken, das ist die ABSOLUTE Rohfassung!

Vielleicht schaut Ihr Euch es einfach mal an:

<html>
<head> <title> Kunde </title> </head>
<body>
<div align="center">
<br><br><br> <h1> Kunde </h1> <br><br><br><br>
<form action="kunde.asp" method="post">
<select name="Kunde" size="">
<option value="1"> Kunde 1 </option>
<option value="2"> Kunde 2 </option>
<option value="3" selected> Kunde 3 </option>
<option value="4"> Kunde 4 </option>
<option value="5"> Kunde 5 </option> </select>
<br><br><br>
<input type="Submit" name="1" value="Anfrage senden">
</form>
</div>
</body>
</html>

<html>
<head><title>Kunde-ASP</title></head>
<body> <div align="center">
<%
DIM mKNR
DIM objCon, strDB, strCon, ObjRs

strDB="Data Source"= & Server.MapPath("/Auftrag.mdb")
strCon="Provider=Microsoft.Jet.OLEDB.4.0;" & strDB
mKNR=request.form("Kunde")
SET objCon=Server.CreateObject("ADODB.Connection")
SET ObjRS=Server.CreateObject("ADODB.Recordset")
objCon.open strCon

mSQL="Select KunID, KunFirma, KunOrt, KunTelefon FROM TabKunden WHERE KunID=mKNR;"

objRS.open mSql, objCon
objRS.MoveFirst
%>

<h2> Name: <% response.write objRS("KunFirma") %> </h2>
<br>
<h4>KNR: <% response.write objRS("KunID") %> <br>
Adresse: <% response.write objRS("KunOrt") %> <br>
Kontakt: <% response.write objRS("KunTelefon") %> </h4>
<br><br><br>

<%
mSQL="Select AufID, PosID, LeiID FROM TabAuftraege INNERJOIN TabPositionen on TabAuftraege.AufID=TabPositionen.AUFID WHERE KunID=mKNR;"

objRS.open msql, objCon
objRS.MoveFirst
%>

<table border="1">
<tr>
<th> Auftragsnummer </th>
<th> Positionsnummer </th>
<th> Beschreibung </th>
</tr>

<% While not objRS.EOF %>

<tr> <td> <% response.write objRS("AufID") %> </td>
<td> <% response.write objRS("PosID") %> </td>
<td> <% response.write objRS("LeiID") %> </td> </tr>

<%
objRS.movenext
wend
objCon.Close
%>

</div>
</body>
</html>

Bin echt über jede Hilfe dankbar!