3 svar · 194 visningar · startad av Lazerzubb
<form METHOD="POST" ACTION="SKICKA.ASP">
<input name="namn" size="15">
<input name="land" size="15">
<input type="submit">
</form>
Skicka.asp
<!-- #include virtual="land/adovbs.stm" -->
<% Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=D:/inetpub/wwwroot/sok1.mdb"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM sok"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
RecSet.AddNew
For each item in Request.Form
if Request.Form(item)= "" then
RecSet(item)=""
else
RecSet(item) = Request.Form(item)
end if
Next
RecSet.Update
RecSet.Close
Connect.Close %\>
Dinna uppgifter har nu lagts till i databasen:<p>
<% Response.Redirect "tack.htm" %>
</html>
säg att man inte fyllde i land
men hur gör man då för att automatisk att det blir tommt i databas fältet.
Jag får fram att alla fält måste vara i fyllda.
------------------
Lazerzubb
du ändrar i accessdatabasen på fältet i fråga: tillåt nollängd -> ja.
sen borde du ju helt klart kunna ersätta:
For each item in Request.Form
if Request.Form(item)= "" then
RecSet(item)=""
else
RecSet(item) = Request.Form(item)
end if
med:
RecSet(item) = Request.Form(item)
------------------
don't follow your friends -- inflate them
[Redigerat av @nders den 20 aug 2000]
du går in i designläge på aktuell tabell, ställer dig på fältet och väljer 'ja' istället för 'nej' där det står tillåt nollängd / allow zero-length.
------------------
don't follow your friends -- inflate them