<%@LANGUAGE="VBSCRIPT"%> <% ' FileName="Connection_odbc_conn_dsn.htm" ' Type="ADO" ' DesigntimeType="ADO" ' HTTP="true" ' Catalog="" ' Schema="" Dim MM_AdminDB_STRING 'MM_AdminDB_STRING = "dsn=Admin;uid=webuser;pwd=w3bus3r;" MM_AdminDB_STRING = "driver={SQL Server};server=131.244.3.77;uid=GeneralWebDBUser;pwd=Dx8^fjhy#2;" %> <% Dim Recordset1 Dim Recordset1_numRows Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_AdminDB_STRING Recordset1.Source = "SELECT DISTINCT COUNTRY FROM Agents WHERE (COUNTRY IS NOT NULL) ORDER BY COUNTRY ASC" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open() Recordset1_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %> Study at Bond University

Bond University Contact

International Contacts

For further information regarding applying to Bond University, please feel free to contact one of our authorised representatives in the following countries:

"><%=(Recordset1.Fields.Item("COUNTRY").Value)%>

Alternatively, on campus, you can contact the Office of Admissions via:

or you can use our On-Line Enquiry System.

CRICOS Provider 00017B |
© 2006 Bond University

<% Recordset1.Close() Set Recordset1 = Nothing %>