nicht angemeldet
Anbei noch einmal mein Code. Vielleicht hilft es....
<link rel="stylesheet" type="text/css" href="../css/admin.css">
<title>ArtikelNummer</title>
</head>
<body>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%">
<form Method="POST" action="artikel_eingabe_update.asp" name="Artikelfrei">
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "Materialbestellung"
SQL = "Select * from Materialbestellung Where Artikelnr = " & Request.Form("Artikelnr")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 3, 3
if rs.BOF AND rs.EOF Then
%>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%"><font color="#FF0000" size="4"><b>Die Artikelnummer ist noch frei. Bitte gebn Sie Ihre Daten ein.</b></font></td>
</tr>
<tr>
<td width="100%"><img border="0" src="../images/Abstand_hoehe_10_transparent.gif" width="5" height="10"></td>
</tr>
<tr>
<td width="100%"><img border="0" src="../images/Abstand_breite_10_transparent.gif" width="10" height="5">ArtikelNummer:<br>
<img border="0" src="../images/Abstand_breite_10_transparent.gif" width="10" height="5"><input type="text" name="Artikelnr" size="7" value="<% =Request.Form("Artikelnr")%>"></td>
</tr>
<tr>
<td width="100%"><img border="0" src="../images/Abstand_breite_10_transparent.gif" width="10" height="5">Artikelbezeichnung:<br>
<img border="0" src="../images/Abstand_breite_10_transparent.gif" width="10" height="5"><input type="text" name="Artikel" size="30"></td>
</tr>
<tr>
<td width="100%"><img border="0" src="../images/Abstand_breite_10_transparent.gif" width="10" height="5">Max.
Bestellmenge<br>
<img border="0" src="../images/Abstand_breite_10_transparent.gif" width="10" height="5"><select size="1" name="MaxBestell">
<option value="25">25</option>
<option value="50">50</option>
<option value="75">75</option>
<option value="100">100</option>
</select></td>
</tr>
<tr>
<td width="100%"><img border="0" src="../images/Abstand_breite_10_transparent.gif" width="10" height="5">Für
Gruppe: (mehrfauswahl mit STRG + linke Maustaste)<br>
<img border="0" src="../images/Abstand_breite_10_transparent.gif" width="10" height="5"><select size="3" name="Gruppe" multiple>
<option value="Panda">Panda</option>
<option value="Adea">Adea</option>
<option value="IM">IM</option>
</select></td>
</tr>
</table>
<p> <input type="submit" value="Eintragen" name="B1">
</p>
</form>
</td>
</tr>
</table>
<%
else
%>
<form name="Artikelvorhanden" action="../Loeschen/artikel_loesch_form.asp" method="POST">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%">
<font color="#FF0000" size="4">Artikeleingabe</font>
<tr>
<td width="100%">
<img border="0" src="../images/Abstand_hoehe_10_transparent.gif" width="5" height="10">
<tr>
<td width="100%">
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "Materialbestellung"
SQL = "SELECT * FROM Materialbestellung where artikelnr = " & Request.Form("Artikelnr")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 3, 3
rs.MoveFirst
do while Not rs.eof
%>
Die Artikelnummer <input type="text" name="Artikelnr" size="7" value="<% =rs.Fields("Artikelnr")%>">
mit dem Artikel <input type="text" name="Artikel" size="30" value="<% =rs.Fields("Artikel")%>">
ist bereits vorhanden.
<p>Wählen Sie bitte einen unteren Button aus.<%
rs.MoveNext
loop
conn.close
%>
</p>
<p><input type="button" value="Zurück zur Prüfung" name="B1"><img border="0" src="../images/Abstand_breite_10_transparent.gif" width="10" height="5"><input type="button" value="Artikel löschen" onClick="document.Artikelvorhanden.submit" name="B2"></p></table>
<%
end if
%>
</form>
</body>
Tomcat