02. maj 2002 - 19:08Der er
17 kommentarer og 1 løsning
Replace forskellige tal med tekst fra database
Jeg sidder og er ved at lave en side som skal kunne læses på forskellige sprog, derfor har jeg tænkt mig at lave en form for sprog versionering.
Derfor har jeg bestemt at jeg vil ligge alle mine grundsætninger i en db, og så skrive eks (12) som så referere til den kolonne som har ID dvs den skal tage den sætning som er i databasen som har id 12.
Da jeg kan oprette sider online skal det gerne være en funktion som kan regne ud af hvis der er to ( ) uden om skal den replace - hvordan laver jeg sådan noget ?
Har siddet og rodet med det hele dagen men syntes ikke helt at kunne få lavet noget som virker.
Efter ti år i London, Madrid, Paris og Utrecht kommer Sabios AI-fokuserede program af arrangementer om kundeoplevelser, ‘Disrupt’, for første gang til Danmark.
undskyld har læst dit gamle igen, men tror altså at der også skal være lidt javascript med i det. Skal nok lige prøve at se om jeg kan hitte ud af det..
Det jeg vil er at hvis jeg eks skriver (14) så skal jeg have en funktion som skal tage 14 og replace det med den sætning som står i database tabellen sentence som har id nr 14.
Nb. ligemeget hvilket tal jeg skriver mellem de 2 () skal den prøve at replace det, og da det hele køre online (så jeg kan lave nye artikler/sider online) kan ikke vb scripte direkte fra db'en dvs det skal være en funktion som er lavet på forhånd så hvis jeg går ind og opretter en ny sætning og så derefter går ind og skriver dens id eks (15) skal det virke med det samme uden jeg skal til at rediger en masse kode.
Du laver blot en lille seperator der skal se sådan her ud.
'strNr er den streng som indeholder nummeret, som er blevet indtaste for 'lidt siden. 'tekstboks er navnet på din tekstboks(der hvor brugeren indtaster sit nummer.)
strNr = Request.Form("tekstboks") 'alle steder hvor tegenet ( står, står der nu ingenting. strNr = Replace(strNr, "(", "") 'alle steder hvor tegenet ) står, står der nu heller ingenting. strNr = Replace(strNr, ")", "")
Nej har du ikke et sted hvor du taster værdierne ind, i mit tilfælde er det bare en tekstboks inden i en form. Så skriver du bare (5) og så skulle den gerne hente sætningen hvor ID = 5, ikk'.
Lave en dataforbindelse, og hente de oplysninger jeg skal bruge.
strSQL = "Select * From Tabel Where Id = '" & strNr & "'" set rs = Conn.Execute(strSQL) 'Lav en streng der henter præcis de oplysninger vi vil ha, 'fra feltet hvor oplysningerne ligger (Tekstfeltet) If Not (rs.BOF Or rs.EOF) Then strTekst = rs("Tekstfeltet") End If
Derefter ville jeg gå ned i dokumentet et eller andet sted mellem <body> tags'ne og skrive
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.