e382a3246e
- Fix dualpath PC propagation direction (Equipment->PC) in api.asp and db_helpers.asp - Fix early exit in CreatePCMachineRelationship preventing propagation - Fix getShopfloorPCs to filter machinetypeid IN (33,34,35) instead of >= 33 - Fix getShopfloorPCs to show equipment numbers via GROUP_CONCAT subquery - Add detailed PropagateDP logging for dualpath debugging - Default "Show on Shopfloor Dashboard" checkbox to checked in addnotification.asp - Add USB label batch printing, single USB labels, and USB history pages - Add printer supplies tracking and toner report enhancements - Add uptime map visualization page - Add dashboard/lobby display SQL migration - Update CLAUDE.md with IIS 401 workaround documentation - Update TODO.md Co-Authored-By: Claude Opus 4.5 <noreply@anthropic.com>
35 lines
1.1 KiB
Plaintext
35 lines
1.1 KiB
Plaintext
<!--#include file="config.asp"-->
|
|
<%
|
|
' Employee database connection - uses centralized config
|
|
Dim objConn, empConnError
|
|
empConnError = ""
|
|
Session.Timeout = APP_SESSION_TIMEOUT
|
|
|
|
On Error Resume Next
|
|
Set objConn = Server.CreateObject("ADODB.Connection")
|
|
objConn.ConnectionString = GetEmployeeConnectionString()
|
|
objConn.Open
|
|
If Err.Number <> 0 Then
|
|
empConnError = "Employee DB Connection Error: " & Err.Number & " - " & Err.Description & " (Source: " & Err.Source & ")"
|
|
Err.Clear
|
|
End If
|
|
On Error Goto 0
|
|
|
|
Set rs = Server.CreateObject("ADODB.Recordset")
|
|
|
|
' If connection failed, display error and stop
|
|
If empConnError <> "" Then
|
|
Dim connType
|
|
If USE_EMP_DSN Then
|
|
connType = "DSN-based (wjf_employees)"
|
|
Else
|
|
connType = "Direct ODBC"
|
|
End If
|
|
Response.Write "<!DOCTYPE html><html><head><title>Database Error</title></head><body>"
|
|
Response.Write "<h2>Database Connection Error</h2>"
|
|
Response.Write "<p style='color:red;'>" & Server.HTMLEncode(empConnError) & "</p>"
|
|
Response.Write "<p>Connection String Type: " & connType & "</p>"
|
|
Response.Write "</body></html>"
|
|
Response.End
|
|
End If
|
|
%> |