webForumDet fria alternativet

Tvingande fält

ASP

4 svar · 154 visningar · startad av syrolis

Medlem sedan feb. 2003107 inlägg
Frågan#1

Hej, behöver lite hjälp igen.

Jag har ett annonsskript på min kattsida där man får fylla i Föremål, beskrivning, pris, kategori, pris, Namn, tel, email, stad och ett lösenord.

Det finns en nackdel med skriptet och det är att fältet pris är tvingande då kattungar kan kosta olika beroende på färg härstamning och "kvalitét"
Fånigt va!?

I alla fall. Jag vill ta bort det tvingande för fältet pris så man kan lämna det fältet blankt om man vill.
Men jag är osäker på vad jag ska peta på i skriptet?
Kan någon hjälpa mig?
Jag har sökt i forumet men inte blivit klokare.

Tack på förhand!
Sylvia

 <%
If request("item")="" or request("description")="" or _
  request("price")="" or request("phone")="" or _
  request("email")="" or request("stad")="" then
%>
<% showheader "Ny annons" %>
<table border="1"  width=650 bordersyle="solid" bordercolor="green" bgcolor="black">
<tr>
<td colspan="2">
Fyll i alla fälten och se till att välja en passande categori.<p>
Se till att skriva in ett lösenord som du kommer<br> ihåg så att du kan ändra eller 
ta bort din annons senare.<p></td></tr>

<form method="post" action="placead.asp">
<tr><td>Föremål:</td>
<td><input type="text" size="50" name="item"></td></tr>
<td valign=top>Beskrivning:</td>
<td><textarea name="description" rows="6" cols="50"></textarea></td></tr>
<tr><td>Categori:</td>
<td><select name="category" size="1">
<option selected value="categori1"><%=categori1%></option>
<option value="categori2"><%=categori2%></option>
<option value="categori3"><%=categori3%></option>
<option value="categori4"><%=categori4%></option>
<option value="categori5"><%=categori5%></option>
<option value="categori6"><%=categori6%></option>
<option value="categori7"><%=categori7%></option>
<option value="categori8"><%=categori8%></option>

</select></td></tr>

<tr><td>Pris:</td>
<td><input type="text" size="10" name="price">Kr</td></tr>

<tr><td>Tel nr:</td>
<td><input type="text" size="15" name="phone"></td></tr>

<tr><td>Email:</td>
<td><input type="text" size="25" name="email" value="@"></td></tr>

<tr><td>Stad:</td>
<td><input type="text" size="15" name="stad"></td></tr>

<tr><td>Lösenord:</td>
<td><input type="password" size="10" name="password"></td></tr>

<tr><td><input type="submit" value="Klar">
</table></form>
<% else %>
<%
Dim query, connect, classifieds, place
showheader "Ny annons"
on error resume next
%>
<font size=5><b>Categori: 
<% if request("category")="categori1" then %>
<%=categori1%>
<% elseif request("category")="categori2" then %>
<%=categori2%>
<% elseif request("category")="categori3" then %>
<%=categori3%>
<% elseif request("category")="categori4" then %>
<%=categori4%>
<% elseif request("category")="categori5" then %>
<%=categori5%>
<% elseif request("category")="categori6" then %>
<%=categori6%>
<% elseif request("category")="categori7" then %>
<%=categori7%>
<% elseif request("category")="categori8" then %>
<%=categori8%>

<% end if %>

</b></font>
<%
showitem request("item"),request("description"),_
 request("price"),request("phone"),request("email"),_
 request("stad"),date

set connect = server.createobject("ADODB.connection")
Connect.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/annonser.mdb") & ";pwd=;"

set classifieds = server.createobject("ADODB.recordset")
classifieds.open _
 "SELECT * FROM items WHERE category='" & _
 request("category") & "'",_
 connect,adopendynamic,adlockoptimistic
classifieds.addnew
classifieds("item") = request("item")
classifieds("category") = request("category")
classifieds("description") = request("description")
classifieds("price") = request("price")
classifieds("phone") = request("phone")
classifieds("email") = request("email")
classifieds("stad") = request("stad")
classifieds("posted") = date
classifieds("password") = request("password")
classifieds.update
%>
<font size=5><i>Din annons har placerats.</i></font><p>
<a href="default.asp">Hem</a>
<% end if %>
Medlem sedan mars 20015 287 inlägg
#2
<%
If request("item")="" or request("description")="" or _
  request("phone")="" or _
  request("email")="" or request("stad")="" then
%>

Skulle jag tro.

Medlem sedan okt. 2001615 inlägg
#3

du har följande kod i början
den kollar ju ifall några variablar är tomma, om visa formuläret igen!
men om du tar bort request("price")="" så kan du ha tomt i price!

exempel:

 <%
If request("item")="" or request("description")="" or _
  request("phone")="" or _
  request("email")="" or request("stad")="" then
%>
Medlem sedan mars 20015 287 inlägg
#4

Sen hela denna bit:

<% if request("category")="categori1" then %>
<%=categori1%>
<% elseif request("category")="categori2" then %>
<%=categori2%>
<% elseif request("category")="categori3" then %>
<%=categori3%>
<% elseif request("category")="categori4" then %>
<%=categori4%>
<% elseif request("category")="categori5" then %>
<%=categori5%>
<% elseif request("category")="categori6" then %>
<%=categori6%>
<% elseif request("category")="categori7" then %>
<%=categori7%>
<% elseif request("category")="categori8" then %>
<%=categori8%>

Kan du inte helt enkelt skriva:

<%=request("category")%>

Där?

Medlem sedan feb. 2003107 inlägg
#5

First Choice:
Jag provade som du skrev men fick felmeddelande:

Error Type:
Microsoft VBScript compilation (0x800A03EA)
Syntax error
/dd/koposalj/placead.asp, line 13

Men jag upptäckte att ett vanligt mellanslag i rutan gick igenom som svar på "frågan". Det duger för mig. Det är ju bara att meddela de som annonserar detta.
----------------------------------

Solbulle:
Angående att ändra koden som du föreslog gick ju bra. Annonsen blev ok. Men titeln på kategorin försvann och det visades:
Category= Category8 och det var ju inte så kul.
Jag har lagt tillbaka min kod igen och är nöjd med det.

Tack så mycket.

255 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
121 ms — deklarationer (db)
0 ms — hämta statistik (cache)
130 ms — hämta tråd, inlägg och bilagor (db)
121 ms — ändringar (db)