<%
Set DataConnection = Server.CreateObject("ADODB.Connection")
DataConnection.Open "DBQ=" & Server.Mappath("database/staff.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"
Set cmdDC = Server.CreateObject("ADODB.Command")
cmdDC.ActiveConnection = DataConnection
SQL = "SELECT * FROM client_info WHERE client = " & Request.Form("client_no")
cmdDC.CommandText = SQL
Set RecordSet = Server.CreateObject("ADODB.Recordset")
RecordSet.Open cmdDC, , 0, 2
If RecordSet.EOF Then
RecordSet.Close
Set RecordSet = Nothing
Set cmdDC = Nothing
DataConnection.Close
Set DataConnection = Nothing
Response.Redirect "staff_login2.html"
Else If (ucase(RecordSet.Fields("name")) <> ucase(Request.Form("name"))) Then
RecordSet.Close
Set RecordSet = Nothing
Set cmdDC = Nothing
DataConnection.Close
Set DataConnection = Nothing
Response.Redirect "staff_login2.html"
End If
End If
RecordSet.Close
Set RecordSet = Nothing
Set cmdDC = Nothing
DataConnection.Close
Set DataConnection = Nothing
%>
Australian Nursing Federation
PROFILE
The South Pacific Nurses Forum was formed in 1982 by South Pacific Nurses who were attending the 1980 International Council of Nurses in Los Angeles, USA and has met in a different location in the South Pacific every two years since then.
Clinical nurses, nurse managers, nurse educators and nurse leaders from across the South Pacific attend the Forum to discuss and debate key issues of importance to nurses and nursing.
Secretariat, Australian Nursing Federation, Level 1, 365 Queen Street, Melbourne, VIC, Australia 3000