... Source code ServerSub connectserver(ddriver As String, sserver As String, uuid As String, ppw As String, ddb As String)On Error ... MsgBox "Oracle server died", vbInformation, " ;Server died"' If sqlconn.State = 0 Then MsgBox "SQL server died", vbInformation, " ;Server died" ... showstatus "Connectting to SQL server. ..", True sqlconn.ConnectionString = "Driver=" & ddriver & " ;Server= " & sserver & ";UID=" &...