function getstring(instring)

　　temp=selectednode._

　　selectSingleNode _

　　(instring).text

　　getstring= _

　　server.htmlencode(temp)

　　end function

　　getstring()函数的输入值是元素名，元素值要从XML文档中取回。比如，将"firstname"传递给getstring()，getstring函数就选择firstname元素并返回它的文本数值。为保险起见，在返回给调用者前，我们使用ASP的server.htmlencode方法转换文本为合法的HTML代码。在ASP页面中，调用代码类似如下：

　　<td>

　　<%=getstring("firstname")%>:

　　</td>

　　如果选择了XML文档的English部分，HTML输出结果如下：

　　<td>First name:v/td>

　　如果选择了French，HTML输出结果如下：

　　<td>Prénom:</td>

选择可用语言
　　XML的一大优势就是它是以清晰的文本格式保存，我们能够在任何时候更新Web服务器上的XML文件。而且，我们还可以将English版本的xmltrans.xml文件在XML编辑器XML NotHPad中打开，复制一份，然后将其中文字翻译为一种新语言。

　　为了使添加的语言立即生效，要增加一个程序，用它判断文件中不同语言的种类数量，并返回语言代码和语言名称。如下面的代码段所示，我们可以将数据格式化处理以创建一个HTML列表框。当用户提交表单时，2字母表示的语言种类代码被存储到ASP会话变量choselang中。

　　<select name="chosenlang">

　　<%

　　for i=0 to selectednodes.length - 1

　　 response.write "<option value=" & _

　　 chr(34) & _

　　 selectednodes.item(i)._

　　selectSingleNode("lang").text & chr(34)

　　 if (selectednodes.item(i)._

　　selectSingleNode("lang").text = _

　　session("chosenlang")) then

　　 response.write " selected>"

　　 else

　　 response.write ">"

　　 end if

　　 response.write selectednodes.item(i)._

　　selectSingleNode("langname").text & _

　　"</option>" & vbcrlf

　　next

　　%></select>

添加提示信息以及字符集数据
　　上面使用XML提供了HTML表单的可变语言文字显示，接着还要考虑一些更丰富的用途。比如说，要在选择语言时添加一个提示信息，只需要在文字前后嵌入HTML标记<LABEL>，并从XML中提供可变内容作为title属性值。同理，为了帮助浏览器识别HTML页面的语言种类，将字符集信息保存到XML文件中，比如：

　　<charset>x-sjis</charset>

　　然后，就可以使用ASP将字符集类型插入到HTML流中：

　　<meta HTTP-EQUIV="Content-Type" content="text/html; charset=

　　<%=getstring("charset")%>" />

　　最后的HTML代码包括了Japanese字符集参考：

　　<meta HTTP-EQUIV="Content-Type" content="text/html; charset=x-sjis" />

　　下图显示了使用Japanese字符集的页面。记住，要看到正确的内容，操作系统以及浏览器必须支持Unicode并安装了相应字符。否则，就会看到一些奇怪的文字，可能是一些问号，也可能是一些方块符号等等。

总结
　　本文讲述了如何使用XML文件保存Web页面的语言字符串。从中我们学会了使用ASP脚本程序并借助微软XML解析器和W3C的XPath语言实现查询XML文档的功能。ASP代码将包含字符集类型的可变文字插入到HTML流中，并形成列表框以让用户选择可用语言。本文涵盖了许多内容，但我想这只是一个起点。虽然可以在支持XML的浏览器中简单地实现这些功能，但我们已经看到：使用服务器端脚本可以转换XML数据为普通的HTML内容，即使是早期版本的浏览器，同样能够看到这些精彩内容。