Hallo zusammen,
ich hatte die Frage bereits am Freitag einmal in die Runde geworfen,
vielleicht ist sie untergangen
so kurz vorm Wochenende.
Viele Gr��e
Ingo Lechner
____Situation____
Ich habe ein Problem mit einem ASP-Formular, welches schon einige Male
in �hnlicher Form eingesetzt wurde, es sollte also inhaltlich so weit in
Ordnung sein. Der einzige Unterschied besteht darin, das ich das gesamte
Web �ber SSI zusammengebaut habe und es nur eine "default.asp" gibt. Die
einzelnen Bereiche includiere ich dann �ber die Links (Select
Case...usw.).
Das Formular befindet sich auf "default.asp?link=kontakt"
(content_kontakt.asp).
- siehe unten -
Die Best�tigungsseite befindet sich auf
"default.asp?link=kontakt_ergebnis" (content_kontakt_ergebnis.asp).
- siehe unten -
____Anmerkung___
Den Scriptpart: ' Mail versenden (in der content_kontakt.asp)
'SET mail = Server.CreateObject("CDONTS.NewMail")
..usw. habe ich bewusst deaktiviert(!)
___Sollverhalten___
Die Best�tigungsseite sollte erst erscheinen, wenn das Formular korrekt
ausgef�llt ist. Sollten keine oder fehlerhafte Angaben gemacht werden,
wird das im Formular angezeigt und auch der
Fehler, der gemacht wurde.
___Beispiel___
Ein �hnliches Formular steht unter:
http://www.taunatours.de/seiten/move_sub/angebot.asp hier funzt der
Script.
___Fehlverhalten___
Wenn ich es aber abschicke ohne auch nur ein Feld auszuf�llen oder ein
K�stchen zu aktivieren, wird die Best�tigungsseite trotzdem angezeigt.
Wenn ich ein oder zwei Felder ausf�lle werden die Werte �bernommen und
angzeigt, bis auf die Kontrollk�stchen, die werden �berhaupt nicht
�bernommen.
...Ich bin ratlos.
Gru�
Ingo
Script 1
content_kontakt.asp:
======================
<%
DIM flg_sendform, error_input, error_comp1, error_comp2, error_anrede,
error_firstn, error_lastn, error_street, error_plz DIM error_city,
error_country, error_state, error_phone, error_mobil, error_fax,
error_email
DIM error_webdesign, error_redesign, error_suchmaschine,
error_ecommerce, error_dynamik, error_flash
DIM error_corporate, error_sonst, mailbody, var_comp2, var_comp1,
var_anrede, var_firstn, var_lastn, var_street
DIM var_plz, var_city, var_state, var_country, var_phone, var_mobil,
var_fax, var_email, var_mobilphone, var_interesse DIM var_message,
error_aktivcheckbox, var_webdesign, var_redesign, var_suchmaschine,
var_ecommerce, var_dynamik, var_flash DIM var_corporate, var_sonstiges
error_input = TRUE
error_comp1 = FALSE
error_comp2 = FALSE
error_anrede = FALSE
error_firstn = FALSE
error_lastn = FALSE
error_street = FALSE
error_plz = FALSE
error_city = FALSE
error_country = FALSE
error_state = FALSE
error_phone = FALSE
error_mobil = FALSE
error_fax = FALSE
error_email = FALSE
error_webdesign = FALSE
error_redesign = FALSE
error_suchmaschine = FALSE
error_ecommerce = FALSE
error_dynamik = FALSE
error_flash = FALSE
error_corporate = FALSE
error_sonst = FALSE
'_____________________Zustand des hiddenfield
abfragen_____________________ flg_sendform =
CInt(Request.Form("flg_sendform"))
'__________________________Falls das Formular abgesand
wurde_______________ IF flg_sendform = 1 THEN ' Form-Data Requests
'******************Auslesen der
Formulardaten*****************
'__________________________Auslesen von Feld Firma und
l�schen von Nullstellen________
var_comp1 = TRIM(Request.Form("comp1"))
'__________________________Auslesen von Feld Firma2 und
l�schen von Nullstellen________
var_comp2 = TRIM(Request.Form("comp2"))
'__________________________Auslesen von Feld Land/Staat
und l�schen von Nullstellen________
var_country = TRIM(Request.Form("country"))
'__________________________Wenn (x) Aktiviert ist, dann
wird dieser Teil nicht Ergebnis angezeigt
IF var_country = "x" THEN
error_country = TRUE
END IF
'__________________________Auslesen von Feld Bundesland
und l�schen von Nullstellen________
var_state = TRIM(Request.Form("state"))
'__________________________Auslesen von Feld Telefon und
l�schen von Nullstellen________
var_phone = TRIM(Request.Form("phone"))
'__________________________Auslesen von Feld Mobil und
l�schen von Nullstellen________
var_mobil = TRIM(Request.Form("mobil"))
'__________________________Auslesen von Feld Fax und
l�schen von Nullstellen________
var_fax = TRIM(Request.Form("fax"))
'__________________________Auslesen von Feld Nachricht
und l�schen von Nullstellen________
var_message = TRIM(Request.Form("message"))
'__________Abfrage, ob ein Punkt der Anfrage ausgew�hlt
wurde, bei --- Bitte w�hlen --- (x) kommt eine Fehlermeldung
var_anrede = Request.Form("anrede")
IF var_anrede = "x" THEN
error_input = TRUE
error_anrede = TRUE
END IF
'_____nullstellen vor oder nach einer eingabe werden
ge"trimmt" - gel�scht -
var_firstn =
TRIM(Request.Form("firstn"))
'Abfrage, ob das Feld auch ausgef�llt wurde, wenn nicht
= TRUE
IF var_firstn = "" THEN
error_input = TRUE
error_firstn = TRUE
END IF
'_____nullstellen vor oder nach einer eingabe werden
ge"trimmt" - gel�scht -
var_lastn = TRIM(Request.Form("lastn"))
'Abfrage, ob das Feld auch ausgef�llt wurde, wenn nicht
= TRUE
IF var_lastn = "" THEN
error_input = TRUE
error_lastn = TRUE
END IF
'_____nullstellen vor oder nach einer eingabe werden
ge"trimmt" - gel�scht -
var_street =
TRIM(Request.Form("street"))
'Abfrage, ob das Feld auch ausgef�llt wurde, wenn nicht
= TRUE
IF var_street = "" THEN
error_input = TRUE
error_street = TRUE
END IF
'abfrage nach der korrekten eingabe der postleitzahl_1
var_plz = TRIM(Request.Form("plz"))
IF ISNUMERIC(var_plz) THEN
var_plz = CLNG(var_plz)
IF var_plz < 100 OR var_plz > 99999 THEN
error_input = TRUE
error_plz = TRUE
END IF
ELSE
error_input = TRUE
error_plz = TRUE
END IF
'_____nullstellen vor oder nach einer eingabe werden
ge"trimmt" - gel�scht -
var_city = TRIM(Request.Form("city"))
'Abfrage, ob das Feld auch ausgef�llt wurde, wenn nicht
= TRUE
IF var_city = "" THEN
error_input = TRUE
error_city = TRUE
END IF
'___________________Pr�fung, ob auch eine korrekte
Emailadresse eingegeben wurde_____________________
var_email = TRIM(Request.Form("email"))
IF var_email = "" OR (INSTR(var_email, "@") = 0 OR
INSTR(var_email, ".") = 0) THEN
error_input = TRUE
error_email = TRUE
END IF
'___________________Bei Gelegenheit mal das untere
Script testen_____________________
' If InStr(var_email, "@") < 2 Or _
' InStr(var_email, ".") < 2 Or _
' InStr(var_email, ",") > 0 Or _
' InStr(var_email, "'") > 0 Or _
' InStr(var_email, """") > 0 Or _
' InStr(var_email, "&") > 0 Or _
' InStr(var_email, "#") > 0 Or _
' InStr(var_email, "?") > 0 Or _
' InStr(var_email, "�") > 0 Or _
' InStr(var_email, "�") > 0 Or _
' InStr(var_email, "�") > 0 Or _
' InStr(var_email, "/") > 0 Or _
' InStr(var_email, "*") > 0 Or _
*****************Deaktiviert, weil es noch nicht
funzt***********************
' InStr(var_email, "%") > 0 Or _
' InStr(var_email, "+") > 0 Or _
' InStr(var_email, "\") > 0 Or _
' InStr(var_email, ";") > 0 Or _
' InStr(var_email, ":") > 0 Or _
' InStr(var_email, ">") > 0 Or _
' InStr(var_email, "<") > 0 Or _
' InStr(var_email, "|") > 0 Or _
' InStr(var_email, "�") > 0 Or _
' InStr(var_email, "`") > 0 Or _
' InStr(var_email, "(") > 0 Or _
' InStr(var_email, ")") > 0 Or _
' InStr(var_email, "=") > 0 Or _
' InStr(var_email, "!") > 0 Or _
' InStr(var_email, "�") > 0 Or _
' InStr(var_email, "") Or _
' Len(var_email) < 7 Then
' error_input = TRUE
' error_email = TRUE
' End if
'________checkboxen mindestens 1 muss ausgef�llt sein
abfrage:________
If Request.Form("webdesign") = "" AND
Request.Form("redesign") = "" AND Request.Form("suchmaschine") = "" AND
Request.Form("ecommerce") = "" AND Request.Form("dynamik") = "" AND
Request.Form("flash") = "" AND Request.Form("corporate") = "" AND
Request.Form("sonst") = "" THEN
error_input = TRUE
error_aktivcheckbox = TRUE
END IF
var_webdesign = Request.Form("webdesign")
IF NOT var_webdesign = "" THEN
var_interesse = " Webdesign"
END IF
var_redesign = Request.Form("redesign")
IF NOT var_redesign = "" THEN
var_interesse = var_interesse & "
Redesign"
END IF
var_suchmaschine = Request.Form("Suchmaschine")
IF NOT var_suchmaschine = "" THEN
var_interesse = var_interesse & "
Suchmaschine"
END IF
var_ecommerce = Request.Form("ecommerce")
IF NOT var_ecommerce = "" THEN
var_interesse = var_interesse & "
Ecommerce"
END IF
var_dynamik = Request.Form("dynamik")
IF NOT var_dynamik = "" THEN
var_interesse = var_interesse & "
Dynamik"
END IF
var_flash = Request.Form("flash")
IF NOT var_flash = "" THEN
var_interesse = var_interesse & " Flash"
END IF
var_corporate = Request.Form("corporate")
IF NOT var_corporate = "" THEN
var_interesse = var_interesse & "
Corporate"
END IF
var_sonstiges = Request.Form("sonstiges")
IF NOT var_sonstiges = "" THEN
var_interesse = var_interesse & "
Sonstiges"
END IF
END IF
' ____________Falls Eingaben OK, Mail versenden_________
IF error_input = FALSE THEN
' Mail Inhalt zusammenstellen
mailbody = mailbody & "Abgesandt am: " & FORMATDATETIME(DATE,
vbLongDate) & vbcrlf & vbcrlf
mailbody = mailbody &
"_____________________________________________________________" & vbcrlf
mailbody = mailbody & "Firma: " & var_comp1 & vbcrlf
mailbody = mailbody & "Firma Zeile 2: " & var_comp2 & vbcrlf
mailbody = mailbody & "Anrede: " & var_anrede & vbcrlf
mailbody = mailbody & "Vor- und Nachname: " & var_firstn & var_lastn
& vbcrlf
mailbody = mailbody & "Strasse: " & var_street & vbcrlf
mailbody = mailbody & "PLZ: " & var_plz & vbcrlf
mailbody = mailbody & "Ort: " & var_city & vbcrlf
mailbody = mailbody & "Bundesland: " & var_state & vbcrlf
mailbody = mailbody & "Land: " & var_country & vbcrlf
mailbody = mailbody & "Telefon: " & var_phone & vbcrlf
mailbody = mailbody & "Mobil: " & var_mobil & vbcrlf
mailbody = mailbody & "Fax: " & var_fax & vbcrlf
mailbody = mailbody & "Email: " & var_email & vbcrlf
mailbody = mailbody & "Telefon: " & var_mobilphone & vbcrlf
mailbody = mailbody & "Interessengebiete: " & var_interesse & vbcrlf
mailbody = mailbody & "Nachricht: " & vbcrlf & var_message & vbcrlf
mailbody = mailbody &
"_____________________________________________________________" & vbcrlf
' Mail versenden
'SET mail = Server.CreateObject("CDONTS.NewMail")
'mail.From = var_email
'mail.To = "[EMAIL PROTECTED]"
'mail.Subject = "Angebotsformular Unverbindliche Beratung"
'mail.Body = mailbody
'mail.MailFormat = 0
''mail.send
'SET mail = Nothing
END IF
%>
<table width="95%" border="0" cellpadding="0" cellspacing="0"> <tr>
<td width="4%" valign="top"><img src="img/spacer.gif" width="15"
height="1" border="0" align="top"></td>
<td valign="top" class="textblack"> </tr>
<tr>
<td valign="top"> </td>
<td valign="top">
<form action="default.asp?link=kontakt_ergebnis" method="post"
name="webkonzept" id="webkonzept" >
<input type="hidden" name="flg_sendform" value="1">
<br>
<table border="0" cellspacing="0" cellpadding="0">
<tr>
<td> </td>
<td class="form">Angebotsanfrage<br></td>
</tr>
</table>
<table width="100%" cellpadding="0" cellspacing="0" border="0">
<tr>
<td rowspan="99"> </td>
<td nowrap class="form">Firma/Verein (falls gegeben):</td>
<td nowrap class="form">
<input type="text" class="error" size="25" name="comp1"
maxlength="25" value="<% = var_comp1 %>">
</td>
</tr>
<td nowrap class="form">Firma/Verein (Fortsetzung):</td>
<td nowrap class="form">
<input type="text" class="error" size="25" name="comp2"
maxlength="25" value="<% = var_comp2 %>">
</td>
</tr>
<tr>
<td nowrap class="form">Anrede*:</td>
<td nowrap class="error">
<% IF error_anrede = TRUE THEN %>Bitte w�hlen Sie eine
Anrede<br><% END IF %>
<select name="anrede" size="1" class="error">
<option value="x">-- Bitte wählen --</option>
<option value="Herr">Herr</option>
<option value="Frau">Frau</option>
<option value="Familie">Familie</option>
<option value="Herr & Frau">Herr& Frau</option>
<option value="Dr.">Dr.</option>
<option value="Prof.">Prof.</option>
</select>
</td>
</tr>
<tr>
<td nowrap class="form">Vorname*:</td>
<td nowrap class="error">
<% IF error_firstn = TRUE THEN %>Bitte geben Sie einen Vornamen
ein<br><% END IF %>
<input type="text" class="error" size="25" maxlength="25"
name="firstn" value="<% = var_firstn %>">
</td>
</tr>
<tr>
<td nowrap class="form">Nachname*:</td>
<td nowrap class="error">
<% IF error_lastn = TRUE THEN %>Bitte geben Sie einen Nachnamen
ein<br><% END IF %>
<input type="text" class="error" size="25" name="lastn"
maxlength="25" value="<% = var_lastn %>">
</td>
</tr>
<tr>
<td nowrap height="24" class="form">Stra�e/Hausnummer*:</td>
<td nowrap class="error">
<% IF error_street = TRUE THEN %>Bitte geben Sie die Stra�e und
die Hausnummer ein:<br><% END IF %>
<input type="text" clas="i25" size="25" name="street"
maxlength="25" class="error" value="<% = var_street %>">
</td>
</tr>
<tr>
<td nowrap height="24" class="form">Postleitzahl/Ort*:</td>
<td nowrap class="error">
<% If error_plz = TRUE THEN%>Bitte geben Sie eine korrekte
Postleitzahl ein:<br><% END IF %>
<% If NOT IsNumeric(Request.Form("plz")) THEN %>Keine Eingabe
<br>oder die Eingabe von Buchstaben sind nicht erlaubt!<br>
<% END IF %>
<input type="text" clas="i5" size="5" name="plz" class="error"
value="<% = var_plz %>">
/
<input type="text" class="error"
size="15" name="city" maxlength="20" value="<% = var_city %>"><br>
<% IF error_city = TRUE THEN %>
Bitte geben Sie den Namen Ihrer Stadt
ein:
<% END IF %></td>
</tr>
<tr>
<td nowrap class="form">Land/Staat*:</td>
<td nowrap class="error">
<select name="country" size="1" class="error">
<option value="x">-- Bitte wählen --</option>
<option value="Oesterreich">Österreich</option>
<option value="Schweiz">Schweiz</option>
<option value="Deutschland">Deutschland</option>
</select>
</td>
</tr>
<tr>
<td nowrap class="form">Bundesland (in Deutschland)</td>
<td nowrap class="form">
<select name="state" size="1" class="error">
<option value="x">-- Bitte wählen --</option>
<option
value="Baden-Wuerttenberg">Baden-Württemberg</option>
<option value="Bayern">Bayern</option>
<option value="Berlin">Berlin</option>
<option value="Brandenburg">Brandenburg</option>
<option value="Bremen">Bremen</option>
<option value="Hamburg">Hamburg</option>
<option value="Hessen">Hessen</option>
<option
value="Mecklenburg-Vorpommern">Mecklenburg-Vorpommern</option>
<option value="Niedersachsen">Niedersachsen</option>
<option
value="Nordrhein-Westfalen">Nordrhein-Westfalen</option>
<option value="Rheinland-Pfalz">Rheinland-Pfalz</option>
<option value="Saarland">Saarland</option>
<option value="Sachsen">Sachsen</option>
<option value="Sachsen-Anhalt">Sachsen-Anhalt</option>
<option value="Schleswig-Holstein">Schleswig-Holstein</option>
<option value="Thueringen">Thüringen</option>
</select>
</td>
</tr>
<tr>
<td nowrap class="form">Telefon:</td>
<td nowrap class="form">
<input type="text" class="error" size="25" name="phone"
maxlength="25" value="<% = var_phone %>">
</td>
</tr>
<tr>
<td nowrap class="form">Mobil:</td>
<td nowrap class="form">
<input type="text" class="error" size="25" name="mobil"
maxlength="25" value="<% = var_mobil %>">
</td>
</tr>
<tr>
<td nowrap class="form">Fax:</td>
<td nowrap class="form">
<input type="text" class="error" size="25" name="fax"
maxlength="25" value="<% = var_fax %>">
</td>
</tr>
<tr>
<td nowrap class="form">E-Mail-Adresse*: </td>
<td nowrap class="error">
<% IF error_email = TRUE THEN %>Bitte geben Sie eine korrekte
Emailadresse ein:<br>
<% END IF %>
<input type="text" class="error" size="25" name="email"
maxlength="128" value="<% = var_email %>">
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0"
align="center">
<tr>
<td colspan="2" valign="top" class="form">
<img src="img/spacer.gif"
width="1" height="10" border="0">
</td>
</tr>
<tr align="center">
<td colspan="2" valign="top" class="form">Bitte wählen
Sie die Produkte<br></td>
</tr>
<tr align="center" valign="middle">
<td colspan="2" class="error">
<% IF error_aktivcheckbox = TRUE THEN %>Mindestens 1 Feld
muss aktiviert werden!<% END IF %>
</td>
</tr>
<tr align="center">
<td colspan="2" valign="top" class="form">
<img src="../../images/SPACER.GIF"
width="1" height="10">
</td>
</tr>
<tr>
<td width="45%" valign="top" class="form"> </td>
<td width="55%" valign="top" class="form">
<input name="webdesign" type="checkbox" id="webdesign"
value="an"
<% if request.form("hochseilgarten") = "an" then %>checked
<% END IF %>>Webdesign<br>
<input name="redesign" type="checkbox" id="redesign"
value="an"
<% if request.form("adventureparcours") = "an" then %>checked
<% END IF %>>ReDesign<br>
<input name="suchmaschinen" type="checkbox" id="suchmaschinen"
value="an"
<% if request.form("incentiv") = "an" then %>checked
<% END IF
%>>Suchmaschinen-Management<br>
<input name="ecommerce" type="checkbox" id="ecommerce"
value="an"
<% if request.form("mountainbike") = "an" then %>checked
<% END IF %>>E-Commerce<br>
<input name="dynamik" type="checkbox" id="dynamik" value="an"
<% if request.form("trekking") = "an" then %>checked
<% END IF %>>Dynamische
Lösungen<br>
<input name="flash" type="checkbox" id="flash" value="an"
<% if request.form("kanu") = "an" then %>checked
<% END IF %>>Flash<br>
<input name="corporate" type="checkbox" id="corporate"
value="an"
<% if request.form("zorbing") = "an" then %>checked
<% END IF %>>Corporate Identity<br>
<input name="sonstiges" type="checkbox" id="sonstiges"
value="an"
<% if request.form("kletterwand") = "an" then %>checked
<% END IF %>>sonstiges
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0"
align="center">
<tr>
<td valign="middle" align="center" class="form">
<textarea name="message" cols="40" rows="10" class="error"
wrap="VIRTUAL" value="<% = var_message%>">
<% = Request.Form("message") %></textarea>
</td>
</tr>
<tr>
<td valign="middle" align="center" class="form"> </td>
</tr>
<tr>
<td valign="middle" align="center" class="form">
<input type="image" border="0" name="versand"
src="img/submit.gif" width="91" height="28" alt="Abschicken">
</td>
</tr>
</table>
</td>
</tr>
</table>
</form>
</tr>
</table>
Script 2
content_kontakt_ergebnis.asp:
======================
<%
'Auslesen von Feld Firma1
var_comp1 = TRIM(Request.Form("comp1"))
'Auslesen von Feld Firma2 und l�schen von Nullstellen________ var_comp2
= TRIM(Request.Form("comp2")) 'Auslesen von Feld Anrede und l�schen von
Nullstellen________ var_anrede = Request.Form("anrede") 'Auslesen von
Feld Vorname und l�schen von Nullstellen________
var_firstn = TRIM(Request.Form("firstn"))
'Auslesen von Feld Nachname und l�schen von Nullstellen________
var_lastn = TRIM(Request.Form("lastn"))
'Auslesen von Feld Strasse und l�schen von Nullstellen________
var_street = TRIM(Request.Form("street"))
'Auslesen von Feld Postleitzahl und l�schen von Nullstellen________
var_plz = TRIM(Request.Form("plz"))
'Auslesen von Feld Stadt und l�schen von Nullstellen________
var_city = TRIM(Request.Form("city"))
'Auslesen von Feld Land/Staat und l�schen von Nullstellen________
var_country = TRIM(Request.Form("country")) 'Auslesen von Feld
Bundesland und l�schen von Nullstellen________ var_state =
TRIM(Request.Form("state")) 'Auslesen von Feld Telefon und l�schen von
Nullstellen________ var_phone = TRIM(Request.Form("phone")) 'Auslesen
von Feld Mobil und l�schen von Nullstellen________ var_mobil =
TRIM(Request.Form("mobil")) 'Auslesen von Feld Fax und l�schen von
Nullstellen________ var_fax = TRIM(Request.Form("fax")) 'Auslesen von
Feld Nachricht und l�schen von Nullstellen________ var_message =
TRIM(Request.Form("message")) 'Auslesen von Feld Emailadresse und
l�schen von Nullstellen________ var_email = TRIM(Request.Form("email"))
var_interesse = TRIM(Request.Form("var_interesse"))
%>
<table width="95%" border="0" cellspacing="0" cellpadding="0"> <tr>
<td width="4%" valign="top"><img src="img/spacer.gif" width="15"
height="1" border="0" align="top"></td>
<td align="center" valign="top" class="textblack_norm">
<table border="0" cellspacing="0" cellpadding="0" class="textblack">
<tr>
<td> </td>
<td> </td>
</tr>
<tr>
<td>Firma / Organisation:</td>
<td><%= var_comp1 %> </td>
</tr>
<tr>
<td> </td>
<td><%= var_comp2 %></td>
</tr>
<tr>
<td> </td>
<td> </td>
</tr>
<tr>
<td>Ansprechpartner:</td>
<td><%= var_anrede %> <%= var_firstn %> <%= var_lastn
%></td>
</tr>
<tr>
<td> </td>
<td> </td>
</tr>
<tr>
<td>Adresse:</td>
<td><%= var_street %></td>
</tr>
<tr>
<td> </td>
<td><%= var_plz %> <%= var_city %></td>
</tr>
<tr>
<td> </td>
<td><%= var_state %></td>
</tr>
<tr>
<td> </td>
<td><%= var_country %></td>
</tr>
<tr>
<td> </td>
<td> </td>
</tr>
<tr>
<td>Telefon:</td>
<td><%= var_phone %></td>
</tr>
<tr>
<td>Telefax:</td>
<td><%= var_fax %></td>
</tr>
<tr>
<td>Mobil:</td>
<td><%= var_mobil %></td>
</tr>
<tr>
<td>Email:</td>
<td><%= var_email %></td>
</tr>
<tr>
<td> </td>
<td> </td>
</tr>
<tr>
<td>Felder</td>
<td><% = var_interesse %></td>
</tr>
<tr>
<td> </td>
<td> </td>
</tr>
<tr>
<td>Nachricht</td>
<td><%= var_message %></td>
</tr>
</table>
</td>
</tr>
</table>
+-------------------------------------+
|das-webkonzept |
|Ingo Lechner |
| |
|Junkerstrasse 3a |
|65510 Idstein-Walsdorf |
|Phone 06434-905819 |
|Mobile 0160-4466612 |
|Fax 06434-905820 |
|Mail [EMAIL PROTECTED]|
+-------------------------------------+
| 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