<% theme = Request.Cookies("theme") IF theme = "" THEN theme="bg-theme1" END IF Dim pcid, isScanned pcid = Request.QueryString("pcid") isScanned = Request.QueryString("scanned") ' Validate pcid If Not IsNumeric(pcid) Or CLng(pcid) < 1 Then Response.Write("Invalid device ID") Response.End End If ' Get PC data using parameterized query Dim strSQL, rs strSQL = "SELECT pc.*, pcstatus.pcstatus, pctype.typename " & _ "FROM pc " & _ "LEFT JOIN pcstatus ON pc.pcstatusid = pcstatus.pcstatusid " & _ "LEFT JOIN pctype ON pc.pctypeid = pctype.pctypeid " & _ "WHERE pc.pcid = ?" Set rs = ExecuteParameterizedQuery(objconn, strSQL, Array(CLng(pcid))) If rs.EOF Then Response.Write("Device not found") Response.End End If %>
Edit Device - <%=Server.HTMLEncode(rs("serialnumber"))%>
Back to Scan
<% Dim errorType, errorMsg errorType = Request.QueryString("error") errorMsg = Request.QueryString("msg") If isScanned = "1" Then %>
Device already exists! Update the details below.
<% ElseIf errorType = "required" Then %>
Error! Status is required.
<% ElseIf errorType = "db" Then %>
Database Error: <%=Server.HTMLEncode(errorMsg)%>
<% End If %>
" readonly>
" placeholder="e.g., DESKTOP-ABC123">
" placeholder="e.g., 101">
>
Default: Active (checked)
<% rs.Close objConn.Close %>