Da PHP a ASP

[styweb86]

Ragazzi chi sa tradurmi questo script PHP in ASP... Grazie

<?php

$con = null;
$host="localhost";
$user="root";
$pass="";
$nomeDb="paesechevai";
$i=0;
$send;
$id = $_GET['provincia'];

$con = mysql_connect($host,$user,$pass);
    if(!$con){
           echo "Connessione al database fallita";
            exit;}
    
$test = mysql_select_db($nomeDb,$con);
    if(!$test){
            echo "Selezione del database\"$nomeDb\" FALLITA";
            exit;}
        
$query = "select * from comuni where provincia=$id";

$ris = mysql_query($query,$con);
    if(!$ris){
           echo "Query FALLITA: Errore durante la creazione della tabella \"$nomeDb\"";
           exit;}

while($riga = mysql_fetch_row($ris)){
    $send[]=$riga[1];    
    $id_comuni[] = $riga[0];
    //echo $riga[1]." ".$riga[0]." ";
}            

$cnt = count($send);

while($i != $cnt){
echo $send[$i];
echo "-";
echo $id_comuni[$i];
echo "-";
$i++;
}

        

?>

[Atari]

host = "localhost"
user = "root"
pass = ""
nomeDb = "paesechevai"
id = Request.QueryString("provincia")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={MySQL ODBC 3.51 Driver}; Server=" & host & "; Database=" & nomeDb & "; UID="&user&"; PWD=" & pass
        
Query = "select * from comuni where provincia=" & id
Set Rs = Server.CreateObject("ADODB.RecordSet")
Rs.Open Query, Conn, 3, 3

ReDim Cnt(Rs.RecordCount) 'array
ReDim IdComuni(Rs.RecordCount)

For I = 0 To Rs.RecordCount -1
Cnt(I) = Rs.Fields(1)
IdComuni(I) = Rs.Fields(0)
Rs.MoveNext
Next

Rs.Close()
Set Rs = Nothing
Conn.Close()
Set Conn = Nothing

For I = 0 To UBound(Cnt) -1
Response.Write( Cnt(I) & " - " & IdComuni(I) & " - ") 
Next

dovrebbe funzionare, spero

Ciau!
- Dean