webForumDet fria alternativet

Inloggad skapar ny post

ASP

28 svar · 1 110 visningar · startad av Trumpf · sida 2 av 2

Frågan, av Trumpf

Hej, Behöver er hjälp...... Jag har ett formulär Och fyller man i det så ska man lägga till en id i accessbasen. Och det är i annonser. Men hur gör jag det? I min form som ser ut så här: \<form method="post" action="doreggaannonser.asp?id=\<%=request.querystring("id")%\>" method="post"\> Så här ser doreggaannonser.asp ut. \<% Set Connect = Server.CreateObject("ADODB.Connection") Connect

Läs frågan i sin helhet →
Medlem sedan feb. 2004213 inlägg
#21

Tusetack förklaringen.
Fick felmeddelande.

Microsoft VBScript compilation error '800a03ee' 

Expected ')' 

/do_skicka_kop.asp, line 13 

SQL = "Update t_nyhet Set nyhet='" & strNyhet & "' Where id = "& SafeSQL(clng(request.querystring("id")
-------------------------------------------------------------------------------------------------------^

Jag vill inte uppdatera nyhet. Utan kolumnen epost i den id posten.

Medlem sedan juni 200032 967 inlägg
#22
  1. Räkna start- och slutparenteser.

Jag vill inte uppdatera nyhet. Utan kolumnen epost i den id posten.

Byt fältnamn och värde i SQL-frågan då...

Medlem sedan feb. 2004213 inlägg
#23

Felmeddelande med denna sql sträng:

SQL = "Update t_epost Set epost='" & strepost & "' Where id = "& SafeSQL(clng(request.querystring("id")

Felmeddelande:

Microsoft VBScript compilation error '800a03ee'

Expected ')'

/do_skicka_kop.asp, line 13

SQL = "Update t_epost Set epost='" & strepost & "' Where id = "& SafeSQL(clng(request.querystring("id")
-------------------------------------------------------------------------------------------------------^

Medlem sedan jan. 20013 582 inlägg
#24

@nders skrev:

  1. Räkna start- och slutparenteser.

Mvh
Henrik

Medlem sedan dec. 2006608 inlägg
#25
SQL = "Update t_epost Set epost='" & strepost & "' Where id = " & SafeSQL(clng(request.querystring("id")))

Jag hade missat att få med två parenteser på slutet när jag kopierade den koden från en kod jag kör.

Men för att klargöra en del saker...
1.

SQL = "[B]Update t_epost[/B] Set epost='" & strepost & "' Where id = " & SafeSQL(clng(request.querystring("id")))

Heter tabellen i din databas t_epost? Om inte ändra det till ditt tabellnamn.

2.

SQL = "Update t_epost [B]Set epost='" & strepost &[/B] "' Where id = " & SafeSQL(clng(request.querystring("id")))

2.1 Heter fältet du skall uppdatera epost? Om inte ändra till det fältnamn som skall uppdateras.
2.2 Lägger du stringen som skall in i databasen i variabeln strepost? Om inte ändra till det variabelnamn som innehåller stringen som skall in i databasen.

3.

SQL = "Update t_epost Set epost='" & strepost & "' Where id = " & [B]SafeSQL[/B](clng(request.querystring("id")))

Har du en funktion som heter SafeSQL? Om inte kan du ta bort det anropet med tillhörande parenteser.

Detta ger oss:

SQL = "Update t_epost Set epost='" & strepost & "' Where id = " & clng(request.querystring("id"))

Vilket borde, om du ändrat till DITT tabelnamn, DITT fältnamn och din variabel fungera.

Lycka till /Patrik

Medlem sedan feb. 2004213 inlägg
#26

Jag har en form som ser ut så här:

<form method="post" action="do_skicka_kop.asp?id=<%=request.querystring("id")%>" method="post">
<br>
<input type="text" name="epost"> E-post  <input type="submit" value=" SKICKA "><br>
</form>

<%
  objRS.MoveNext
  Loop
  End If
  %>

Sen har jag följande då:

<%

Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/members.mdb")&";"

epost = request.form("epost")

SQL = "Update annonser Set epost='" & strepost & "' Where id = " & clng(request.querystring("id"))

Connect.Execute(SQL) 
connect.close
set connect = nothing
Response.Redirect "bekrafta3.asp"
%>

Men jag har tabell annonser med id,epost

Medlem sedan feb. 2004213 inlägg
#27

Jag fick det att fungera!
Det kan vara bra för andra ev. att ha till hands.

SQL = "update annonser set epost='" & Replace(Request.Form("epost"),"'","''") & "' where id=" & Request.QueryString("id")

Nu avslutar vi detta tråd!
Tusen tack för all hjälp!

Medlem sedan dec. 19996 721 inlägg
#28

glöm inte clng, SafeSQL eller Replace(....,"'","''") på Request.QueryString("id") .

Grundregel: Stoppa ALDRIG in ett värde direkt från Request i en SQL-fråga.

Medlem sedan feb. 2004213 inlägg
#29
SQL = "UPDATE annonser SET epost='" & Replace(Request.Form("epost"),"'","''")  & "', såld=1 WHERE id=" & Request.QueryString("id") & ";"

Detta fungerar. Men om jag vill uppdatera en kolumn till som heter saltdatum. Dagensdatum ska in där. Men hur?

Glad Påsk på er!

260 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
127 ms — deklarationer (db)
0 ms — hämta statistik (cache)
130 ms — hämta tråd, inlägg och bilagor (db)
125 ms — ändringar (db)