Problemi di connessione DB access

[biosurf]

Salve a tutti, vorrei sapere perchè se faccio 2 connessioni a 2 tabelle diverse nello stesso database mi da un errore nella seconda connessione

tb_provincia.ActiveConnection = MM_ita_STRING

il codice è il seguente.

<%
Dim tb_localita
Dim tb_localita_numRows

Set tb_localita = Server.CreateObject("ADODB.Recordset")
tb_localita.ActiveConnection = MM_ita_STRING
tb_localita.Source = "SELECT * FROM tb_localita"
tb_localita.CursorType = 0
tb_localita.CursorLocation = 2
tb_localita.LockType = 1
tb_localita.Open()

tb_localita_numRows = 0
%>
<%
Dim tb_provincia
Dim tb_provincia_numRows

Set tb_provincia = Server.CreateObject("ADODB.Recordset")
tb_provincia.ActiveConnection = MM_ita_STRING
tb_provincia.Source = "SELECT * FROM tb_provincia"
tb_provincia.CursorType = 0
tb_provincia.CursorLocation = 2
tb_provincia.LockType = 1
tb_provincia.Open()

tb_provincia_numRows = 0
-----------------------
Serie di operazione con le 2 tabelle
-----------------------
<%
tb_localita.Close()
Set tb_localita = Nothing
%>
<%
tb_provincia.Close()
Set tb_provincia = Nothing
%>
%>

grazie in anticipo.

[maximum]

Se la pagina è la stessa, basta solo una connessione.

[biosurf]

Premetto che questo codice non l'ho scritto io e sto cercando di sistemare un sito ke non ho fatto io.

Si il codice è nella stessa pagina, ed è quello ke ho pensato io ke basta solo una connessione....

tu come lo scriveresti questo codice?

[maximum]

Prova così:

<%
'Le variabili tutte in testa 
Dim tb_localita
Dim tb_localita_numRows
Dim tb_provincia
Dim tb_provincia_numRows

Set tb_localita = Server.CreateObject("ADODB.Recordset")
'La connessione la metterei in un file include, così puoi richiamarla anche in altri, senza modifiche particolari - INIZIO 
tb_localita.ActiveConnection = MM_ita_STRING
'La connessione la metterei in un file include, così puoi richiamarla anche in altri, senza modifiche particolari - FINE 
tb_localita.Source = "SELECT * FROM tb_localita"
tb_localita.CursorType = 0
tb_localita.CursorLocation = 2
tb_localita.LockType = 1
tb_localita.Open()

tb_localita_numRows = 0

Set tb_provincia = Server.CreateObject("ADODB.Recordset")
tb_provincia.Source = "SELECT * FROM tb_provincia"
tb_provincia.CursorType = 0
tb_provincia.CursorLocation = 2
tb_provincia.LockType = 1
tb_provincia.Open()

tb_provincia_numRows = 0
-----------------------
Serie di operazione con le 2 tabelle
-----------------------
<%
tb_localita.Close()
Set tb_localita = Nothing
%>
<%
tb_provincia.Close()
Set tb_provincia = Nothing
%>

[biosurf]

mi da un errore su:

tb_provincia.Open()

avevo provato anke io a togliere la connessione della seconda tabella