<%@ Language=VBScript %>
 <!-- #include file="mydbconn.inc"-->
<%

	'defines variables, above is mydbconn.inc, this opens a connection to the database so that I can 
	'interface with it, it must be closed later on in the code
	dim conn, strSql
	dim name, street, city, state, zip, emailaddress


	'Call info from custform.asp here
	strname = Request.QueryString("name")
	strstreet = Request.QueryString("street")
	strcity = Request.QueryString("city")
	strstate = Request.QueryString("state")
	strzip = Request.QueryString("zip")
	stremailaddress = Request.QueryString("emailaddress")
	
	
	'this assigns one long string full of your important info to a variable named'
	'strSql
	strSql = "INSERT INTO Customer (name, street, city, state, zip, emailaddress) " & _
			 "VALUES ('" & strname & "', '" & strstreet & "', '" & _ 
			 strcity & "', '" & strstate & "', '" & _
			 strzip & "', '" & stremailaddress & "')"
			 
	'this now sends that string to the database, the format that it is in will be recognized 
	'by the db and inserted into the proper columns
	Objconn.Execute strSql
	
	'added on friday 12/12/03 a redirect when data is successfully sent or not
	if Objconn.Errors.Count = 0 then
		Response.Redirect "enzynetrial.htm"
	else
		Response.Redirect "fail.asp"
	end if

	'closes db connection
	Objconn.Close
	set Objconn = nothing
	
	
	
%>