CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

tinebn Nybegynder

04. december 2002 - 23:51 Der er 11 kommentarer og
1 løsning

kodestump til input i database

hej
Jeg har en database med 10 poster og der bliver ikke flere
værdierne i disse felter skal kunne ændres jeævnligt med ny´tekst som så bliver vist på en html side

jeg har min formside
hvis jeg har defineret keyfelter på forhånd i access og de hedder fra 1 og 2 og 3 og 4 og til 10 poster

kan jeg så skrive sådan her for at definere hvilken post der skal tilføjes/ændres data i

<input type="textbox" name="6" id="6"><%= rs("model") %>

er det name feltet og så key feltet der skal tale sammen.?

Synes godt om

blom Nybegynder

05. december 2002 - 13:18 #1

Hej

Nej du blive nød til at sende dine input til et ASP script, og fange dem med f.eks. med Request.Form.Item(x) og gemme dem i databasen.

Synes godt om

tinebn Nybegynder

05. december 2002 - 13:52 #2

hvad er forskel på at bruge item og så key?
når jeg har 10 rækker og 7 kolloner.......
hvordan kan aspen defineres så den smider den rigtige tekst i row 5 = id5 col 3 var= model uden at der tilføjes nye felter....... det må den ikke

Synes godt om

tinebn Nybegynder

05. december 2002 - 14:05 #3

hej

kan koden se sådan her ud inden den sendes til databasen?
<input type="hidden" name="id5" value="<% =Request.Form.item("model") %>

Synes godt om

blom Nybegynder

05. december 2002 - 14:27 #4

Hej
Jeg opfatter at du via browseren vil opdatere databasen, det håber jeg er korekt.
Request anvendes til at fange den tekst string der sendes når SUBMIT er udført i en FORM, og bliver send til ACTION siden.
Mens VALUE="<%rs("model")%>" vil vise det der er i db'en, men når der indtastes en ny tekst skal den SUBMIT'tes - fanges og gemmes.

Synes godt om

tinebn Nybegynder

05. december 2002 - 15:43 #5

hej

ja jeg vil via browseren ønsker at opdatere databasen.!

jeg kan godt se den kan oprette en nyt sæt rs hvergang der sendes en request
men databasen.
jeg vil kun have 10 poster hvordan definere jeg de unikke felter i min access database i asp......

<%=Request.Form.item(("model")id(Tine)) %> *S*

Synes godt om

blom Nybegynder

06. december 2002 - 00:41 #6

Hej igen tinebn
Beklage at jeg var nød til løb.
men her er et eks. med 3 poster det vil være det samme som 10 poster (resten er kun gentagelser af de 3)

Vis ikke alle skal kunne opdatere bliver det til tre ASP sider.
1. Hvor teksten vises til alle (ikke medtaget i eks.)
2. Til at opdatere
3. Til at opdatere Databasen(tabelen)
(For ikke skulle skive en afhandling er der ikke pýnt mm. men vil virke)

Side2.asp
<%
' VB ASP -- Start
Dim Conn
Dim RS
Dim strDSN
Dim arr(2) 'basen er 0 dvs. 0,1,2 (0..2) er der i arr(2)
Dim I
Dim NoOfRec
Set Conn = Server.Createobject("ADODB.Connection")
'--- Database forbindelse ---
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)}; " &_
"DBQ=" & Server.Mappath("db/Birkemos.mdb") & "; password=test"
Conn.Open strDSN
'--- SQL forspøgelse ---
Set RS = Conn.Execute("SELECT * FROM Vare ORDER BY VareNavn;")
'--- Indlæs data til arr ---
NoOfRec = 3
RS.MoveFirst
I = 0
Do While Not RS.EOF Or I > 2
arr(I) = RS("Teksten") ' Jeg har kaldt feltnavnet teksten
RS.MoveNext
I = I + 1
Loop
RS.close
Conn.Close
Set RS = nothing
Set Conn = nothing
' VB genereres i ASP -- End
%>

<FORM METHOD="Post" ACTION="Side3.asp" id=form1 name=form1>

Synes godt om

blom Nybegynder

06. december 2002 - 01:35 #7

Det blev for lang jeg forsætter fra <FORM men lige en rettelse
Linie -> Set RS = Conn.Execute("SELECT * FROM Vare ORDER BY VareNavn;")
Skal se sådan ud -> Set RS = Conn.Execute("SELECT * FROM Tekst3 ORDER BY TekstNr;")

<FORM METHOD="Post" ACTION="Side3.asp" id=form1 name=form1>

<INPUT TYPE="TEXT" NAME=Txt0 SIZE="50" VALUE="<%=arr(0)%>">
<INPUT TYPE="TEXT" NAME=Txt1 SIZE="50" VALUE="<%=arr(1)%>">
<INPUT TYPE="TEXT" NAME=Txt1 SIZE="50" VALUE="<%=arr(2)%>">
<INPUT TYPE="Submit" VALUE="Gem" name=Submit>
</FORM>

</HTML>
Side2.asp slut

Synes godt om

blom Nybegynder

06. december 2002 - 01:54 #8

Database : Eks. birkemos.mdb
tabel : Tekst3
Felt : TekstNr
felt : Teksten
------------------------------------------
TekstNr Teksten
------------------------------------------
0 Den første tekst
1 Den anden tekst
2 Den trejde tekst

