%
' FP_ASP ASP Automatically generated by a Frontpage Component. Do not Edit.
On Error Resume Next
Session("FP_OldCodePage") = Session.CodePage
Session("FP_OldLCID") = Session.LCID
Session.CodePage = 1252
Session.LCID = 1033
Err.Clear
strErrorUrl = ""
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
If Request.Form("VTI-GROUP") = "0" Then
Err.Clear
Set fp_conn = Server.CreateObject("ADODB.Connection")
FP_DumpError strErrorUrl, "Cannot create connection"
Set fp_rs = Server.CreateObject("ADODB.Recordset")
FP_DumpError strErrorUrl, "Cannot create record set"
fp_conn.Open Application("index_sal_ConnectionString")
FP_DumpError strErrorUrl, "Cannot open database"
fp_rs.Open "Results", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable
FP_DumpError strErrorUrl, "Cannot open record set"
fp_rs.AddNew
FP_DumpError strErrorUrl, "Cannot add new record set to the database"
Dim arFormFields0(2)
Dim arFormDBFields0(2)
Dim arFormValues0(2)
arFormFields0(0) = "pwd"
arFormDBFields0(0) = "pwd"
arFormValues0(0) = Request("pwd")
arFormFields0(1) = "id"
arFormDBFields0(1) = "id1"
arFormValues0(1) = Request("id")
FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0
If Request.ServerVariables("REMOTE_HOST") <> "" Then
FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_HOST"), "Remote_computer_name"
End If
If Request.ServerVariables("HTTP_USER_AGENT") <> "" Then
FP_SaveFieldToDB fp_rs, Request.ServerVariables("HTTP_USER_AGENT"), "Browser_type"
End If
FP_SaveFieldToDB fp_rs, Now, "Timestamp"
If Request.ServerVariables("REMOTE_USER") <> "" Then
FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_USER"), "User_name"
End If
fp_rs.Update
FP_DumpError strErrorUrl, "Cannot update the database"
fp_rs.Close
fp_conn.Close
FP_FormConfirmation "text/html; charset=windows-1252",_
"Form Confirmation",_
"Thank you for submitting the following information:",_
"gallery.asp",_
"Return to the form."
End If
End If
Session.CodePage = Session("FP_OldCodePage")
Session.LCID = Session("FP_OldLCID")
%>
Online Streaming
CME Application
Individual PowerPoint slides controlled and synchronized to video
presentations.
To view this video you must have
the RealOne Player installed on your computer.
To download the RealOne Player click
here.
Interactive Online
Training Application Developed using the latest interactive FLASH
technology combined with video. Please be patient as this will take
a little time to download.
To view this movie you must have the QuickTime
plug-in installed. To download QuickTime click here.
Recent Video Productions:
Drug Application
Marketing Video Drug Manufacturer's Investor
Relations Video. Video recorded on location and post-production
completed at our local editing studio.
To view this movie you must have the Windows Media
Player installed. To download the most recent Windows Media Player
click
here.
Role-Playing Child
Abuse Training Vignette
Personal Safety Training Video for children who have been assaulted.
This video is based on a role-playing scenario.
To view this movie you must have the Windows Media
Player installed. To download the most recent Windows Media Player
click
here.