<%@Language = "VBScript"%> <% Option Explicit Response.Buffer = True Response.Expires = -1000 %> <% Dim strLanguage strLanguage = "" & Session("MyLanguage") Application.Lock Application("INIFile") = LoadINIFile(Server.MapPath("chat_ini.asp")) Application.Unlock If strLanguage = "" Then strLanguage = "" & IniFileValue(Application("INIFile"), "Languages", "ChatLanguage") End If Response.Write OutputINISection(Application("INIFile"), strLanguage) Response.Flush Response.End %>