Hjælp, jeg har lavet en markedsplads, hvor folk kan sætte ing til
salg. De kan selv indsætte de ting de vil sælge.
ved at udfylde formaleren : Se den på siden
www.hundiegaard.dk og
klik på markedspladsen. og indsæt ting.
<form action="indsaetmarked.asp" method="POST"
enctype="multipart/form-data">
<p><b>Hvad skal det :</b></p>
<fieldset style="padding: 2">
<legend>Emnevalg</legend>
<input type="radio" value="købes" checked name="emne">
Købes
<input type="radio" name="emne" value="sælges">
Sælges
<input type="radio" name="emne" value="udlånes">Udlånes
<input type="radio" name="emne"
value="udlejes">Udlejes</fieldset><p><b>
Overskriften : </b><input type="text" name="overskrift"
size="40"> (Brænde,
Barnevogn) </p>
<p><b>Beskrivelse: </b><br>
<textarea rows="4" name="indhold" cols="46"></textarea></p>
<p><b>Pris :</b> <input type="text" name="pris" size="11"> kr.
</p>
<p><b>Navn:</b>
<input type="text" name="navn" size="22"> <br>
<b>Tlf.nr. :
<input type="text" name="telefon" size="14"><br>
E-mail:
<input type="text" name="email"
size="22"> </b></p>
<p><b>Adgangskode:</b><br>
<input type="text" name="kodeord" size="20">
<input type="submit" value="Gem"> <button name="Slet"
type="reset">Slet Alt
</button> </p>
</form>
indsaetdata.asp er det script der sætter dataerne ind fra
formularen.
den kommer også og siger database opdateret. men går man ind i
databasen og ser, så har den fået en id mere men resten af
felterne er tomme. Det var virket.
dette script:
' SQL sætning opbygges
strSQL = "Insert into marked ("
strSQL = strSQL & "emne, "
strSQL = strSQL & "overskrift, "
strSQL = strSQL & "indhold, "
strSQL = strSQL & "pris, "
strSQL = strSQL & "navn, "
strSQL = strSQL & "telefon, "
strSQL = strSQL & "email, "
strSQL = strSQL & "kodeord) "
strSQL = strSQL & "values( "
strSQL = strSQL & "'" & Request.Form("emne") & "', "
strSQL = strSQL & "'" & Request.Form("overskrift") & "', "
strSQL = strSQL & "'" & Request.Form("indhold") & "', "
strSQL = strSQL & "'" & Request.Form("pris") & "', "
strSQL = strSQL & "'" & Request.Form("navn") & "', "
strSQL = strSQL & "'" & Request.Form("telefon") & "', "
strSQL = strSQL & "'" & Request.Form("email") & "', "
strSQL = strSQL & "'" & Request.Form("kodeord") & "') "
' SQL sætning eksekveres
Conn.Execute(strSQL)
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
På forhånd tak
Mik Thomsen
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials