Standardize share toast notifications and fix PC scanning/editing

Share Toast Notifications:
- Unified toast style across all pages (purple gradient, top-right position)
- Updated displayapplication.asp, displaytopic.asp, displayudc.asp
- Updated printerlinksgenerator.asp (replaced alert with toast)
- Same text: "Link Copied!" / "This link will show the search term..."

PC Scanning/Editing Fixes:
- savedevicedirect.asp: Use machinetypeid=33 to detect PCs (not pctypeid)
- savedevicedirect.asp: Use new Dell TBD model (ID 110) for new PCs
- editpc.asp: Model dropdown includes current model even if vendor ispc=0
- editpc.asp: Fixed vendor query to use ispc=1 instead of ismachine=1

Database changes (manual):
- Set ispc=1 for Dell, Dell Inc., DellInc., HP vendors
- Created Dell TBD model (ID 110) as default PC model

🤖 Generated with [Claude Code](https://claude.com/claude-code)

Co-Authored-By: Claude Opus 4.5 <noreply@anthropic.com>

editpc.asp

@@ -276,9 +276,10 @@ Set rsMachineStatus = Nothing
                           <option value="">-- Select Model --</option>
 <%
 	Dim rsModels
-	strSQL = "SELECT models.*, vendors.vendor FROM models " &_
+	' Include all PC vendor models PLUS the currently selected model (in case it's from a non-PC vendor)
+	strSQL = "SELECT models.modelnumberid, models.modelnumber, vendors.vendor FROM models " &_
 			"INNER JOIN vendors ON models.vendorid = vendors.vendorid " &_
-			"WHERE vendors.ispc = 1 AND models.isactive = 1 " &_
+			"WHERE (vendors.ispc = 1 AND models.isactive = 1) OR models.modelnumberid = " & CLng(modelid) & " " &_
 			"ORDER BY vendors.vendor ASC, models.modelnumber ASC"
 	Set rsModels = objconn.Execute(strSQL)
 	While Not rsModels.EOF
@@ -317,7 +318,7 @@ Set rsMachineStatus = Nothing
                             <option value="">-- Select Vendor --</option>
 <%
 	Dim rsVendors
-	strSQL = "SELECT * FROM vendors WHERE ismachine = 1 AND isactive = 1 ORDER BY vendor ASC"
+	strSQL = "SELECT * FROM vendors WHERE ispc = 1 AND isactive = 1 ORDER BY vendor ASC"
 	Set rsVendors = objconn.Execute(strSQL)
 	While Not rsVendors.EOF
 		Response.Write("<option value='" & rsVendors("vendorid") & "'>" & Server.HTMLEncode(rsVendors("vendor")) & "</option>")