<%
Dim connstr As String
Dim conDBID As SqlConnection
Dim cmdlastupd As SqlCommand
Dim dtrEvent As SqlDataReader
connstr = ConfigurationManager.ConnectionStrings("ifphk_connection").ConnectionString
conDBID = New SqlConnection(connstr)
conDBID.Open()
%>