Questo è il codice:
ho modificato solo password e id del datatbase.
Vorrei sottolinere, se può essere d'aiuto, che in locale non mi da alcun problema, mi da errore in hosting (su Aruba).
codice:
<%@LANGUAGE="VBSCRIPT"%>
<html>
<head>
<title>AGGIUNGI PRODOTTO</title>
<style> 
body{ 
padding:0; 
margin:0;
width:100%; 
height:100%; 
scrollbar-face-color: #70180A; 	
scrollbar-shadow-color: #000000; 
scrollbar-highlight-color: #70180A; 
scrollbar-3dlight-color: #000000; 	
scrollbar-darkshadow-color: #000000;  
scrollbar-track-color: #2b0000; 
scrollbar-arrow-color: #000000;
border-left:1px solid #5C5B4E; 
border-right:1px solid #5C5B4E; 
border-top:1px solid #5C5B4E; 
border-bottom:1px solid #5C5B4E; 	
} 
</style>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="stile.css" rel="stylesheet" type="text/css">
<link href="stilenero.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#690101">
<%
dim co 
set co = server.createObject("ADODB.Connection") 
co.Open "Driver={MySQL ODBC 3.51 Driver};server=62.149.115.12;port=3306;Database=AA;UID=Sql35582;PWD=AA" 
dim rs 
strq = "select count(*) as variabile from catalogocategorie" 
strq2 = "select * from catalogocategorie order by titolo" 
set rs = co.execute(strq) 
set rs2 = co.execute(strq2)

totrec = rs(0)
if totrec > 0 then
%>
<form action="catalogo_aggiungi2.asp" method="post" enctype="multipart/form-data" name="mioform">
<table width="100%" border="0" align="center" bgcolor="#690101">
  <tr>
    <td width="100%" bgcolor="#690101"><font size="2" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile">Categoria</span></font> </td>
  </tr>
  <tr>
    <td width="100%"><font size="2" face="Geneva, Arial, Helvetica, sans-serif">
      <%
Response.Write("<select name=campocategoria>")
rs2.movefirst
while not rs2.eof
Response.Write("<option>" & rs2("titolo") & "</option>")
rs2.movenext
wend
Response.Write("</select>")
%>
    </font></td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#690101"><font size="2" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile">Categoria</span></font> </td>
  </tr>
  <tr>
    <td width="100%"><font size="2" face="Geneva, Arial, Helvetica, sans-serif">
      <%
Response.Write("<select name=Ccategoria2>")
Response.Write("<option></option>")
rs2.movefirst
while not rs2.eof
Response.Write("<option>" & rs2("titolo") & "</option>")
rs2.movenext
wend
Response.Write("</select>")
%>
    </font></td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#690101"><font size="2" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile">Categoria</span></font> </td>
  </tr>
  <tr>
    <td width="100%"><font size="2" face="Geneva, Arial, Helvetica, sans-serif">
      <%
Response.Write("<select name=Ccategoria3>")
Response.Write("<option></option>")
rs2.movefirst
while not rs2.eof
Response.Write("<option>" & rs2("titolo") & "</option>")
rs2.movenext
wend
Response.Write("</select>")
%>
    </font></td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#690101"><font size="2" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile">Categoria</span></font> </td>
  </tr>
  <tr>
    <td width="100%"><font size="2" face="Geneva, Arial, Helvetica, sans-serif">
      <%
Response.Write("<select name=Ccategoria4>")
Response.Write("<option></option>")
rs2.movefirst
while not rs2.eof
Response.Write("<option>" & rs2("titolo") & "</option>")
rs2.movenext
wend
Response.Write("</select>")
%>
    </font></td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#690101"><font size="2" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile">Categoria</span></font> </td>
  </tr>
  <tr>
    <td width="100%"><font size="2" face="Geneva, Arial, Helvetica, sans-serif">
      <%
