INdskribning til database??

Den gider kun sætte det første navn ind..... Mega mærkeligt!!

prøv at skriv det i EN sql-sætning:
strSQL = "Insert into nyheder (navn, nyhed, opretter) values ('"
strSQL = strSQL & Request.Form("navn") & "', '"
strSQL = strSQL & Request.Form("nyhed") & "', '"
strSQL = strSQL & Request.Form("opretter") & "')
Conn.Execute(strSQL)

det sparer dig også for noget skrivearbejde

Øøøøøhhhhh det funker ikke... Får flgnd. fejl:
Microsoft VBScript compilation (0x800A0409)
Unterminated string constant
/admin/start.asp, line 75, column 48
strSQL = strSQL & Request.Form("opretter") & "')

nå ja, jeg glemte at afslutte strengen. prøv at lave linien om til dette:
strSQL = strSQL & Request.Form("opretter") & "')"

hmm

Det virker ikke.... Den opretter ikke noget.... kan det være fordi jeg har skrevet lortet ind i en querystring???

<html>
<head>
<title>ADMINSEKTION!</title>
<link rel="STYLESHEET" type="text/css" href="../stylesheets/main.css">
</head>

<body bgcolor="#FF0000">
<%

' Tjek om username og password er korrekte
If Request.Form("username") = "******" AND Request.Form("********") = "oppus12345" or Session("login") = "JA" Then

' Hvis korrekt sættes session til JA
  Session("login") = "JA"
  Session.Timeout = 30
%>
<center>
<h2>LOGIN KORREKT!</a><br>
<a href="start.asp?mode=opret">Opret nyheder</a> - <a href="start.asp?mode=change">Ændr. i nyhederne</a> - <a href="start.asp?mode=del">Slet nyheder</a>

<br>
</center>
<%
Else

'Hvis ikke sættes sessionen til NEJ
Session("login") = "NEJ"
Session.Timeout = 30

Response.Write "<center>"
Response.Write "<h1>FORKERT BRUGERNAVN ELLER ADGANGSKODE!!</h1>"
Response.Write "<a href=""index.asp"">TRYK HER FOR AT PRØVE IGEN</a>"
Response.Write "</center>"

End If

%>

<% If Request.Querystring("mode") = "opret" Then %>
<center>
<h2>indtast oplysningerne og tryk på opret</h2>

<form action="start.asp?oprettet" method="post">

<a>Overskrift:</a><br>
<input type="text" name="navn"><br><br>
<a>Nyheden:</a><br>
<textarea rows="10" cols="15" name="nyhed"></textarea><br><br>
<a>Dit Navn:</a><br>
<input type="text" name="opretter"><br><br>
<input type="submit" value="Opret">
</form>
</center>
<% End If %>

<% If Request.Querystring("mode") = "del" Then %>
Funktion til slettelse af nyheder
<% End If %>

<% If Request.Querystring("mode") = "change" Then %>
Funktion til ændring af nyheder
<% End If %>

<% If Request.Querystring("mode") = "oprettet" then %>
<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("../../database/nyheder.mdb")
Conn.Open DSN

strSQL = "Insert into nyheder (navn, nyhed, opretter) values ('"
strSQL = strSQL & Request.Form("navn") & "', '"
strSQL = strSQL & Request.Form("nyhed") & "', '"
strSQL = strSQL & Request.Form("opretter") & "')"
Conn.Execute(strSQL)


' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>

<a>Nyheden er nu oprettet!</a><br><br><hr><br>
<a href="nyheder.asp">Tilbage</a>
%>

<% End If %>

<body>
 
</body>

</html>

det kan det nok. det skal være submittet via en form, der har method-attributten sat til post

det er hele koden.... jeg vil gerne give 100 point hvis du skriver det så det virker!!!

i din action i formen skriver du blor:
start.asp?oprettet

det er sikkert der fejlen er. det skal i stedet være:
start.asp?mode=oprettet

ellers kan Request.QueryString("mode") jo ikke være lig "oprettet", da der ikke er noget der hedder mode i querystringen.

hele scriptet skal så være:
<html>
<head>
<title>ADMINSEKTION!</title>
<link rel="STYLESHEET" type="text/css" href="../stylesheets/main.css">
</head>

<body bgcolor="#FF0000">
<%

' Tjek om username og password er korrekte
If Request.Form("username") = "******" AND Request.Form("********") = "oppus12345" or Session("login") = "JA" Then

' Hvis korrekt sættes session til JA
  Session("login") = "JA"
  Session.Timeout = 30
%>
<center>
<h2>LOGIN KORREKT!</a><br>
<a href="start.asp?mode=opret">Opret nyheder</a> - <a href="start.asp?mode=change">Ændr. i nyhederne</a> - <a href="start.asp?mode=del">Slet nyheder</a>

<br>
</center>
<%
Else

'Hvis ikke sættes sessionen til NEJ
Session("login") = "NEJ"
Session.Timeout = 30

Response.Write "<center>"
Response.Write "<h1>FORKERT BRUGERNAVN ELLER ADGANGSKODE!!</h1>"
Response.Write "<a href=""index.asp"">TRYK HER FOR AT PRØVE IGEN</a>"
Response.Write "</center>"

End If

%>

<% If Request.Querystring("mode") = "opret" Then %>
<center>
<h2>indtast oplysningerne og tryk på opret</h2>

<form action="start.asp?mode=oprettet" method="post">

<a>Overskrift:</a><br>
<input type="text" name="navn"><br><br>
<a>Nyheden:</a><br>
<textarea rows="10" cols="15" name="nyhed"></textarea><br><br>
<a>Dit Navn:</a><br>
<input type="text" name="opretter"><br><br>
<input type="submit" value="Opret">
</form>
</center>
<% End If %>

<% If Request.Querystring("mode") = "del" Then %>
Funktion til slettelse af nyheder
<% End If %>

<% If Request.Querystring("mode") = "change" Then %>
Funktion til ændring af nyheder
<% End If %>

<% If Request.Querystring("mode") = "oprettet" then %>
<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("../../database/nyheder.mdb")
Conn.Open DSN

strSQL = "Insert into nyheder (navn, nyhed, opretter) values ('"
strSQL = strSQL & Request.Form("navn") & "', '"
strSQL = strSQL & Request.Form("nyhed") & "', '"
strSQL = strSQL & Request.Form("opretter") & "')"
Conn.Execute(strSQL)


' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>

<a>Nyheden er nu oprettet!</a><br><br><hr><br>
<a href="nyheder.asp">Tilbage</a>
%>

<% End If %>

<body>
 
</body>

</html>

Narjs!! det funker!!!