2. ASPRunnerPro General questions
  3. MultilangMessage
This topic is locked

MultilangMessage

 		7/16/2006 1:14:20 PM
ASPRunnerPro General questions
S
 strasiak author

Hello every one

Could any body help me to use MultilangMessage for Labels and Name of the tables ?
Example:
Table: Customers

Fields: First Name, Surname, Date of birth, .... etc.


Code:
<%

Response.Write "</tr><tr><td class=shade>" & Label(rs.Fields("First Name").Name) & "</td>"

%>
<%

Response.Write "</tr><tr><td class=shade>" & Label(rs.Fields("Surname").Name) & "</td>"

%>
<%

Response.Write "</tr><tr><td class=shade>" & Label(rs.Fields("Date_of_Birth").Name) & "</td>"

%>
<%

Response.Write "</tr><tr><td class=shade>" & Label(rs.Fields("Address").Name) & "</td>"

%>Thank you
Thanks for quick response
Strasiak
Alexey admin 7/18/2006

Hi,
sure, you can do this.

You'll need to modify generated languages.asp and ..._aspfunctions.asp files in include folder.

At first open languages.asp and change Messages and MultilangMessages arrays this.

Change their sizes and add your labels to them.

I.e. this way. See my changes in bold.

Dim MultilangMessages(1,200)

...

Dim Messages(200)

...

Messages ( 171 ) = "FIELDS_CC"

Messages ( 172 ) = "EQUALS"

Messages ( 173 ) = "LABEL_FIELD1"

Messages ( 174 ) = "LABEL_FIELD2"

...

MultilangMessages(0, 173)="English label for Field1"

MultilangMessages(1, 173)="French label for Field1"

MultilangMessages(0, 174)="English label for Field2"

MultilangMessages(1, 174)="French label for Field2"


Then edit Label function in ..._aspfunctions.asp file.
Replace these lines:

if strField="Field1" then Label = "Field1" end if

if strField="Field2" then Label = "Field2" end if

with the following:

if strField="Field1" then Label = MultilangMessage("LABEL_FIELD1") end if

if strField="Field2" then Label = MultilangMessage("LABEL_FIELD2") end if