Response.Write("<select name=Ccategoria5>")
Response.Write("<option></option>")
rs2.movefirst
while not rs2.eof
Response.Write("<option>" & rs2("titolo") & "</option>")
rs2.movenext
wend
Response.Write("</select>")
%>
    </font></td>
  </tr>        
  <tr>
    <td width="100%" bgcolor="#690101"><font size="2" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile">Nome</span></font> </td>
  </tr>
  <tr>
    <td width="100%"><font size="2" face="Geneva, Arial, Helvetica, sans-serif">
      <input name="camponome" type="text" size="40" maxlength="20">
    </font></td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#690101"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile">Codice</span></font> </td>
  </tr>
  <tr>
    <td width="100%"><font size="2" face="Geneva, Arial, Helvetica, sans-serif">
      <input name="campocodice" type="text" size="40" maxlength="20">
    </font></td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#690101"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile">Prezzo</span></font> </td>
  </tr>
  <tr>
    <td width="100%"><font size="2" face="Geneva, Arial, Helvetica, sans-serif">
      <input name="campoprezo" type="text" size="20" maxlength="20">
    </font></td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#690101"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile">Prezzo
          in offerta</span></font> </td>
  </tr>
  <tr>
    <td width="100%"><font size="2" face="Geneva, Arial, Helvetica, sans-serif">
      <input name="campoprezzoofferta" type="text" size="20" maxlength="20">
    </font></td>
  </tr>
  <tr>
    <td width="100%" height="20"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile">Prodotto
          in offerta</span></font>
        <input name="campoofferta" type="checkbox" value="SI">
    </td>
  </tr>  
  <tr>
    <td width="100%" height="20"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile">ABILITATO</span></font>
        <input name="campoabilitato" type="checkbox" value="SI" checked>
    </td>
  </tr>
  <tr>
    <td width="100% bgcolor="#690101"" valign="middle"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile" >Disponibilit&agrave;</span></font> </td>
  </tr>
  <tr>
    <td width="78%">
      <textarea class="stilenero"  name="campodisponibilita" cols="84" rows="6" ></textarea>
    </td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#690101" valign="middle"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif"> <span class="stile" >Descrizione</span></font> </td>
  </tr>
  <tr>
    <td width="100%">
      <textarea class="stilenero"  name="campodescrizione" cols="84" rows="6" ></textarea>
    </td>
  </tr>
</table>
<table width="100%" border="0" align="center" bgcolor="#690101">
  <tr>
    <td width="100%" bgcolor="#690101"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif">
		<span class="stile">Foto mini (75/60)</span></font>
	</td>    
  </tr>
  <tr>
	<td width="78%">
	  <font size="2" face="Geneva, Arial, Helvetica, sans-serif">
	  <INPUT TYPE="file" NAME="fotomini1" size="40"></input> 
	  </font>
	</td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#690101"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif">
		<span class="stile">Foto mini (75/60)</span></font>
	</td>    
  </tr>
  <tr>
	<td width="100%">
	  <font size="2" face="Geneva, Arial, Helvetica, sans-serif">
	  <INPUT TYPE="file" NAME="fotomini2" size="40"></input> 
	  </font>
	</td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#690101"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif">
		<span class="stile">Foto mini (75/60)</span></font>
	</td>    
  </tr>
  <tr>
	<td width="100%">
	  <font size="2" face="Geneva, Arial, Helvetica, sans-serif">
	  <INPUT TYPE="file" NAME="fotomini3" size="40"></input> 
	  </font>
	</td>
  </tr>   
  <tr>
    <td width="100%" bgcolor="#690101"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif">
		<span class="stile">Foto media (100/75)</span></font>
	</td>    
  </tr>
  <tr>
	<td width="100%">
	  <font size="2" face="Geneva, Arial, Helvetica, sans-serif">
	  <INPUT TYPE="file" NAME="fotomedia" size="40"></input> 
	  </font>
	</td>
  </tr>       
  <tr>
    <td width="100%" bgcolor="#690101"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif">
		<span class="stile">Foto grande (220/165)</span></font>
	</td>    
  </tr>
  <tr>
	<td width="100%">
	  <font size="2" face="Geneva, Arial, Helvetica, sans-serif">
	  <INPUT TYPE="file" NAME="fotogrande1" size="40"></input>
	  </font>
	</td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#690101"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif">
		<span class="stile">Foto grande (220/165)</span></font>
	</td>    
  </tr>
  <tr>
	<td width="100%">
	  <font size="2" face="Geneva, Arial, Helvetica, sans-serif">
	  <INPUT TYPE="file" NAME="fotogrande2" size="40"></input>
	  </font>
    </td>
  </tr>
  <tr>
    <td width="100%" bgcolor="#690101"><font color="#FFFFFF" size="5" face="Geneva, Arial, Helvetica, sans-serif">
		<span class="stile">Foto grande (220/165)</span></font>
	</td>    
  </tr>
  <tr>
	<td width="100%">
	  <font size="2" face="Geneva, Arial, Helvetica, sans-serif">
	  <INPUT TYPE="file" NAME="fotogrande3" size="40"></input>
	  </font>
	</td>
  </tr>                 
</table>


<table align="center" width="98%" border="0" bgcolor="#690101">
  <tr>
    <td align="center"><input name="submit" type="submit" value="Memorizza" method="POST">	
	</td>
  </tr>
</table>
</form>
<div align="center">
<font color="#FFFFFF"> Torna all'elenco </font>		
</div>
<%
else
	Response.Write("<font color=#FFFFFF> NESSUNA CATEGORIA MEMORIZZATA. IMPOSSIBILE PROSEGUIRE.</font>")
end if
%>
</body>
</html>