fyll i, men inte alla?

var1 = request.form ("fält1")
var2 = request.form ("fält2")
var3 = request.form ("fält3")

if (trim(var1)<>"" and trim(var2)<>"" and trim(var3)<>"") then
'gör din insert
end if

mvh,

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
if i'm not back in five minutes, just wait longer.</A>

[Redigerat av @nders den 26 feb 2001]

var i min kod ska detta fyllas i?

tja, du kan sätta in hela klabbet inne i if-satsen.

<% 
[b]if (trim(Request.Form("username"))<>"" and trim(Request.Form("password"))<>"" and trim(Request.Form("e-post"))<>"") then[/b]

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=C:\inetpub\wwwroot\groda\users.mdb" 
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM users"

RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic

RecSet.AddNew

RecSet("Username") = Request.Form("username")
RecSet("Password") = Request.Form("password")
RecSet("E-post") = Request.Form("e-post")
RecSet("Access") = ("B")
RecSet("Namn") = Request.Form("namn")
RecSet("Efternamn") = Request.Form("efternamn")
RecSet("Mobil") = Request.Form("mobil")
RecSet("Kon") = Request.Form("kon")
RecSet("ar") = Request.Form("ar")
RecSet("manad") = Request.Form("manad")
RecSet("dag") = Request.Form("dag")
RecSet("Fakta") = Request.Form("fakta") 
RecSet("Bor") = Request.Form("bor")
RecSet.Update
RecSet.Close
Connect.Close %>

<b>Dessa uppgifter angav du:</b><p>

Login:<br><b><% =Request.Form("username") %></b><p>
Password:<br><b><% =Request.Form("password") %></b><p>
E-mail:<br><b><% =Request.Form("e-post") %></b><p>
Namn:<br><b><% =Request.Form("namn") %></b><p>
Efternamn:<br><b><% =Request.Form("efternamn") %></b><p>
Mobilnr:<br><b><% =Request.Form("mobil") %></b><p>
Kön:<br><b><% =Request.Form("kon") %></b><p>
Du är född:<br><b><% =Request.Form("ar") %> <% =Request.Form("manad") %> <% =Request.Form("dag") %></b><p>
Lite om dig själv:<br><b><% =Request.Form("fakta") %></b><p>
Du bor i:<br><b><% =Request.Form("bor") %></b><p>
<p><br><br><br>som du märker vet nu groda.net en del om dig :-) men va inte 
orolig, vi lämnar inte ut dessa uppgifter *kvack*<br><br><br>
<%
[b]else[/b]
response.write "du har inte fyllt i rätt, din jäkla apa!"
[b]end if[/b]
%>

till exempel.

en fråga till dig:

RecSet("Access") = ("B")

varför parenteser?

r: en jäklans massa redigeringar idag...

mvh,

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
if i'm not back in five minutes, just wait longer.</A>

[Redigerat av @nders den 26 feb 2001]

[Redigerat av @nders den 26 feb 2001]

men du, svar ja, den reagerar på om man inte fyller i ngt av d fält som du skrivit i If-satsen... men om man fyllt i dom eftersom dom är obligatoriska men det finns te x ett fält "mobilnummer" som man inte behöver fylla i så blir det detta felmeddelandet om man försöker bli medlem:

Provider error '80020005' 

Typblandningsfel. 

/groda/add.asp, line 34

bah. börjar visst blir trött.
då får du väl lägga in en nolla eller nåt i mobilnummer-fältet om du inte får ett värde, eller så får du inte ha med det fältet i insertsatsen.

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
if i'm not back in five minutes, just wait longer.</A>

[Redigerat av @nders den 26 feb 2001]

... eller oxå ändrar man så att fältet kan ta emot null-värden ...

------------------
Private Function OutPut(ByRef sString)
OutPut = "Who gives ..." & sString
End Function

hur ändrar man det till att godkänna "null" värden?

Gå in i designläge i tabellen, klicka på fältet du vill ändra, en massa val kommer längre ned, i rutan Tillåt nollängd skriver du "Ja"...

------------------
Jourhavande @e SweQuake.com

det funkar nu, tack för hjälpa!