Du har glömt enkel fnuttar ' på efternamn, email och telefon så du får troligtvis något fel när du kör din SQL och försöker lägga in datan.
/Viktor
12 svar · 279 visningar · startad av webbSAJTEN
<form name="form1" method="post" action="index.asp?do=personalspara&meny=redaktionen">
<select name="ansvar">
<option value="Chefredaktör">Chefredaktör</option>
<option value="Ansvarig Utgivare">Ansvarig Utgivare</option>
<option value="Art Director">Art Director</option>
</select>
<input name="namn" type="text" value="Namn">
<input name="efternamn" type="text" value="Efternamn">
<input name="email" type="text" value="E-mail">
<input name="tel" type="text" value="Telfon">
<input type="submit" value="Submit">
</form>
If Request.QueryString("do") = "add" Then
If request.QueryString("do") = "personalspara" Then
Function FixSql(str)
str = Trim(str)
str = Replace(str, "'", "''")
FixSql = str
End Function
Ansvar = FixSql(Request.Form("ansvar"))
Namn = FixSql(Request.Form("namn"))
Efternamn = FixSql(Request.Form("efternamn"))
Email = FixSql(Request.Form("email"))
Tel = FixSql(Request.Form("tel"))
If RS.EOF Then
strSQL = "INSERT INTO personal (Namn, Efternamn, Email, Tel, Ansvar ) VALUES " & "('" & Namn & "'," & Efternamn & "," & Email & "," & Tel & "," & Ansvar & ")"
objConn.Execute(strSQL),,128
Else
strSQL = "INSERT INTO personal (Namn, Efternamn, Email, Tel, Ansvar ) VALUES " & "('" & Namn & "'," & Efternamn & "," & Email & "," & Tel & "," & Ansvar & ")"
objConn.Execute(strSQL),,128
Response.Redirect("index.asp?meny=redaktionen")
End If
End If
%>
Det som händer är: Ingenting! Man kommer till sidan dir man ska komma men inget sparas i databasen..
Du har glömt enkel fnuttar ' på efternamn, email och telefon så du får troligtvis något fel när du kör din SQL och försöker lägga in datan.
/Viktor
strSQL = "INSERT INTO personal (Namn, Efternamn, Email, Tel, Ansvar ) VALUES " & "('" & Namn & "','" & Efternamn & "','" & Email & "','" & Tel & "'," & Ansvar & ")"
objConn.Execute(strSQL),,128
sådär är koden nu och de blev samma fel
Request.Form("Ansvar") != String ?
Förstår inte )=
Är inte Ansvar också en sträng som behvöer ' i början och slutet?
Ett enkelt sätt att se om det är det som är fel är att skriva ut frågan och sedan köra den manuellt mot databasen och se vad man får för fel (om man nu inte får några bra fel medelanden i någon av alla loggar som borde skapas under körningen).
/Viktor
strSQL = "INSERT INTO personal (Namn, Efternamn, Email, Tel, Ansvar ) VALUES " & "('" & Namn & "','" & Efternamn & "','" & Email & "','" & Tel & "'," & Ansvar & "')"
objConn.Execute(strSQL),,128
Else
strSQL = "INSERT INTO personal (Namn, Efternamn, Email, Tel, Ansvar ) VALUES " & "('" & Namn & "','" & Efternamn & "','" & Email & "','" & Tel & "','" & Ansvar & "')"
objConn.Execute(strSQL),,128
Sådär ser de ut!
Jag får inte ut något när jag skriver in:
response.write "SQL: " & strSQL
response.end
Re: Fel på formulär kanske?
<form name="form1" method="post" action="index.asp?[b]do=personalspara[/b]&meny=redaktionen">
If Request.QueryString("do") = "add" Then
If request.QueryString("do") = "personalspara" Then
%>
Eftersom "do" innehåller bara "personalspara" så slår ju inte det första villkoret "add" in vilket gör att inget körs.
Re: Re: Fel på formulär kanske?
Obbelix skrev:
<form name="form1" method="post" action="index.asp?[b]do=personalspara[/b]&meny=redaktionen">If Request.QueryString("do") = "add" Then If request.QueryString("do") = "personalspara" Then %>Eftersom "do" innehåller bara "personalspara" så slår ju inte det första villkoret "add" in vilket gör att inget körs.
Nu har jag skrivit:
<form name="form1" method="post" action="index.asp?do=personalspara&do=add&meny=redaktionen">
och sen
If Request.QueryString("do") = "add" Then
If request.QueryString("do") = "personalspara" Then
Och de funkar inte fortfarande!
Nej, det fungerar inte. Request.Querystring("do") kan ju inte vara endast "add" och endast "personalspara". Tänk om.
Iof.. Rätt smart idé =) Testar!