Special-märke i med vb-script

Vad menar du med specialmärken? Menar du att du vill ha saker som heter @txt1?

Nja, till exempel, men det går ju bra med vilket tecken som helst.
Tanken är så här.
Själva applikationen skall inte innehålla någon text alls, utan dessa märken. Sen via servervariables så tar jag reda på default språk, och låter då t ex @txt1 vara lika med "Välkommen". Skulle det vara som så att default språket är engelska eller tyska, då skall @txt1 vara lika med "Welcomme" eller "Wilkomen"(tror jag det heter).
Hanteringen av språkfilerna har jag löst. Anledningen till att jag vill ha ett sådant här märke(variabel) är att jag sedan skall tillverka en editor i VB som skall leta rätt på dessa märken(variabler) och göra lite kul grejer med det.

Så här eller?

Select Case Sprak
  Case "Tyska" : Innehall = Replace(Innehall, "@txt1", "Willkommen")
  Case "Svenska" : Innehall = Replace(Innehall, "@txt1", "Välkommen")
  Case "Engelska" : Innehall = Replace(Innehall, "@txt1", "Välkommen")
End Select

Men det är nog enklast att skriva hela texter i respektive språk, med tanke på grammatik osv.

Nja jag tror att dekt har missuppfattat mig.
Vad som är viktigt är att jag kan göra ett eget "märke", alltså en variabel, som tolken kan godkänna, och som det är lätt att leta rätt på.
D.v.s variablarna i märket skulle jag vilja ha som:
@txt1
@txt2
@btn1
@btn2
@txtr1
osv.
Märket i detta fallet är ju @, och det efterföljande är ju variablen.
Jag skulle ju kunna tänka mig att göra:
_txt1
_txt2
_btn1
_btn2
_txtr1
men det känns bättre med @.
PROBLEMET:
Tolken vill inte veta av den typ av kompination(@text1), det är därför som jag skriver hit och fråga.
Resten, dvs hur jag får dit språkfilerna är löst och klart.

Spara alla märken i en databas då, tillsammans med "översättningen". Sen loopar du och kör replace för att byta ut objRS("marke") med objRS("oversattning")

Jo det är ju ett alternativ, men jag tänkte försöka helt utan databas.
Det är möjligt att jag trots allt kommer dit han att jag måste ha det men....
Jag kanske skall göra som så att jag hitta på ett kufiskt ord, som inte betyder någonting, men som ändå är lätt att hitta?

Finns inte Dictionary i ASP? Ska kolla få se om jag hittar något om det.

Du kan ju alltid göra såhär om det känns bättre. :)

Dim d
Set d = Server.CreateObject("Scripting.Dictionary")

' För att lägga till
d("@txt1") = "innehåll"
d("@txt2") = "innehåll"

' För att komma åt
Response.Write d("@txt1")
Response.Write d("@txt2")

' För att ta bort
d("@txt1") = ""
d("@txt2") = ""

Jag tror inta att det kommer att fungera. Det är ju inte bara titlarna som skall med, utan hela textstycken plus namn på knappar mm.
Men tack för att du försöker.

Dictionary använder strängar vilket betyder att du kan skriva hur långa texter som helst. :)

d("s") = "v"
' Är lika rätt som
d("ngunsubgpuidsbhvuixdcbpvuiodxnuzivncdfuivbndizpufvbui") = "Jag tror inta att det kommer att fungera. Det är ju inte bara titlarna som skall med, utan hela textstycken plus namn på knappar mm. Men tack för att du försöker."

Templates kanske kan hjälpa dig på traven:
http://www.4guysfromrolla.com/webtech/091300-1.shtml