Avatar billede thorgal Nybegynder
10. april 2003 - 18:48 Der er 4 kommentarer og
1 løsning

tilføj, opdater og slet i access

Jeg har problemer med at omskrive nedenstående med passende sql kommandoer. Jeg har fulgt et glimrende bogeksempel men ved opdatering på nettet virkede eksemplet ikke. Supporten sagde at jeg skulle omskrive det hele til sql sætninger (noget jeg ved meget lidt om desværre - derfor bogen med facit eksempler!)...

Ved opdatering;

<% Set personer = Server.CreateObject("ADODB.Recordset")
personer = "SELECT * FROM referencer WHERE id=" & Request.QueryString("id")
Set personer = Conn.Execute(PERSONER)

    personer("firma")=Request.QueryString("firma")
    personer("adresse")=Request.QueryString("adresse")
    personer("postnummer")=Request.QueryString("postnummer")
    personer("bynavn")=Request.QueryString("bynavn")
    personer("job")=Request.QueryString("job")

personer.Update

Response.Redirect("backend.asp")

    %>

Her får jeg denne fejlmeddellelse:

ADODB.Recordset error '800a0bb9'

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

/referencer_3.asp, line 6

Håber nogen kan hjælpe.

Sara
Avatar billede somaliomar Praktikant
10. april 2003 - 20:43 #1
Prøv

<%

Set rsPersoner = Server.CreateObject("ADODB.Recordset")
strPersoner = "SELECT * FROM referencer WHERE id=" & Request.QueryString("id")
rsPersoner.Open strSQL, Conn, 1, 3

rsPersoner.AddNew
rsPersoner("firma")=Request.QueryString("firma")
rsPersoner("adresse")=Request.QueryString("adresse")
rsPersoner("postnummer")=Request.QueryString("postnummer")
rsPersoner("bynavn")=Request.QueryString("bynavn")
rsPersoner("job")=Request.QueryString("job")
rsPersoner.Update

Response.Redirect("backend.asp")

%>
Avatar billede thorgal Nybegynder
11. april 2003 - 16:18 #2
Tak for svaret...

Får desværre stadig samme svar. Er der en anden mulighed?
Avatar billede somaliomar Praktikant
11. april 2003 - 16:58 #3
Prøv det her

<%

Set rsPersoner = Server.CreateObject("ADODB.Recordset")
strPersoner = "SELECT * FROM referencer WHERE id=" & Request.QueryString("id")
rsPersoner.Open strPersoner, Conn, 1, 3

rsPersoner("firma")=Request.QueryString("firma")
rsPersoner("adresse")=Request.QueryString("adresse")
rsPersoner("postnummer")=Request.QueryString("postnummer")
rsPersoner("bynavn")=Request.QueryString("bynavn")
rsPersoner("job")=Request.QueryString("job")
rsPersoner.Update

Response.Redirect("backend.asp")

%>
Avatar billede somaliomar Praktikant
11. april 2003 - 17:09 #4
Alternativet er at omkrive dit script så den ser sådan ud:

<%

intID = Request.QueryString("id")
strFirma = Request.QueryString("firma")
strAdresse = Request.QueryString("adresse")
intPostnummer = Request.QueryString("postnummer")
strBynavn = Request.QueryString("bynavn")
strJob = Request.QueryString("job")

strSQL = "UPDATE referencer SET "
strSQL = strSQL & "firma = '" & strFirma & "', "
strSQL = strSQL & "adresse = '" & strAdresse & "', "
strSQL = strSQL & "postnummer = " & intPostnummer & ", "
strSQL = strSQL & "bynavn = '" & strBynavn & "', "
strSQL = strSQL & "job = '" & strJob & "' "
strSQL = strSQL & "WHERE id = " & intID

Conn.Execute(strSQL)

Response.Write("Posten er nu opdateret. Klik <a href='backend.asp'>her</a> at fortsætte.")
'Response.Redirect("backend.asp")

%>

Læs mere om hvordan du opdatere en database på http://html.dk/tutorials/asp/lektion22.asp
Avatar billede henrik13 Nybegynder
15. april 2003 - 04:23 #5
thorgal
Hvad hed den bog med færdige sql eksempler.
Vh Henrik
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

IT-JOB

Riskpoint A/S (Riskpoint Solutions Limited)

Senior Developer

Forsvarsministeriets Materiel- og Indkøbsstyrelse

Junior Projektkonsulent til program Digital og Operativ Transformation

Fælles AI

AI Lead