<% recid = Request.QueryString("id") set conntemp=server.createobject("adodb.connection") conntemp.Open "interchange" SQLstmt = "SELECT * FROM tblAssetFields WHERE Id=" & recid Set RS = conntemp.Execute(SQLstmt)%><% if recid<>0 then %>" height=110> |
| | <%=RS("AssetDescription")%> | Quantity:<%=RS("Quantity")%> | Manufacturer:<%=RS("Manufacturer")%> | <% if RS("Hold") = 0 then response.write("This item is available") else response.write("This item is on HOLD") end if %> | <% if RS("Liquidate") = 0 then response.write(" ") else response.write("Marked for liquidation") end if %> |
| <% if RS("Condition") = "5=Excellent/New" then response.write ("") response.write ("") response.write ("") response.write ("") response.write ("") end if if RS("Condition") = "4=Good, Light touch-up or cleaning needed" then response.write ("") response.write ("") response.write ("") response.write ("") end if if RS("Condition") = "3=Requires some touch-up/reupholstery" then response.write ("") response.write ("") response.write ("") end if if RS("Condition") = "2=Requires substantial touch-up/reupholstery"then response.write ("") response.write ("") end if if RS("Condition") = "1=Damaged beyond repair" then response.write ("") end if %> | Model #:<%=RS("ModelNumber")%> | Serial #:<%=RS("SerialNumber")%> | Misc. #:<%=RS("MiscNumber")%> | Room/Area:<%=RS("Room/Area")%> |
|   | Date Aquired:<%=RS("DateAcquired")%> | Disposal Date:<%=RS("DateDisposed")%> | Date Input:<%=RS("DateInput")%> | Last Changed:<%=RS("DateLastChange")%> |
|