%@LANGUAGE="VBSCRIPT"%>
<%
If Request.servervariables("REQUEST_METHOD") = "POST" Then
'Define Delphic Connection
MM_dis1_STRING = "Driver={Microsoft Access Driver (*.mdb)};Dbq=D:\\ClientApps\\DelData97.mdb;Uid=;Pwd;"
'Define AWS Connection
'DO NOT REMOVE
'filePath = Server.MapPath("/DelData97.mdb")
'MM_dis1_STRING = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & filePath & ";"
UserID=replace(replace(replace(""&request.form("userid"),"'","''"),"--",""),"password","")
Password=replace(replace(replace(""&request.form("password"),"'","''"),"--",""),"password","")
SQL = "SELECT userID FROM websecurity where WebSecurity.userID='" & userID & "' and WebSecurity.password = '" & password & "'"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open MM_dis1_STRING
set RS = Server.CreateObject("ADODB.Recordset")
RS.open SQL,Conn
If not rs.eof then
Session("MM_Username") = UserID
userID = rs("userID")
rs.close
SQL = "Select accounttype from customers where customerID = " & userID
RS.open SQL,Conn
if not rs.eof then
if ucase(rs("accounttype")) = "PI" then
REDIRECT = "dis_form_main_menu_PI.asp"
else
REDIRECT = "dis_form_choose_one.asp"
end if
else
message = "Username and/or Password Invalid."
end if
else
message = "Username and/or Password Invalid."
end if
'CLEAN UP!!
rs.close
set rs=nothing
conn.close
set conn=nothing
if redirect <> "" then
response.redirect REDIRECT
end if
end if
%>
Internships: Delphic offers internship programs for those who have limited training
or knowledge of the field and would like to enhance their resume with real-world experience. This is a great
opportunity for process servers, bill collectors, paralegals and criminal justice graduates.
Investigator Academy: Interested in becoming a private investigator, but have no training or experience?
We offer an intensive, 4-week, hands-on course to teach you the basics of the industry and to give you actual experience
in the field. This is not a correspondence course - it is a real-world training environment designed to teach you:
Surveillance Operations
Missing Persons Investigations
Criminal Defense Investigations
Background Investigations
Undercover Operations
Process Service
Insurance Fraud Investigations
Domestic Infidelity Cases
Civil Investigations
Asset Investigations
Computer Crime
And More
Your training will be a mix of classroom instruction plus theory, and you will have the opportunity to apply the lessons learned
in real-life assignments and cases. You will work alongside our own investigators to apply the techniques you've learned. Class
sizes are limited, in order to give our students maximum educational value. The tuition is $899 (includes course material), and we
accept all major credit cards. We also offer tuition assistance and/or payment plans.
So, If you're interested in learning from the best agents in Denver, simply call us at 303-239-1411 and ask to speak to
an investigator about our academy. Or, complete the form below and a member of our team will contact you.