%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim head__MMColParam head__MMColParam = "1" If (Session("company") <> "") Then head__MMColParam = Session("company") End If %> <% Dim head Dim head_numRows Set head = Server.CreateObject("ADODB.Recordset") head.ActiveConnection = MM_ttdb_STRING head.Source = "SELECT * FROM head WHERE ID = " + Replace(head__MMColParam, "'", "''") + "" head.CursorType = 0 head.CursorLocation = 2 head.LockType = 1 head.Open() head_numRows = 0 %>
![]() ![]() |
|||
|
Recommended
Browsers To ensure that you are able to use and view our site as we intended we recommend that visitors use version 4 or higher of either Microsoft Internet Explorer or Netscape Communicator. If you do not have the latest versions please follow one of the links below to upgrade your browser. Microsoft Internet Explorer PC version Macintosh version Netscape Communicator PC version Macintosh version |
|
| Legal
Notice Contact
Us Information about browser requirements |