<%
theme = Request.Cookies("theme")
IF theme = "" THEN
theme="bg-theme1"
END IF
search = Request.Querystring("search")
'----------------------------------------------------Is this the IP address of a printer??? ----------------------------------------------
IF search <> "" THEN
strSQL = "Select printerid FROM printers where ipaddress='" &search &"'"
set rs = objconn.Execute(strSQL)
IF NOT rs.EOF THEN
printerid = rs("printerid")
objConn.Close
Response.Redirect "./displayprinter.asp?printerid="&printerid
END IF
END IF
'-------------------------------------------------------Is this the IP address of a PC---------------------------------------------------
IF search <> "" THEN
' PHASE 2: Query communications table instead of pc_network_interfaces
strSQL = "SELECT c.machineid FROM communications c JOIN machines m ON c.machineid = m.machineid WHERE c.address='" &search &"' AND m.pctypeid IS NOT NULL LIMIT 1"
set rs = objconn.Execute(strSQL)
IF NOT rs.EOF THEN
machineid = rs("machineid")
objConn.Close
Response.Redirect "./displaypc.asp?machineid="&machineid
END IF
END IF
'-----------------------------------------------------------------------------------------------------------------------------------------
subnetid = Request.Querystring("subnetid")
strSQL = "SELECT *,INET_NTOA(ipstart) AS subnetstart FROM subnets,subnettypes WHERE subnets.subnettypeid=subnettypes.subnettypeid AND subnets.isactive=1 AND subnetid="&subnetid
set rs = objconn.Execute(strSQL)
ipdiff = rs("ipend")-rs("ipstart")
'response.write(ipdiff)
%>