<%
If Request.Form("FormModell")="" AND Request.Form("FormPris")="" AND Request.Form("FormFornamn")="" AND Request.Form("FormEfternamn")="" AND Request.Form("FormRiktnr1")="" AND Request.Form("FormTel1")="" Then
Response.Write " <li>De <span class=""red"">röd</span>-märkta fälten måste vara ifyllda.</li> <br><br><a href=""JavaScript:history.go(-1)"">Klicka här för att redigera."
ElseIf Request.Form("FormModell")="" then
Response.Write "<li>Ni måste fylla i en modell.</li> <br><br><a href=""JavaScript:history.go(-1)"">Klicka här för att redigera.</a>"
ElseIf Request.Form("FormPris")="" then
Response.Write "<li>Ni måste fylla i ett pris.</li> <br><br><a href=""JavaScript:history.go(-1)"">Klicka här för att redigera."
ElseIf Request.Form("FormFornamn")="" then
Response.Write "<li>Ni måste fylla i ett förnamn.</li> <br><br><a href=""JavaScript:history.go(-1)"">Klicka här för att redigera."
ElseIf Request.Form("FormEfternamn")="" then
Response.Write "<li>Ni måste fylla i ett efternamn.</li> <br><br><a href=""JavaScript:history.go(-1)"">Klicka här för att redigera."
ElseIf Request.Form("FormRiktnr1")="" then
Response.Write "<li>Ni måste fylla i ett riktnummer.</li> <br><br><a href=""JavaScript:history.go(-1)"">Klicka här för att redigera."
ElseIf Request.Form("FormTel1")="" then
Response.Write "<li>Ni måste fylla i ett telfonnummer.</li><br><br><a href=""JavaScript:history.go(-1)"">Klicka här för att redigera."
nu kollar den en sak i taget, jag vill ha så här har man inte fyllt i modell, fornamn, efternamn osv så skall det stå
- du måste fylla i modell
- du måste fylla i Förnamn
- du måste fylla i Efternamn
osv
<%
redir = false
If Request.Form("FormModell")="" AND Request.Form("FormPris")="" AND
Request.Form("FormFornamn")="" AND
Request.Form("FormEfternamn")="" AND
Request.Form("FormRiktnr1")="" AND
Request.Form("FormTel1")="" Then
Response.Write " <li>De <span class=""red"">röd</span>-märkta fälten måste vara ifyllda.</li> "
redir = true
Else
If Request.Form("FormModell")="" then
Response.Write "<li>Ni måste fylla i en modell.</li>
redir = true
end if
If Request.Form("FormPris")="" then
Response.Write "<li>Ni måste fylla i ett pris.</li> "
redir = true
end if
If Request.Form("FormFornamn")="" then
redir = true
Response.Write "<li>Ni måste fylla i ett förnamn.</li> "
end if
If Request.Form("FormEfternamn")="" then
redir = true
Response.Write "<li>Ni måste fylla i ett efternamn.</li> "
end if
If Request.Form("FormRiktnr1")="" then
redir = true
Response.Write "<li>Ni måste fylla i ett riktnummer.</li>
end if
If Request.Form("FormTel1")="" then
redir = true
Response.Write "<li>Ni måste fylla i ett telfonnummer.</li>"
end if
end if
if redir then
response.write "<br><br><a href=""JavaScript:history.go(-1)"">Klicka här för att redigera."
else
'hantera som vanligt
end if
------------------ essentitia preter non sans multiplicandum
<% If strAuto = "on" Then
Response.Write "Automatlåda, "
Else
Response.Write ""
End if
%>
<% If strKlimat = "on" Then
Response.Write " Klimaanläggning, "
Else
Response.Write ""
End if
%>
<% If strKrock = "on" Then
Response.Write "Krockskadat fordon, "
Else
Response.Write ""
End if
%>
<% If strVeteran = "on" Then
Response.Write "Veteranbil, "
Else
Response.Write ""
End if
%>
<% If strNy = "on" Then
Response.Write "Ny bil, "
Else
Response.Write ""
End if
%>
Om man bara klickar i en checkbox så hade jag (om det går) velat ha så att man bara skrev ut , (comma) efter om man väljer flera alternativ
extras = ""
If strAuto = "on" Then
extras = "Automatlåda"
End if
If strKlimat = "on" Then
if extras <> "" then
extras = extras & ", "
end if
extras = extras & "Klimaanläggning"
End if
If strKrock = "on" Then
if extras <> "" then
extras = extras & ", "
end if
extras = extras & "Krockskadat fordon"
End if
If strVeteran = "on" Then
if extras <> "" then
extras = extras & ", "
end if
extras = extras & "Veteranbil"
End if
If strNy = "on" Then
if extras) <> "" then
extras = extras & ", "
end if
extras = extras & "Ny bil"
End if
if extras <> "" then
response.write extras
end if
%>
------------------ essentitia preter non sans multiplicandum
257 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2