Buongiorno a tutto il forum,
devo creare una relazione tra tabelle a runtime.
Ottengo pero' questo errore:

ADOX.Columns errore "800a0bb9'
Gli argomenti utilizzati dall'applicazione non sono di tipo valido, non sono compresi nell'intervallo consentito o sono in conflitto.

eppure lo stesso codice usato con VB funziona perfettamente. Dove batto la testa?? Grazie mille,
Stefano.

PS: Lo script e' questo:

Sub CreateRelationship(strFileName, strNomeRelazione, UpdateOnCascade, DeleteOnCascade, stTabellaPrimaria, strChiavePrimaria, strTabellaSecondaria, strCampoSecondario)

Dim catDB
Dim tbl
Dim key


Set catDB = Server.CreateObject("ADOX.Catalog")
Set key = Server.CreateObject("ADOX.Key")
catDB.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source =" & strFileName
With key
.Name = strNomeRelazione
.RelatedTable = stTabellaPrimaria
.Type = adKeyForeign
.Columns.Append strCampoSecondario
.Columns(strCampoSecondario).RelatedColumn = strChiavePrimaria
If UpdateOnCascade Then
.UpdateRule = adRICascade
Else
.UpdateRule = adRINone
End If
If DeleteOnCascade Then
.DeleteRule = adRICascade
Else
.DeleteRule = adRINone
End If
End With

Set tbl = Server.CreateObject("ADOX.Table")
Set tbl = catDB.Tables(strTabellaSecondaria)
tbl.Keys.Append key
Set catDB = Nothing
End Sub

La riga che genera l'errore e' questa:

.Columns.Append strCampoSecondario

In sostanza, pur riuscendo a creare a runtime una relazione con VB, da ASP lo stesso codice segnale errore.
Riesco anche a creare relazione con SQL e il metodo Execute dell'oggetto Connection, ma anche in questo caso le clausole "UPDATE ON CASCADE" o "DELETE ON CASCADE" restituiscono errore.
Persino gli esempi tratti dall'help di Access in merito generano errori!:

Grazie mille per aver risposto.