<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/kasatua.asp" -->
<% Session.Timeout = 60 %>
<%
' *** Edit Operations: declare variables
MM_editAction = CStr(Request("URL"))
If (Request.QueryString <> "") Then
MM_editAction = MM_editAction & "?" & Request.QueryString
End If
' boolean to abort record edit
MM_abortEdit = false
' query string to execute
MM_editQuery = ""
%>
<%
' *** Redirect if username exists
MM_flag="MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
MM_dupKeyRedirect="esistente.htm"
MM_rsKeyConnection=MM_kasatua_STRING
MM_dupKeyUsernameValue = CStr(Request.Form("login"))
MM_dupKeySQL="SELECT userid FROM tabella WHERE userid='" & MM_dupKeyUsernameValue & "'"
MM_adodbRecordset="ADODB.Recordset"
set MM_rsKey=Server.CreateObject(MM_adodbRecordset)
MM_rsKey.ActiveConnection=MM_rsKeyConnection
MM_rsKey.Source=MM_dupKeySQL
MM_rsKey.CursorType=0
MM_rsKey.CursorLocation=2
MM_rsKey.LockType=3
MM_rsKey.Open
If Not MM_rsKey.EOF Or Not MM_rsKey.BOF Then
' the username was found - can not add the requested username
MM_qsChar = "?"
If (InStr(1,MM_dupKeyRedirect,"?") >= 1) Then MM_qsChar = "&"
MM_dupKeyRedirect = MM_dupKeyRedirect & MM_qsChar & "requsername=" & MM_dupKeyUsernameValue
Response.Redirect(MM_dupKeyRedirect)
End If
MM_rsKey.Close
End If
%>
<%
' *** Insert Record: set variables
If (CStr(Request("MM_insert")) <> "") Then
MM_editConnection = MM_kasatua_STRING
MM_editTable = "tabella"
MM_editRedirectUrl = "registra3ok.asp"
MM_fieldsStr = "ragsoc|value|indleg|value|capleg|value|cittaleg|value|provincia|value|ora|value|data|value|indop|value|capop|value|cittaop|value|provincia2|value|cfpi|value|mail|value|tel|value|web|value|motore|value|bagno|value|cucina|value|zgiorno|value|znotte|value|cameretta|value|elettrodom|value|oggettistica|value|arr_etnico|value|serramenti|value|contract|value|tappeti|value|arr_esterni|value|casalinghi|value|illuminazione|value|marchi_trattati|value|nome|value|cognome|value|sesso|value|gg|value|mm|value|aaaa|value|citta2|value|provincia3|value|cf|value|posizione|value|login|value|password|value|link|value"
MM_columnsStr = "ragsoc|',none,''|indleg|',none,''|capleg|',none,''|cittaleg|',none,''|Provincia|',none,''|ora|',none,''|data|',none,''|indop|',none,''|capop|',none,''|cittaop|',none,''|provincia2|',none,''|cfpi|',none,''|mail|',none,''|tel|',none,''|web|',none,''|motore|',none,''|bagno|none,'Y','N'|cucina|none,'Y','N'|zgiorno|none,'Y','N'|znotte|none,'Y','N'|cameretta|none,'Y','N'|elettrodom|none,'Y','N'|oggettistica|none,'Y','N'|arr_etnico|none,'Y','N'|serramenti|none,'Y','N'|contract|none,'Y','N'|tappeti|none,'Y','N'|arr_esterni|none,'Y','N'|casalinghi|none,'Y','N'|illuminazione|none,'Y','N'|marchi_trattati|',none,''|nome|',none,''|cognome|',none,''|sesso|',none,''|gg|none,none,NULL|mm|none,none,NULL|aaaa|none,none,NULL|citta2|',none,''|provincia3|',none,''|cf|',none,''|posizione|',none,''|userid|',none,''|password|',none,''|link|',none,''"
' create the MM_fields and MM_columns arrays
MM_fields = Split(MM_fieldsStr, "|")
MM_columns = Split(MM_columnsStr, "|")
' set the form values
For i = LBound(MM_fields) To UBound(MM_fields) Step 2
MM_fields(i+1) = CStr(Request.Form(MM_fields(i)))
Next
' append the query string to the redirect URL
If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then
If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then
MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString
Else
MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString
End If
End If
End If
%>
<%
' *** Insert Record: construct a sql insert statement and execute it
If (CStr(Request("MM_insert")) <> "") Then
' create the sql insert statement
MM_tableValues = ""
MM_dbValues = ""
For i = LBound(MM_fields) To UBound(MM_fields) Step 2
FormVal = MM_fields(i+1)
MM_typeArray = Split(MM_columns(i+1),",")
Delim = MM_typeArray(0)
If (Delim = "none") Then Delim = ""
AltVal = MM_typeArray(1)
If (AltVal = "none") Then AltVal = ""
EmptyVal = MM_typeArray(2)
If (EmptyVal = "none") Then EmptyVal = ""
If (FormVal = "") Then
FormVal = EmptyVal
Else
If (AltVal <> "") Then
FormVal = AltVal
ElseIf (Delim = "'") Then ' escape quotes
FormVal = "'" & Replace(FormVal,"'","''") & "'"
Else
FormVal = Delim + FormVal + Delim
End If
End If
If (i <> LBound(MM_fields)) Then
MM_tableValues = MM_tableValues & ","
MM_dbValues = MM_dbValues & ","
End if
MM_tableValues = MM_tableValues & MM_columns(i)
MM_dbValues = MM_dbValues & FormVal
Next
MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")"
If (Not MM_abortEdit) Then
' execute the insert
Set MM_editCmd = Server.CreateObject("ADODB.Command")
MM_editCmd.ActiveConnection = MM_editConnection
MM_editCmd.CommandText = MM_editQuery
MM_editCmd.Execute
MM_editCmd.ActiveConnection.Close
If (MM_editRedirectUrl <> "") Then
Response.Redirect(MM_editRedirectUrl)
End If
End If
End If
%>
<%
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_kasatua_STRING
Recordset1.Source = "SELECT * FROM tabella"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open()
Recordset1_numRows = 0
%>
<html>
<head>
<title>Modulo registrazione amministratore Kasatua </title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript">
<!--
function MM_findObj(n, d) { //v4.0
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d
)&&d.all) x=d.all
; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i]
;
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && document.getElementById) x=document.getElementById(n); return x;
}
function MM_validateForm() { //v4.0
var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
if (val) { nm=val.name; if ((val=val.value)!="") {
if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
if (p<1 || p==(val.length-1)) errors+='- '+nm+' Deve inserire un indirizzo e-mail valido.\n';
} else if (test!='R') {
if (isNaN(val)) errors+='- '+nm+' deve contenere un numero.\n';
if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
min=test.substring(8,p); max=test.substring(p+1);
if (val<min || max<val) errors+='- '+nm+' deve contenere un numero tra '+min+' e '+max+'.\n';
} } } else if (test.charAt(0) == 'R') errors += '- Il campo '+nm+' è obbligatorio.\n'; }
} if (errors) alert('Errore - alcuni campi non sono stati compilati:\n'+errors);
document.MM_returnValue = (errors == '');
}
//-->
</script>
<script language=javascript>
function conferma(){
alert("La registrazione non può essere completata." + "\n" + "E'necessaria l'accettazione esplicita da parte del Cliente");
document.form1.confermato[0].checked=true
}
</script>
</head>
<body bgcolor="#FFFFFF" text="#000000" background="images/logo.jpg">
<form ACTION="<%=MM_editAction%>" METHOD="POST" name="form1">
<p align="center"><img src="images/logo.gif" width="214" height="87"><br>
<font face="Tahoma"><b>Modulo registrazione amministratore Kasatua<font size="2">
<br>
</font></b></font></p>
<table border="0" cellspacing="2" cellpadding="0" align="center">
<tr>
<td colspan="4"><font face="tahoma" size="1"><b>I campi con " <font color="#FF0000">*</font>
" sono obbligatori</b></font></td>
</tr>
<tr>
<td width="86"><font face="tahoma" size="2">Ragione sociale</font></td>
<td colspan="3">
<input type="text" name="ragsoc" size="60">
<font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font>
</td>
</tr>
<tr>
<td width="86"> </td>
<td colspan="2"><font face="tahoma" size="2"><b>Sede legale </b></font></td>
<td width="138"> </td>
</tr>
<tr>
<td width="86"><font face="tahoma" size="2">Indirizzo</font></td>
<td width="159"><font face="tahoma" size="2">
<input type="text" name="indleg" size="16">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
<td><font face="Tahoma" size="2">C.A.P.</font></td>
<td width="138"><font face="Tahoma" size="2">
<input type="text" name="capleg" size="5" maxlength="5">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
</tr>
<tr>
<td width="86"><font face="Tahoma" size="2">Città</font></td>
<td width="159"><font face="Tahoma" size="2">
<input type="text" name="cittaleg" size="16">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
<td><font face="Tahoma" size="2">Prov.</font></td>
<td width="138"><font face="Tahoma" size="2">
<select name="provincia">
<option SELECTED value="">Provincia</option>
<option value = "AG">Agrigento
<option value = "AL">Alessandria
<option value = "AN">Ancona
<option value = "AO">Aosta
<option value = "AQ">Aquila
<option value = "AR">Arezzo
<option value = "AP">Ascoli-Piceno
<option value = "AT">Asti
<option value = "AV">Avellino
<option value = "BA">Bari
<option value = "BL">Belluno
<option value = "BN">Benevento
<option value = "BG">Bergamo
<option value = "BI">Biella
<option value = "BO">Bologna
<option value = "BZ">Bolzano
<option value = "BS">Brescia
<option value = "BR">Brindisi
<option value = "CA">Cagliari
<option value = "CL">Caltanissetta
<option value = "CB">Campobasso
<option value = "CE">Caserta
<option value = "CT">Catania
<option value = "CZ">Catanzaro
<option value = "CH">Chieti
<option value = "CO">Como
<option value = "CS">Cosenza
<option value = "CR">Cremona
<option value = "KR">Crotone
<option value = "CN">Cuneo
<option value = "EN">Enna
<option value = "FE">Ferrara
<option value = "FI">Firenze
<option value = "FG">Foggia
<option value = "FO">Forli-Cesena
<option value = "FR">Frosinone
<option value = "GE">Genova
<option value = "GO">Gorizia
<option value = "GR">Grosseto
<option value = "IM">Imperia
<option value = "IS">Isernia
<option value = "SP">La-Spezia
<option value = "LT">Latina
<option value = "LE">Lecce
<option value = "LC">Lecco
<option value = "LI">Livorno
<option value = "LO">Lodi
<option value = "LU">Lucca
<option value = "MC">Macerata
<option value = "MN">Mantova
<option value = "MS">Massa-Carrara
<option value = "MT">Matera
<option value = "ME">Messina
<option value = "MI">Milano
<option value = "MO">Modena
<option value = "NA">Napoli
<option value = "NO">Novara
<option value = "NU">Nuoro
<option value = "OR">Oristano
<option value = "PD">Padova
<option value = "PA">Palermo
<option value = "PR">Parma
<option value = "PV">Pavia
<option value = "PG">Perugia
<option value = "PE">Pescara
<option value = "PS">Pesaro-Urbino
<option value = "PC">Piacenza
<option value = "PI">Pisa
<option value = "PT">Pistoia
<option value = "PN">Pordenone
<option value = "PZ">Potenza
<option value = "PO">Prato
<option value = "RG">Ragusa
<option value = "RA">Ravenna
<option value = "RC">Reggio-Calabria
<option value = "RE">Reggio-Emilia
<option value = "RI">Rieti
<option value = "RN">Rimini
<option value = "RM">Roma
<option value = "RO">Rovigo
<option value = "SA">Salerno
<option value = "SS">Sassari
<option value = "SV">Savona
<option value = "SI">Siena
<option value = "SR">Siracusa
<option value = "SO">Sondrio
<option value = "TA">Taranto
<option value = "TE">Teramo
<option value = "TR">Terni
<option value = "TO">Torino
<option value = "TP">Trapani
<option value = "TN">Trento
<option value = "TV">Treviso
<option value = "TS">Trieste
<option value = "UD">Udine
<option value = "VA">Varese
<option value = "VE">Venezia
<option value = "VB">Verbania
<option value = "VC">Vercelli
<option value = "VR">Verona
<option value = "VV">Vibo-Valentia
<option value = "VI">Vicenza
<option value = "VT">Viterbo
</select>
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font><font face="Tahoma" size="2">
<input type="hidden" name="ora" value="<%=Time()%>">
<input type="hidden" name="data" value="<%=Date()%>">
</font></td>
</tr>
<tr>
<td width="86"> </td>
<td width="159"> </td>
<td> </td>
<td width="138"> </td>
</tr>
<tr>
<td width="86"> </td>
<td colspan="3"><font face="tahoma" size="2"><b>Sede operativa </b></font></td>
</tr>
<tr>
<td width="86"><font face="tahoma" size="2">Indirizzo</font></td>
<td width="159"><font face="tahoma" size="2">
<input type="text" name="indop" size="16">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font>
</td>
<td><font face="Tahoma" size="2">C.A.P.</font></td>
<td width="138">
<input type="text" name="capop" size="5" maxlength="5">
<font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font>
</td>
</tr>
<tr>
<td width="86"><font face="Tahoma" size="2">Città</font></td>
<td width="159">
<input type="text" name="cittaop" size="16">
<font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font>
</td>
<td><font face="Tahoma" size="2">Prov.</font></td>
<td width="138"><font face="Tahoma" size="2">
<select name="provincia2">
<option selected><font face="Tahoma" size="2">Provincia</font></option>
<option value="AG"><font face="Tahoma" size="2">Agrigento </font> </option>
<option value="AL"><font face="Tahoma" size="2">Alessandria </font>
</option>
<option value="AN"><font face="Tahoma" size="2">Ancona </font> </option>
<option value="AO"><font face="Tahoma" size="2">Aosta </font> </option>
<option value="AQ"><font face="Tahoma" size="2">Aquila </font> </option>
<option value="AR"><font face="Tahoma" size="2">Arezzo </font> </option>
<option value="AP"><font face="Tahoma" size="2">Ascoli-Piceno </font>
</option>
<option value="AT"><font face="Tahoma" size="2">Asti </font> </option>
<option value="AV"><font face="Tahoma" size="2">Avellino </font> </option>
<option value="BA"><font face="Tahoma" size="2">Bari </font> </option>
<option value="BL"><font face="Tahoma" size="2">Belluno </font> </option>
<option value="BN"><font face="Tahoma" size="2">Benevento </font> </option>
<option value="BG"><font face="Tahoma" size="2">Bergamo </font> </option>
<option value="BI"><font face="Tahoma" size="2">Biella </font> </option>
<option value="BO"><font face="Tahoma" size="2">Bologna </font> </option>
<option value="BZ"><font face="Tahoma" size="2">Bolzano </font> </option>
<option value="BS"><font face="Tahoma" size="2">Brescia </font> </option>
<option value="BR"><font face="Tahoma" size="2">Brindisi </font> </option>
<option value="CA"><font face="Tahoma" size="2">Cagliari </font> </option>
<option value="CL"><font face="Tahoma" size="2">Caltanissetta </font>
</option>
<option value="CB"><font face="Tahoma" size="2">Campobasso </font> </option>
<option value="CE"><font face="Tahoma" size="2">Caserta </font> </option>
<option value="CT"><font face="Tahoma" size="2">Catania </font> </option>
<option value="CZ"><font face="Tahoma" size="2">Catanzaro </font> </option>
<option value="CH"><font face="Tahoma" size="2">Chieti </font> </option>
<option value="CO"><font face="Tahoma" size="2">Como </font> </option>
<option value="CS"><font face="Tahoma" size="2">Cosenza </font> </option>
<option value="CR"><font face="Tahoma" size="2">Cremona </font> </option>
<option value="KR"><font face="Tahoma" size="2">Crotone </font> </option>
<option value="CN"><font face="Tahoma" size="2">Cuneo </font> </option>
<option value="EN"><font face="Tahoma" size="2">Enna </font> </option>
<option value="FE"><font face="Tahoma" size="2">Ferrara </font> </option>
<option value="FI"><font face="Tahoma" size="2">Firenze </font> </option>
<option value="FG"><font face="Tahoma" size="2">Foggia </font> </option>
<option value="FO"><font face="Tahoma" size="2">Forli-Cesena </font>
</option>
<option value="FR"><font face="Tahoma" size="2">Frosinone </font> </option>
<option value="GE"><font face="Tahoma" size="2">Genova </font> </option>
<option value="GO"><font face="Tahoma" size="2">Gorizia </font> </option>
<option value="GR"><font face="Tahoma" size="2">Grosseto </font> </option>
<option value="IM"><font face="Tahoma" size="2">Imperia </font> </option>
<option value="IS"><font face="Tahoma" size="2">Isernia </font> </option>
<option value="SP"><font face="Tahoma" size="2">La-Spezia </font> </option>
<option value="LT"><font face="Tahoma" size="2">Latina </font> </option>
<option value="LE"><font face="Tahoma" size="2">Lecce </font> </option>
<option value="LC"><font face="Tahoma" size="2">Lecco </font> </option>
<option value="LI"><font face="Tahoma" size="2">Livorno </font> </option>
<option value="LO"><font face="Tahoma" size="2">Lodi </font> </option>
<option value="LU"><font face="Tahoma" size="2">Lucca </font> </option>
<option value="MC"><font face="Tahoma" size="2">Macerata </font> </option>
<option value="MN"><font face="Tahoma" size="2">Mantova </font> </option>
<option value="MS"><font face="Tahoma" size="2">Massa-Carrara </font>
</option>
<option value="MT"><font face="Tahoma" size="2">Matera </font> </option>
<option value="ME"><font face="Tahoma" size="2">Messina </font> </option>
<option value="MI"><font face="Tahoma" size="2">Milano </font> </option>
<option value="MO"><font face="Tahoma" size="2">Modena </font> </option>
<option value="NA"><font face="Tahoma" size="2">Napoli </font> </option>
<option value="NO"><font face="Tahoma" size="2">Novara </font> </option>
<option value="NU"><font face="Tahoma" size="2">Nuoro </font> </option>
<option value="OR"><font face="Tahoma" size="2">Oristano </font> </option>
<option value="PD"><font face="Tahoma" size="2">Padova </font> </option>
<option value="PA"><font face="Tahoma" size="2">Palermo </font> </option>
<option value="PR"><font face="Tahoma" size="2">Parma </font> </option>
<option value="PV"><font face="Tahoma" size="2">Pavia </font> </option>
<option value="PG"><font face="Tahoma" size="2">Perugia </font> </option>
<option value="PE"><font face="Tahoma" size="2">Pescara </font> </option>
<option value="PS"><font face="Tahoma" size="2">Pesaro-Urbino </font>
</option>
<option value="PC"><font face="Tahoma" size="2">Piacenza </font> </option>
<option value="PI"><font face="Tahoma" size="2">Pisa </font> </option>
<option value="PT"><font face="Tahoma" size="2">Pistoia </font> </option>
<option value="PN"><font face="Tahoma" size="2">Pordenone </font> </option>
<option value="PZ"><font face="Tahoma" size="2">Potenza </font> </option>
<option value="PO"><font face="Tahoma" size="2">Prato </font> </option>
<option value="RG"><font face="Tahoma" size="2">Ragusa </font> </option>
<option value="RA"><font face="Tahoma" size="2">Ravenna </font> </option>
<option value="RC"><font face="Tahoma" size="2">Reggio-Calabria </font>
</option>
<option value="RE"><font face="Tahoma" size="2">Reggio-Emilia </font>
</option>
<option value="RI"><font face="Tahoma" size="2">Rieti </font> </option>
<option value="RN"><font face="Tahoma" size="2">Rimini </font> </option>
<option value="RM"><font face="Tahoma" size="2">Roma </font> </option>
<option value="RO"><font face="Tahoma" size="2">Rovigo </font> </option>
<option value="SA"><font face="Tahoma" size="2">Salerno </font> </option>
<option value="SS"><font face="Tahoma" size="2">Sassari </font> </option>
<option value="SV"><font face="Tahoma" size="2">Savona </font> </option>
<option value="SI"><font face="Tahoma" size="2">Siena </font> </option>
<option value="SR"><font face="Tahoma" size="2">Siracusa </font> </option>
<option value="SO"><font face="Tahoma" size="2">Sondrio </font> </option>
<option value="TA"><font face="Tahoma" size="2">Taranto </font> </option>
<option value="TE"><font face="Tahoma" size="2">Teramo </font> </option>
<option value="TR"><font face="Tahoma" size="2">Terni </font> </option>
<option value="TO"><font face="Tahoma" size="2">Torino </font> </option>
<option value="TP"><font face="Tahoma" size="2">Trapani </font> </option>
<option value="TN"><font face="Tahoma" size="2">Trento </font> </option>
<option value="TV"><font face="Tahoma" size="2">Treviso </font> </option>
<option value="TS"><font face="Tahoma" size="2">Trieste </font> </option>
<option value="UD"><font face="Tahoma" size="2">Udine </font> </option>
<option value="VA"><font face="Tahoma" size="2">Varese </font> </option>
<option value="VE"><font face="Tahoma" size="2">Venezia </font> </option>
<option value="VB"><font face="Tahoma" size="2">Verbania </font> </option>
<option value="VC"><font face="Tahoma" size="2">Vercelli </font> </option>
<option value="VR"><font face="Tahoma" size="2">Verona </font> </option>
<option value="VV"><font face="Tahoma" size="2">Vibo-Valentia </font>
</option>
<option value="VI"><font face="Tahoma" size="2">Vicenza </font> </option>
<option value="VT"><font face="Tahoma" size="2">Viterbo </font> </option>
</select>
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
</tr>
<tr>
<td width="86"> </td>
<td width="159"> </td>
<td> </td>
<td width="138"> </td>
</tr>
<tr>
<td width="86"><font face="Tahoma" size="2">Partita IVA</font></td>
<td width="159"><font face="Tahoma" size="2">
<input type="text" name="cfpi" size="11" maxlength="11">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
<td><font face="Tahoma" size="2">E-mail:</font></td>
<td width="138"><font face="Tahoma" size="2">
<input type="text" name="mail" size="16">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
</tr>
<tr>
<td width="86"><font face="Tahoma" size="2">Tel.</font></td>
<td width="159"><font face="Tahoma" size="2">
<input type="text" name="tel" size="16">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
<td><font face="tahoma" size="2">Sito internet</font></td>
<td width="138"><font face="Tahoma" size="2">
<input type="text" name="web" value="http://www.">
</font></td>
</tr>
<tr>
<td width="86"> </td>
<td colspan="3"><font face="tahoma" size="2">Vuoi essere inserito nei Motori
di ricerca di Kasatua?
<input type="radio" name="motore" value="Y" checked>
Si
<input type="radio" name="motore" value="N">
No</font></td>
</tr>
<tr>
<td> </td>
<td colspan="3"> </td>
</tr>
<tr>
<td> </td>
<td colspan="3"><font face="tahoma" size="2"><b>Prodotti trattati:</b></font></td>
</tr>
<tr>
<td colspan="2"><font face="tahoma" size="2">
<input type="checkbox" name="bagno" value="bagno">
Bagno</font></td>
<td colspan="2"><font face="tahoma" size="2">
<input type="checkbox" name="cucina" value="cucina">
Cucina</font></td>
</tr>
<tr>
<td colspan="2"><font face="tahoma" size="2">
<input type="checkbox" name="zgiorno" value="zgiorno">
Zona giorno</font></td>
<td colspan="2"><font face="tahoma" size="2">
<input type="checkbox" name="znotte" value="znotte">
Zona notte</font></td>
</tr>
<tr>
<td colspan="2"><font face="tahoma" size="2">
<input type="checkbox" name="cameretta" value="cameretta">
Cameretta</font></td>
<td colspan="2"><font face="tahoma" size="2">
<input type="checkbox" name="elettrodom" value="elettrodom">
Elettrodomestici</font></td>
</tr>
<tr>
<td colspan="2"><font face="tahoma" size="2">
<input type="checkbox" name="oggettistica" value="oggettistica">
Oggettistica</font></td>
<td colspan="2"><font face="tahoma" size="2">
<input type="checkbox" name="arr_etnico" value="arr_etnico">
Arredo Etnico</font></td>
</tr>
<tr>
<td colspan="2"><font face="tahoma" size="2">
<input type="checkbox" name="serramenti" value="serramenti">
Serramenti</font></td>
<td colspan="2"><font face="tahoma" size="2">
<input type="checkbox" name="contract" value="contract">
Contract</font></td>
</tr>
<tr>
<td colspan="2"><font face="tahoma" size="2">
<input type="checkbox" name="tappeti" value="tappeti">
Tappeti/Tendaggi</font></td>
<td colspan="2"><font face="tahoma" size="2">
<input type="checkbox" name="arr_esterni" value="arr_esterni">
Arredamento per esterni</font></td>
</tr>
<tr>
<td colspan="2"> <font face="tahoma" size="2">
<input type="checkbox" name="casalinghi" value="casalinghi">
Casalinghi </font></td>
<td colspan="2"> <font face="tahoma" size="2">
<input type="checkbox" name="illuminazione" value="illuminazione">
Illuminazione </font></td>
</tr>
<tr>
<td colspan="2"><font face="tahoma" size="2">Marchi trattati</font></td>
<td colspan="2">
<textarea name="marchi_trattati" rows="6"></textarea>
</td>
</tr>
<tr>
<td colspan="4">
<center>
<font face="tahoma" size="1"><b>Inserisci nel tuo sito il link di accesso
diretto a Kasatua.<br>
Chiedi a chi ha realizzato il tuo sito, vedrai è semplicissimo
! </b></font>
</center>
</td>
</tr>
<tr>
<td width="86"> </td>
<td colspan="3"> </td>
</tr>
<tr>
<td width="86"> </td>
<td colspan="3"><font face="tahoma"><b><font size="2">Dati di chi effettua
materialmente la registrazione</font></b></font></td>
</tr>
<tr>
<td width="86"><font face="Tahoma" size="2">Nome</font></td>
<td width="159"><font face="Tahoma" size="2">
<input type="text" name="nome" size="16">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
<td><font face="Tahoma" size="2">Cognome </font></td>
<td width="138"><font face="Tahoma" size="2">
<input type="text" name="cognome" size="16">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
</tr>
<tr>
<td width="86"><font face="Tahoma" size="2">Sesso</font></td>
<td width="159">
<select name="sesso">
<option>Maschio</option>
<option>Femmina</option>
</select>
<font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font>
</td>
<td> </td>
<td width="138"> </td>
</tr>
<tr>
<td width="86"><font face="Tahoma" size="2">Data di nascita</font></td>
<td width="159"><font face="Tahoma" size="1">
<input type="text" name="gg" size="2" maxlength="2">
/
<input type="text" name="mm" size="2" maxlength="2">
/
<input type="text" name="aaaa" size="4" maxlength="4">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
<td><font face="Tahoma" size="2">Luogo di Nascita </font></td>
<td width="138"><font face="Tahoma" size="2">
<input type="text" name="citta2" size="16">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
</tr>
<tr>
<td width="86"><font face="Tahoma" size="2">Prov.</font></td>
<td width="159"><font face="Tahoma" size="2">
<select name="provincia3">
<option SELECTED value=""><font face="Tahoma" size="2">Provincia</font></option>
<option value = "AG"><font face="Tahoma" size="2">Agrigento </font>
<option value = "AL"><font face="Tahoma" size="2">Alessandria </font>
<option value = "AN"><font face="Tahoma" size="2">Ancona </font>
<option value = "AO"><font face="Tahoma" size="2">Aosta </font>
<option value = "AQ"><font face="Tahoma" size="2">Aquila </font>
<option value = "AR"><font face="Tahoma" size="2">Arezzo </font>
<option value = "AP"><font face="Tahoma" size="2">Ascoli-Piceno </font>
<option value = "AT"><font face="Tahoma" size="2">Asti </font>
<option value = "AV"><font face="Tahoma" size="2">Avellino </font>
<option value = "BA"><font face="Tahoma" size="2">Bari </font>
<option value = "BL"><font face="Tahoma" size="2">Belluno </font>
<option value = "BN"><font face="Tahoma" size="2">Benevento </font>
<option value = "BG"><font face="Tahoma" size="2">Bergamo </font>
<option value = "BI"><font face="Tahoma" size="2">Biella </font>
<option value = "BO"><font face="Tahoma" size="2">Bologna </font>
<option value = "BZ"><font face="Tahoma" size="2">Bolzano </font>
<option value = "BS"><font face="Tahoma" size="2">Brescia </font>
<option value = "BR"><font face="Tahoma" size="2">Brindisi </font>
<option value = "CA"><font face="Tahoma" size="2">Cagliari </font>
<option value = "CL"><font face="Tahoma" size="2">Caltanissetta </font>
<option value = "CB"><font face="Tahoma" size="2">Campobasso </font>
<option value = "CE"><font face="Tahoma" size="2">Caserta </font>
<option value = "CT"><font face="Tahoma" size="2">Catania </font>
<option value = "CZ"><font face="Tahoma" size="2">Catanzaro </font>
<option value = "CH"><font face="Tahoma" size="2">Chieti </font>
<option value = "CO"><font face="Tahoma" size="2">Como </font>
<option value = "CS"><font face="Tahoma" size="2">Cosenza </font>
<option value = "CR"><font face="Tahoma" size="2">Cremona </font>
<option value = "KR"><font face="Tahoma" size="2">Crotone </font>
<option value = "CN"><font face="Tahoma" size="2">Cuneo </font>
<option value = "EN"><font face="Tahoma" size="2">Enna </font>
<option value = "FE"><font face="Tahoma" size="2">Ferrara </font>
<option value = "FI"><font face="Tahoma" size="2">Firenze </font>
<option value = "FG"><font face="Tahoma" size="2">Foggia </font>
<option value = "FO"><font face="Tahoma" size="2">Forli-Cesena </font>
<option value = "FR"><font face="Tahoma" size="2">Frosinone </font>
<option value = "GE"><font face="Tahoma" size="2">Genova </font>
<option value = "GO"><font face="Tahoma" size="2">Gorizia </font>
<option value = "GR"><font face="Tahoma" size="2">Grosseto </font>
<option value = "IM"><font face="Tahoma" size="2">Imperia </font>
<option value = "IS"><font face="Tahoma" size="2">Isernia </font>
<option value = "SP"><font face="Tahoma" size="2">La-Spezia </font>
<option value = "LT"><font face="Tahoma" size="2">Latina </font>
<option value = "LE"><font face="Tahoma" size="2">Lecce </font>
<option value = "LC"><font face="Tahoma" size="2">Lecco </font>
<option value = "LI"><font face="Tahoma" size="2">Livorno </font>
<option value = "LO"><font face="Tahoma" size="2">Lodi </font>
<option value = "LU"><font face="Tahoma" size="2">Lucca </font>
<option value = "MC"><font face="Tahoma" size="2">Macerata </font>
<option value = "MN"><font face="Tahoma" size="2">Mantova </font>
<option value = "MS"><font face="Tahoma" size="2">Massa-Carrara </font>
<option value = "MT"><font face="Tahoma" size="2">Matera </font>
<option value = "ME"><font face="Tahoma" size="2">Messina </font>
<option value = "MI"><font face="Tahoma" size="2">Milano </font>
<option value = "MO"><font face="Tahoma" size="2">Modena </font>
<option value = "NA"><font face="Tahoma" size="2">Napoli </font>
<option value = "NO"><font face="Tahoma" size="2">Novara </font>
<option value = "NU"><font face="Tahoma" size="2">Nuoro </font>
<option value = "OR"><font face="Tahoma" size="2">Oristano </font>
<option value = "PD"><font face="Tahoma" size="2">Padova </font>
<option value = "PA"><font face="Tahoma" size="2">Palermo </font>
<option value = "PR"><font face="Tahoma" size="2">Parma </font>
<option value = "PV"><font face="Tahoma" size="2">Pavia </font>
<option value = "PG"><font face="Tahoma" size="2">Perugia </font>
<option value = "PE"><font face="Tahoma" size="2">Pescara </font>
<option value = "PS"><font face="Tahoma" size="2">Pesaro-Urbino </font>
<option value = "PC"><font face="Tahoma" size="2">Piacenza </font>
<option value = "PI"><font face="Tahoma" size="2">Pisa </font>
<option value = "PT"><font face="Tahoma" size="2">Pistoia </font>
<option value = "PN"><font face="Tahoma" size="2">Pordenone </font>
<option value = "PZ"><font face="Tahoma" size="2">Potenza </font>
<option value = "PO"><font face="Tahoma" size="2">Prato </font>
<option value = "RG"><font face="Tahoma" size="2">Ragusa </font>
<option value = "RA"><font face="Tahoma" size="2">Ravenna </font>
<option value = "RC"><font face="Tahoma" size="2">Reggio-Calabria </font>
<option value = "RE"><font face="Tahoma" size="2">Reggio-Emilia </font>
<option value = "RI"><font face="Tahoma" size="2">Rieti </font>
<option value = "RN"><font face="Tahoma" size="2">Rimini </font>
<option value = "RM"><font face="Tahoma" size="2">Roma </font>
<option value = "RO"><font face="Tahoma" size="2">Rovigo </font>
<option value = "SA"><font face="Tahoma" size="2">Salerno </font>
<option value = "SS"><font face="Tahoma" size="2">Sassari </font>
<option value = "SV"><font face="Tahoma" size="2">Savona </font>
<option value = "SI"><font face="Tahoma" size="2">Siena </font>
<option value = "SR"><font face="Tahoma" size="2">Siracusa </font>
<option value = "SO"><font face="Tahoma" size="2">Sondrio </font>
<option value = "TA"><font face="Tahoma" size="2">Taranto </font>
<option value = "TE"><font face="Tahoma" size="2">Teramo </font>
<option value = "TR"><font face="Tahoma" size="2">Terni </font>
<option value = "TO"><font face="Tahoma" size="2">Torino </font>
<option value = "TP"><font face="Tahoma" size="2">Trapani </font>
<option value = "TN"><font face="Tahoma" size="2">Trento </font>
<option value = "TV"><font face="Tahoma" size="2">Treviso </font>
<option value = "TS"><font face="Tahoma" size="2">Trieste </font>
<option value = "UD"><font face="Tahoma" size="2">Udine </font>
<option value = "VA"><font face="Tahoma" size="2">Varese </font>
<option value = "VE"><font face="Tahoma" size="2">Venezia </font>
<option value = "VB"><font face="Tahoma" size="2">Verbania </font>
<option value = "VC"><font face="Tahoma" size="2">Vercelli </font>
<option value = "VR"><font face="Tahoma" size="2">Verona </font>
<option value = "VV"><font face="Tahoma" size="2">Vibo-Valentia </font>
<option value = "VI"><font face="Tahoma" size="2">Vicenza </font>
<option value = "VT"><font face="Tahoma" size="2">Viterbo </font>
</select>
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
<td><font face="Tahoma" size="2">Codice Fiscale</font></td>
<td width="138"><font face="Tahoma" size="2">
<input type="text" name="cf" size="16">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
</tr>
<tr>
<td width="86"><font face="Tahoma" size="2">Posizione aziendale</font></td>
<td width="159"><font face="Tahoma" size="2">
<input type="text" name="posizione" size="16">
</font><font face="tahoma" size="1"><b></b></font></td>
<td> </td>
<td width="138"><font face="Tahoma" size="2"> </font></td>
</tr>
<tr>
<td width="86"> </td>
<td width="159"><font face="Tahoma" size="2"> </font></td>
<td> </td>
<td width="138"><font face="Tahoma" size="2"> </font></td>
</tr>
<tr>
<td colspan="4">
<center>
<font face="Tahoma" size="1" color="#0033FF">Qui di seguito scegliete
il vostro Nome Utente e la vostra Password con un massimo di 8 caratteri
tra lettere e cifre, senza inserire caratteri speciali (es.: !"£$%&/()=?^;)</font>
</center>
</td>
</tr>
<tr>
<td width="86"><font face="Tahoma" size="2">Nome Utente</font></td>
<td width="159"><font face="Tahoma" size="2">
<input type="text" name="login" maxlength="8" size="16">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
<td width="89"><font face="Tahoma" size="2">Password</font></td>
<td width="138"><font face="Tahoma" size="2">
<input type="password" name="password" maxlength="8" size="16">
</font><font face="tahoma" size="1"><b><font color="#FF0000">*</font></b></font></td>
</tr>
<tr>
<td width="86"><font face="Tahoma" size="2">
<input type="hidden" name="link" value="puntoinox/index">
</font></td>
<td width="159"> </td>
<td width="89"> </td>
<td valign="bottom" width="138"> </td>
</tr>
<tr>
<td colspan="4"> </td>
</tr>
<tr>
<td colspan="4">
<div align="center"><font face="tahoma" size="2"><b>Legge 675/96</b>:
In esecuzione degli artt.10 e 11 della legge 675/96, recante disposizioni
a tutela delle persone e degli altri soggetti rispetto al trattamento
dei dati personali, l'utente dichiara di aver ricevuto apposita informativa
e conferma il consenso al trattamento dei propri dati personali. <br>
<input type="radio" name="confermato" value="si" checked>
Accetto
<input type="radio" name="confermato" value="no" onClick="conferma()">
Non Accetto</font></div>
</td>
</tr>
<tr>
<td colspan="2"> </td>
<td colspan="2"> </td>
</tr>
<tr>
<td colspan="2">
<div align="right"><font face="Tahoma" size="2">
<input type="submit" name="Submit" value="Invia" onClick="MM_validateForm('ragsoc','','R','indleg','','R','capleg','','R','cittaleg','','R','indop','','R','capop','','R','cittaop','','R','cfpi','','R','tel','','R','mail','','RisEmail','nome','','R','cognome','','R','gg','','RisNum','mm','','RisNum','aaaa','','RisNum','citta2','','R','cf','','R','login','','R','password','','R');return document.MM_returnValue">
</font></div>
</td>
<td colspan="2">
<input type="reset" name="Submit2" value="Reset">
</td>
</tr>
</table>
<input type="hidden" name="MM_insert" value="true">
</form>
</body>
</html>
<%
dim tabulato,tabulato1,email
tabultato=Request.form("ragsoc")
tabulato1=Request.form("indop")
email=("wp@aruba.it")
%>
<%
Dim objMail
Set objMail = CreateObject("CDONTS.NewMail")
HTML = "<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//IT"">" & NL
HTML = HTML & "<html>"
HTML = HTML & "<head>"
HTML = HTML & "<meta http-equiv=""Content-Type"""
HTML = HTML & "content=""text/html; charset=iso-8859-1"">"
HTML = HTML & "<p>Nel primo text è stato scritto: "+tabulato+" "
HTML = HTML & "<p>Nel secondo text è stato scritto: "+tabulato1+" "
HTML = HTML & "</strong><p>"
HTML = HTML & "</body>"
HTML = HTML & "</html>"
objMail.From = "aremun@aremun.com"
objMail.To = email
objMail.Subject = "Eccoti i risultati"
objMail.BodyFormat = 0
objMail.MailFormat = 0
objMail.Body = HTML
objMail.Send
%>
<%
Recordset1.Close()
%>