de textarea som har et nummer bag sig, er oprettet i tabellen [phrasetekster] og nummeret er deres ID i tabellen.
De som ikke har et tal bag sig, de er ikke oprettet i [phrasetekster]
Dvs, når jeg submitter formen, skal jeg have lavet en løkke der tager mine 4 textarea og skal gøre følgende:
1. er der ID efter phrase_, opdater teksten i [phrasetekster] 2. er der ikke id efter phrase_ , tjek om der er skrevet tekst, hvis der er det, så gem det i ny post i [phrasetekster] hvis ingen tekst, gør intet.
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Slettet bruger
07. juni 2007 - 19:38#1
ja da her har du løsningen til en access database og så går vi ud fra at det er alle tingene i din formular som skal i betragtning...:
<html> <body> <% if (request.form<>"" and isnull(request.form)=False) then
tekst = request.form strT = split(tekst,"&") for a=0 to ubound(strT) vaerdi = (split(strT(a),"=")(1)) if (vaerdi<>"" and isnull(vaerdi)=False) then Set conn = Server.CreateObject("ADODB.Connection") conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=c:\DinDatabase.mdb" id = (split(strT(a),"_")(1)) if isnumeric(id) then conn.execute("update phrasetekster set phrasetekster='" & vaerdi & "' where id='" & id & "'") else conn.execute("insert into phrasetekster (phrasetekster) values ('" & vaerdi & "')") end if conn.close set conn=nothing end if next end if %> <form action="<%=request.servervariables("script_name")%>" method="post"> <textarea name="phrase_3"></textarea> <textarea name="phrase_4"></textarea> <textarea name="phrase_"></textarea> <textarea name="phrase_"></textarea> <input type="submit" value="submit"> </form> </body> </html>
Du får lige hele koden, så er det måske nemmere at gennemskue for dig..
<table cellpadding="0" cellspacing="0"> <% Set rsSprog= Conn.Execute("select * from sprog order by tekst") Do until rsSprog.eof
Set rsTekster= Conn.Execute("select * from phrasetekster where phrase = " & rsPhrase("id") & " and sprogkode = " & rsSprog("sprogkode") & "") if rsTekster.eof or rsTekster.bof then Tekst = "" phrasetekstid = "" else Tekst = rsTekster("tekst") phrasetekstid = rsTekster("id") end if
- okay... det var en fejl jeg fik lavet her med id'en den er rettet nu og så skal det så således ud:
<html> <body> <% if (request.form<>"" and isnull(request.form)=False) then
tekst = request.form strT = split(tekst,"&") for a=0 to ubound(strT) vaerdi = (split(strT(a),"=")(1)) if (vaerdi<>"" and isnull(vaerdi)=False) then Set conn = Server.CreateObject("ADODB.Connection") conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=c:\DinDatabase.mdb" id = (split(strT(a),"_")(1)) id = (split(id,"=")(0)) if isnumeric(id) then conn.execute("update phrasetekster set phrasetekster='" & vaerdi & "' where id='" & id & "'") else conn.execute("insert into phrasetekster (phrasetekster) values ('" & vaerdi & "')") end if conn.close set conn=nothing end if next end if %> <form action="<%=request.servervariables("script_name")%>" method="post"> <textarea name="phrase_3"></textarea> <textarea name="phrase_4"></textarea> <textarea name="phrase_"></textarea> <textarea name="phrase_"></textarea> <input type="submit" value="submit"> </form> </body> </html>
Jeg har været nød til at lave lidt ændringer i dit script, da tabelnavne mv. ikke var korrekte, og databasen er åbnet et andet sted..
Så lige nu ser det sådan her ud.
if (request.form <> "" and isnull(request.form)=False) then
tekst = request.form strT = split(tekst,"&") for a=0 to ubound(strT) vaerdi = (split(strT(a),"=")(1)) if (vaerdi<>"" and isnull(vaerdi)=False) then strid = (split(strT(a),"_")(1)) strid = (split(strid,"=")(0)) if isnumeric(id) then Conn.Execute("update PhraseTekster set tekst='" & vaerdi & "' where id=" & strid & "") else Conn.Execute("insert into phrasetekster (tekst) values ('" & vaerdi & "')") end if end if next
response.redirect "./?S=Phrase&id=" & id end if
Den opdaterer fint eksisterende felter - men taster jeg tekst ind i felt som skal oprettes, får jeg fejlen:
Der er en syntaksfejl, fordi der mangler en operator. i forespørgselsudtrykket "id=".
Vil nødig presse mig på, men kunne du hjælpe mig lidt videre..?
Synes godt om
Ny brugerNybegynder
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.