side3.asp start
<HTML>
<%
' VB genereres i ASP -- Start
Dim c39
Dim Conn
Dim arr(2)
Dim strDSN
Dim I
c39 = Chr(39)
'--- Database connection ---
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)}; " &_
"DBQ=" & Server.Mappath("db/Birkemos.mdb") & "; password=test"
Set Conn = Server.Createobject("ADODB.Connection")
Conn.Open strDSN
For I = 0 To 2
arr(0) = cStr(Request.Form.Item(I))
strSQL = "UPDATE TextFlds SET [Teksten] = " + c39 + arr(0) + c39
strSQL = strSQL + " WHERE [TekstNr] = "
strSQL = strSQL + Trim(cStr(I)) + ";"
Conn.Execute(strSQL)
next
Conn.Close
Set Conn = nothing
%>

<BODY>
<DIV align="center">
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<B>Tekster gemt . . . . 0..2 </B>
<FORM METHOD="Post" ACTION="Side1.asp" id=form2 name=form2>
<BR>
<BR>
<INPUT TYPE="Submit" VALUE="Retur" name=Submit>
</FORM>

</BODY>
</HTML>

Synes godt om

tinebn Nybegynder

08. december 2002 - 00:14 #9

Hej
der er masser at kikke på her........ tak for hjælpen

hvordan lukker jeg her?

Synes godt om

pelkjaer Nybegynder

08. december 2002 - 00:19 #10

Mon ikke du skulle bede blom lægge et svar?

Har han af en eller anden årsag ikke lyst til det, lægger du bare selv et svar og accepterer dette.

Synes godt om

blom Nybegynder

08. december 2002 - 11:42 #11

Hej

Det har noget kode jeg havde fra en opgave, renset for check og error handling for ikke at forvirre billede, det er ikke testet men jeg mener at det virker, hvis Db'en er placeret rigtigt.

Opgaven kan du se på www.birkemosegaard.dk hvor både tekster og vareliste mm. kan opdateres via browseren.

Synes godt om

tinebn Nybegynder

16. december 2002 - 08:36 #12

Hej

tak for hjælpen blom

kh
Tine

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Se alle it-kurser fra Computerworld Kurser

IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

Se alle it-kurser

Flere spørgsmål fra Småopgaver kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Udregning af vinkel på brædder. Af Peter i Småopgaver	14	11/12/202415:12	13/12/202415:40
Dos program til at rette i .txt filer Af scharff i Småopgaver	10	11/12/202408:52	12/12/202410:45
Beregning af modstand Af Børge Skindhøj i Småopgaver	3	18/11/202414:32	18/11/202417:38
Bistand søges til Wordpress, kalenderfunktion og infoskærme. Af Jens Andreas i Småopgaver	1	13/09/202411:29	14/09/202415:48
Hjælp til at skrive opgave Af Needhelp i Småopgaver	0	05/07/202422:41	-

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS

23/12

Historisk million-bøde får Region Syddanmarks it-direktør til at efterlyse nye GDPR-retningslinjer

23/12

Til næste år kommer iPhone 17 – og ifølge rygtestrømmene vil den byde på tre nyheder

23/12

En af verdens største it-distributører dropper samarbejdet med Broadcom: Kunne ikke nå til enighed

23/12

Ser med 'stor alvor' på problemer med vand, varme og manglende kontrol i politiets datacenter

23/12

Brugere rammes af Microsoft-fejl: M365-produkter er på mystisk vis blevet deaktiveret

23/12

Her er dommen: Region Syddanmark skal betale historisk stor bøde for grove overtrædelser af GDPR

23/12

Vores vidensindsamling og demokratiske samtale påvirkes af helt lukkede beslutninger i en enkelt privat virksomhed

23/12

Overblik: Danske it-selskaber strømmer ind mod den centrale storby - og det handler ikke om penge

23/12

Banebrydende ChatGPT-opdatering er lige på trapperne: “Denne model vil være helt fantastisk til programmering”

23/12

Tivoli søger ny CIO: Kenneth Hartvig stopper efter tre år på posten

23/12

Vi ender med at bo i en taber-region, hvis ikke vi gør noget drastisk - her er digitaliseringsministerens plan

Vis flere artikler

IT-JOB

Dynamicweb Software A/S

Solution Architect

Region Midtjylland

Strategisk og visionær leder, der kan se muligheder, til Sikkerhed og Compliance i Region Midtjylland

Statens IT

Teamleder til Statens Its Servicedesk

Jyske Bank

Data transformation lead

Region Midtjylland

It-specialist til patologi-team i et dynamisk område i Digitalisering og It

Vis flere jobs

Seneste spørgsmål Seneste aktivitet

I går 16:03	Fjern "Seneste" - "Hurtig adgang" Fra Windows 11 - Hvordan ? Af Ikke-ekspert i Windows
23/1214:43	html <Input.. Danske bogstaver Af pjotre i Andet software
23/1214:35	Brænde musik fra usb drev til cd Af Caso i Andet hardware
21/1222:16	Er "OneDrive" et "Must" ? Koster det penge ? Af Ikke-ekspert i Windows
21/1216:42	Windows Media Player - Hvilken version (Versioner) er gode til at afspille og kopiere ? Af Ikke-ekspert i Musik & videoafspillere