Avatar billede simonsen2 Nybegynder
17. november 2000 - 11:48 Der er 10 kommentarer og
1 løsning

Tekst mellem record

Jeg skal have en formular hvor jeg skal udskrive data på tre forskellige sprog.
Dansk, Engelsk, Svensk
Hvor skal jeg flette dansk, engelsk og svensk ind så de kommer til at stå foran
rs(\"value\")



Response.Write \"<tr><td>Dansk:</td>\"
           
    Do Until rs.eof
       
    if gl_value <> trim(rs(\"value\")) then
        tbl = tbl & \"</tr>\"
        gl_value = trim(rs(\"value\"))
           
    end if
           
Response.Write \"<tr><td><input type = text value=\"\"\" & rs(\"value\")&\"\"\" name=dansk size=27></td></tr>\"

rs.movenext
           
               
loop
Avatar billede kasseper Nybegynder
17. november 2000 - 13:31 #1
Jeg er ikke sikker på at jeg forstår...
Er det sådan at det skal stå sådan her :

Dansk: Hej
Svensk: Hejsan
Engelsk: Hello

Hvad indeholder rs(\"value\") ??
Er det Hej-Hejsan-Hello eller det skudt helt forbi ????
Prøv at give et eksempel på hvordan det skal se ud, og hvad rs(\"value\") ser ud.
Kasseper
Avatar billede simonsen2 Nybegynder
17. november 2000 - 13:35 #2
Det er helt rigtigt forstået!

rs(\"value\") indeholder Hej, Hejsan og Hallo
Avatar billede kasseper Nybegynder
17. november 2000 - 13:36 #3
Er det som en streng altså rs(\"value\") = \"hej hejsan hello\" eller er der en anden seperator ?
Avatar billede simonsen2 Nybegynder
17. november 2000 - 13:40 #4
Nej, det er 3 forskellige værdier som du selv skriver
rs(\"value\")=dansk-tekst
rs(\"value\")=svensk-tekst
rs(\"value\")=engelsk-tekst

Dansk: Hej
Svensk: Hejsan
Engelsk: Hello
Avatar billede kasseper Nybegynder
17. november 2000 - 13:46 #5
OK, nu tror jeg at jeg har forstået, brygger lige på noget
Avatar billede kasseper Nybegynder
17. november 2000 - 13:51 #6
Hvordan er det så lige det skal være, skal der stå Dansk også kommer alle de ord der findes med dansk i nedenunder,

dansk:
        hej
        mor
        far

Svensk:
        hejsan
        mama
        papa

Engelsk
        hello
        mother
        father

Eller skal det bare komme på en lang liste :

Dansk : hej
Svensk : hejsan
Engelsk : hello
Dansk : mor
Svensk : mama
Engelsk : mother
Dansk : far
Svensk : papa
Engelsk : father

Eller hur ?

P.S. Nu må jeg desvære tage en lille puster fra skærmen, så må jeg jo bare håbe på at der ikke er nogen der hurtigere end jeg er tilbage........
Avatar billede simonsen2 Nybegynder
17. november 2000 - 14:00 #7
Jeg har i forvejen valgt (via link) at jeg kun vil se et ord men i de 3 valgte sprog, derfor vil der kunne komme en række ud, jeg får også værdierne hej, hejsan og hello skrevet ud under hinanden - men kan ikke i en celle ved siden af få
dk,eng og sv med som almindelig tekst.

Dansk : hej
Svensk : hejsan
Engelsk : hello
Avatar billede kasseper Nybegynder
18. november 2000 - 11:12 #8
Hej igen, sjovt at der ikke er nogen andre der er kommet med et bud, hm, anyway,
Så kan du gøre sådan her :

1) Det kræver at din rs(\"value\") altid har formen : \'sprog - ord\', men det har den iflg. det du har skrevet, ik ?

2) her er koden hvis (1) er opfyldt :

<%
response.write \"<table>\"
Dim st,placering,sprog,ord
While NOT rs.EOF

st = rs(\"value\")
placering = Instr(1,st,\"-\",1)
sprog = left(st, (placering-1))
ord = Right(st,(len(st) - (placering + 1)))

response.write \"<tr><td><b>\" & sprog & \"</b></td><td><b> : </b></td><td>\" & ord & \"</td></tr>\"

wend 
response.write \"</table>\"
%>

---------------------------------------------------------------------------------------

Tjeps så skulle den være hjemme !
Avatar billede kasseper Nybegynder
18. november 2000 - 11:13 #9
UPS, mangler lige en ting :

<%
response.write \"<table>\"
Dim st,placering,sprog,ord
While NOT rs.EOF

st = rs(\"value\")
placering = Instr(1,st,\"-\",1)
sprog = left(st, (placering-1))
ord = Right(st,(len(st) - (placering + 1)))

response.write \"<tr><td><b>\" & sprog & \"</b></td><td><b> : </b></td><td>\" & ord & \"</td></tr>\"
rs.movenext
wend 
response.write \"</table>\"
%>


Avatar billede simonsen2 Nybegynder
20. november 2000 - 13:07 #10
Jeg fandt langt om længe selv en løsning, men som tak for indsatsen fordeles der alligevel point ud.
Tak for hjælpen!!

Dim ord
  dim count, dansk, engelsk, svensk
  count = 0
  Response.Write \"<tr><td> Page_id: </td><td><input type=text value=\"\"\" & rs(\"page_id\")&\"\"\" name=page_id size=10></td></tr>\"
        Response.Write \"<tr><td> Frasename: </td><td><input type=text value=\"\"\" & rs(\"fraseName\")&\"\"\" name=frasename size=27>\"   
        Do Until rs.EOF
        ord = rs(\"value\")
        if count = 0 then
            response.write \"<tr><td>Dansk:</td><td><input type=text value=\"\"\" & ord & \"\"\" name=dansk size=27></td></tr>\"
        end if
        if count=1 then
            response.write \"<tr><td>Engelsk:</td><td><input type=text value=\"\"\" & ord & \"\"\" name=engelsk size=27></td></tr>\"
        end if
        if count = 2 then
            response.write \"<tr><td>Svensk:</td><td><input type=text value=\"\"\" & ord & \"\"\" name=svensk size=27></td></tr>\"
        end if
        count = count+1
        rs.movenext
        loop
        Response.Write \"<tr><td><input type=submit value=Rediger name=rediger></td>\"
        response.write \"</table>\"
Avatar billede simonsen2 Nybegynder
20. november 2000 - 19:25 #11
Lige et spørgsmål:

Hvad er eller gør wend ?
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
Kurser inden for grundlæggende programmering

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