Salve,
da un altro Forum "iPro....", ho recuperato un vostro script:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<TITLE>
Prova di connessione
</TITLE>
</HEAD>
<BODY>
<%
Option Explicit
On Error Resume Next
Dim adoCon
Dim strConnString
Dim strTmp
Dim n
Dim d
strConnString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("./MIO_SITO.xx/db/database.mdb") '## MS Access 97 on Brinkster
'Determino il timeout dello script
Server.ScriptTimeout = 90
'Setto la variabile per una connessione ADO
Set adoCon = Server.CreateObject("ADODB.Connection")
n = err.number
d = err.Description
if n then
strTmp = "Errore: " & n & " - " & d
%>
<!-- HTML -->
(1) ERRORE: <%=strTmp%><BR>
<!-- // HTML -->
<%
endif
adoCon.Open strConnString
n = err.number
d = err.Description
if n then
strTmp = "Errore: " & n & " - " & d
%>
<!-- HTML -->
(2) ERRORE: <%=strTmp%><BR>
<!-- // HTML -->
<%
endif
%>
</BODY>
</HTML>
Giovanni
Innanzi tutto ho dovuto apostrofare la linea "Option Explicit" poichè mi dava errore, per il resto in risposta mi da:
(2) ERRORE: Errore: 424 - Necessario oggetto
Il mio problema è:
Server1 è dove risiede il DB perfettamente funzionante.
Server2 è dove risiede un form da immettere i dati che dovrebbero essere registrati sul Db del Server1.
Tutto questo per avere un unico Db dove convogliare tutte le registrazioni.
C'è una soluzione a questo
Grazie Roberto
Segnalibri