Guckst du hier:
http://www.euphoriaschild.darktech.org/index.asp?I=112
ich hab mir da mal eine Klasse zusammengeschraubt, die sowas fast
automatisch macht.
Auf der einen Seite sieht das dann zB. so aus: (achte auf die Deklaration am
Anfang und den Pfeil sp�ter:
<!--#include file="../../../include/function/sql.asp"-->
<!--#include file="../../../include/function/DBOperations.asp"-->
<%
If Session("BenutzerID") = "" Then isRedirect = true
If Session("BerechtigungAdmin") = "" Then isRedirect = true
If isRedirect Then
Position = "../../../"
%><!--#include file="../../../include/JavaScript/logoff.asp"--><%
End If
'isDebug = true
Set DBOp = new DBOperations
DBOp.numberOfFields = 3
DBOp.Construct
DBOp.Add "ID",0,true,false
DBOp.Add "SoftwareArtID",0,false,true
DBOp.Add "Bezeichnung",3,false,true
DBop.SetLabel "Bezeichnung", "Software"
%>
<html>
<head>
<title>Software</title>
<!--#include file="../../../include/JavaScript/Dateselect.asp"-->
<script language="JavaScript">
function CheckAuswahl()
{
var isSave = true
if(document.Software.SoftwareArtID[document.Software.SoftwareArtID.selectedI
ndex].value=="-1")
{
alert("Bitte w�hlen sie eine SoftwareArt!");
isSave = false;
}
if(document.Software.Bezeichnung.value=="")
{
alert("Tragen Sie bitte eine Software ein!");
isSave = false;
}
return isSave;
}
function DerLink()
{
if(!(document.Software.SoftwareArtID[document.Software.SoftwareArtID.selecte
dIndex].value=="-1"))
{
window.open("../SoftwareArten/SoftwareArtenBearbeiten.asp?ID=" +
document.Software.SoftwareArtID[document.Software.SoftwareArtID.selectedInde
x].value,"_self");
}
}
</script>
</head>
<body bgcolor="#CCCCD0" link="#000000" alink="#000000" vlink="#000000">
<table width="100%" border="0">
<tr height="25">
<td width="3%"
background="../../../Structur/Backgrounds/ueberpunkt.gif">
</td>
<td width="97%"
background="../../../Structur/Backgrounds/ueber.gif"><font
face="Verdana,Helvetica,Arial"><b>Software</b></font>
</td>
</tr>
</table>
<table border="0">
<%
theID = Request.QueryString("ID")
IF theID = "-1" then
DBop.SetValue "ID", -1
Else
SQL = "SELECT * FROM Software WHERE ID = " & theID
ReadDatabase SQL, rs
If not rs.eof Then DBop.FillIn rs
Set rs = nothing
End If
%>
</table>
<form action="SoftwareSpeichern.asp" method="post" name="Software"
onSubmit="return CheckAuswahl();">
<table border="0">
<%
DBop.PrintLineRequestForName "ID"
Response.Write(" </td>" & vbCrLf)
Response.Write(" </tr>" & vbCrLf)
Response.Write(" <tr>" & vbCrLf)
Response.Write(" <td>" & vbCrLf)
Response.Write("<font face=""Verdana,Helvetica,Arial"">SoftwareArt" &
vbCrLf)
Response.Write(" </td>" & vbCrLf)
Response.Write(" <td>" & vbCrLf)
SQLSoftwareArt = "SELECT * FROM SoftwareArten ORDER BY Bezeichnung"
ReadDatabase SQLSoftwareArt, rsSoftwareArt
'-->
'----------------------------------------------------------------------
' Hier wird die Selectbox ausgegeben
'----------------------------------------------------------------------
DBop.AddSelectBox "SoftwareArtID", rsSoftwareArt, "ID"
Set rsSoftwareArt = nothing
Response.Write ("<font face=""Verdana,Helvetica,Arial"">[<a
href=""javascript:DerLink();"">ändern</a>]</font>" & vbCrLf)
Response.Write ("<font face=""Verdana,Helvetica,Arial"">[<a
href=""../SoftwareArten/SoftwareArtenBearbeiten.asp?ID=-1"">neu
anlegen</a>]</font>" & vbCrLf)
DBop.PrintLineRequestForName "Bezeichnung"
Response.Write(" </td>" & vbCrLf)
Response.Write(" </tr>" & vbCrLf)
%>
</td>
</tr>
</table>
<input type="submit" Value="Speichern">
</form>
Andreas Roth
--------------------------------------
[EMAIL PROTECTED] *jetzt mit Chat*
http://www.EuphoriasChild.DarkTech.org
--------------------------------------
> -----Urspr�ngliche Nachricht-----
> Von: Stefan H�sler [mailto:[EMAIL PROTECTED]]
> Gesendet: Dienstag, 11. Dezember 2001 14:24
> An: ASP Diskussionsliste fuer Anfaenger
> Betreff: [aspdebeginners] AW: RE: Select Box
>
>
> > Ist dir das jetzt zu einfach?
>
> Je einfacher, desto besser. Pa�t schon so. Ist halt viel Code
> wenn man das
> �fter macht.
>
>
> | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
> | [aspdebeginners] als [EMAIL PROTECTED] subscribed
> | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
> | Sie knnen sich unter folgender URL an- und abmelden:
> |
> http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
>
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
