<%@ Language=VBScript EnableSessionState=False %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<TITLE>Microsoft Exchange Chat Service Documentation</TITLE>
<SCRIPT LANGUAGE="VBScript"><!--
Function Dec(strHex)
Dec = InStr("123456789ABCDEF", UCase(Left(strHex,1))) * 16
Dec = Dec + InStr("123456789ABCDEF", UCase(Mid(strHex,2,1)))
End Function
Function FixHex(ByVal strURL)
Dim x
FixHex = ""
x = InStr(1,strURL,"%")
Do While (x > 0)
FixHex = FixHex & Left(strURL,x-1)
FixHex = FixHex & Chr(Dec(Mid(strURL,x+1)))
strURL = Mid(strURL,x+3)
x = InStr(1,strURL,"%")
Loop
FixHex = FixHex & strURL
End Function
Sub TOCSynch_Click()
MyUrl=parent.main.location
x=InStr(MyUrl,"/chat/")
NewUrl=FixHex(Mid(MyUrl,x+6)) ' 6 = len("/chat/")
MsgBox "MyUrl=" & MyUrl & vbCrLf & "NewUrl=" & NewUrl
call hhctrl.syncURL(NewUrl)
call hhctrl.syncURL(NewUrl)
End Sub
Sub TOCPrint_Click()
TOCSynch_Click
call hhctrl.Print()
End Sub
--></SCRIPT>
</HEAD>
<BODY bgcolor="black">
<SPAN STYLE="position: relative; left: 0; top: 4">
<IMG SRC="Cont.gif" border="0" alt="Contents">
</Span>
<SPAN STYLE="position: relative; left: -4; top: 4">
<A HREF="Index.asp"><IMG SRC="NoIndex.gif" border="0" alt="Index"></A>
</Span>
<SPAN STYLE="position: relative; left: -8; top: 4">
<A HREF="Search.asp"><IMG SRC="NoSearch.gif" border="0" alt="Index"></A>
</Span>
<table width="262" height="31" border="0" cellspacing=2 bgcolor="white" bordercolor="white">
<TR><TD width="208"> </TD>
<TD align="right">
<SPAN STYLE="position: relative; left: 1; top: 0">
<a name="Ptoc" href="#Ptoc" onclick="TOCPrint_Click()">
<img src="print.gif" border="0" alt="Print the current topic or node"></a>
</SPAN>
</td>
<td align="left">
<a name="Stoc" href="#Stoc" onclick="TOCSynch_Click()">
<img src="synch.gif" border="0" alt="Synchronize the TOC with the right-hand frame"></a>
</td>
</tr>
</table>
<OBJECT id=hhctrl type="application/x-oleobject"
classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11"
codebase="../../common/alpha.cab"
width="262"
height="74%">
<PARAM name="Command" value="Contents">
<PARAM name="flags" value="0x0,0x35,0xFFFFFFFF">
<PARAM name="Item1" value="chatsvr.hhc">
</OBJECT>
</BODY>
</HTML>
