Simpel oversætter

Vil du til at inskrive en hel ordbog?

Så kan du jo bare gå i gang.... (f.eks dansk/engelsk):


strTekst = objRS(\"databaseudtræk\")

strTeskt = Replace(strTekst, \"en\", \"one\")
strTeskt = Replace(strTekst, \"to\", \"two\")
strTeskt = Replace(strTekst, \"tre\", \"three\")
strTeskt = Replace(strTekst, \"fire\", \"four\")

.. ville nok tage en tid for asp ISAPI\'en at \"høvle igennem\"...

Ellers har jeg misforstået dit spm. :o)

... ellers følg linket \"Translate this page\" i menuen til højre her på siden, hvis det var noget ala det du havde tænkt dig.

Tabel:

Language_ID 1 = Dansk
Language_ID 2 = Engelsk

Language_ID    Translation_Name    Translation_Vaerdi
-------------------------------------------------------
1              txtName              Navn
2              txtName              Name
1              txtCode              Kode
2              txtCode              Code
1              txtError            Fejl
2              txtError            Error

Funktion:

Function Translation(byRef Text)
    SqlQ = \"Select_tbl_Translation \" & cParam(Text) & \",\" & cParam(IntLang)
    Set rSqlQ = Connection.Execute(SqlQ)
    If Not rSqlQ.Eof Then
          Translation = rSqlQ(\"Translation_Vaerdi\")
    Else
      Translation = Translation(\"txtError\")
    End If
End Function

Translation(\"txtDenneTekstSkalOversættes\")

smajli -> hehe, nej jeg vil bare oversætte et par engelt ord... fx. som pornolize.com gør

aaah... så er jeg lidt mere med :o)