un saluto a tutto il forum!!

Premetto che non sono per niente ferrato con ASP. detto questo, ho un piccolo problema (almeno penso).
Non riesco a collegare un database ad una pagina ASP. Posto il codice..

----------------------------INIZIO CODICE (PRIMA PARTE)---------------------------------


<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>GLS</title>
<style type="text/css">
<!--
.Stile1 {
color: #33FF00;
font-weight: bold;

}
-->
</style>
</head>

<body>

<form method="POST" action="inserisci2.asp">
<table border="#CC3300" cellpadding="#99FF00" width="80%" cellspacing="1">
<tr>
<td> <p class="Stile1">Executive GLS Buon giorno. Sono ___________!</p>


Operatore: <input type="text" name="Operatore" size="20" /></p>


Nominativo: <input type="text" name="Nominativo" size="20" /></p>


Motivo chiamata: <input type="text" name="Motivo_Chiamata" size="20" /></p>
<p class="Stile1">Grazie di aver chiamato.</p>
<p class="Stile1">Le auguro una buona giornata/Serata! </p>
<p class="Stile1"></p>
<p class="Stile1"></p>



</p>


</p>
</td>
</tr>
</table>


<input type="submit" value="Invia" /></p>
</form>

</body>
</html>


---------------------------------FINE CODICE (PRIMA PARTE)-----------------------------


DETTO QUESTO ECCOVI LA SECONDA PARTE

--------------------------------INIZIO CODICE (SECONDA PARTE)--------------------------

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head>
<title>pagina inserimento</title>
</head>
<body>

<%
on error resume next

Operatore = Request.form("Operatore")
Nominativo = Request.form("Nominativo")
Motivo_Chiamata = Request.form("Motivo_Chiamata")


dim Enter_DB
dim Server_DB
dim Database_DB
dim UID_DB
dim PWD_DB
dim Enter_RS
dim SQL

LANGUAGE = VBScript
Server_DB="servercontatta1"
Database_DB="Servizio_Inbound"
UID_DB="piero"
PWD_DB="Hornet74"


set Enter_DB = Server.CreateObject("ADODB.Connection")
set Enter_RS = Server.CreateObject("ADODB.Recordset")
EnterDB.connectiontimeout=7
EnterDB.Open ("Provider=SQLOLEDB;Server=" & Server_DB &_";
Initial Catalog="& Database_DB & ";User Id=" & UID_DB &_";
Password="& PWD_DB& ";Network Library=GLS")


%>

<%

Data Source=myServerAddress;Initial Catalog=myDataBase;User Id=myUsername;Password=myPassword;

SQL = "INSERT INTO GLS (Operatore, Nominativo, Motivo_Chiamata) "
SQL = SQL & "VALUES ('" & replace(Operatore,"'","''") & "',"
SQL = SQL & "'" & replace(Nominativo,"'","''") & "'"
SQL = SQL & "'" & replace(Motivo_Ciamata,"'","''") & "'"
SQL = SQL & ")"
conn.execute(SQL)

Enter_DB.Open SQL, Enter_RS

If err.number>0 then
response.write "

Errore nell'inserimento</p>"

elseif conn.errors.count> 0 then
response.write "

Attenzione!</p>"
response.write "

I dati inseriti non sono corretti.</p>"
Else
response.write "

I dati sono stati inseriti correttamente!</p>"
End if
objconn.Close

%>

<hr />




<%
Response.Write("Torna alla pagina precedente")
%>

</p>
</body>
</html>

-----------------------------------FINE CODICE (SECONDA PARTE)------------------------

SPERO DI NON AVER CREATO PROBLEMI INSERENDO TUTTO STO CODICE..
ASPERO IN UN VOSTRO AIUTO!!
GRAZIE