ASP y SQLserver

Queria hacer un añadido,

El bucle donde me devuelve el error es el siguiente:


if not IsEmpty(Request("Id")) then
Dim nId
Dim rsArticulo

nId=Request("Id")

Set rsArticulo = Server.CreateObject("ADODB.Recordset")
rsArticulo.Open "Select * from GesArticulos where CodArticulo ='" & nId &
"'", ConexionTexto
ArticuloPone nId, rsArticulo("CodArticulo"), rsArticulo("Nombre"),"",
rsArticulo("Precio"), 1, true

end if

Concretamente en la linea 8.

Salu2 de nuevo y Gracias

"0c3r" escribió en el mensaje
news:#
| Buenas Grupo,
|
| Queria comentaros un problema que tengo con ASP y SQL server. En este caso
| la Pagina ASP esta en un servidor y la Base de datos esta en otro
servidor.
| La conexion la realiza perfectamente ya que se ha probado, pero llega un
| momento en el que me devuelve este error interactuando desde el ASP:
|
| "Microsoft OLE DB Provider for ODBC Drivers error '8004d00a'
|
| [Microsoft][ODBC SQL Server Driver]Error en transacción distribuida "
|
|
| Me gustaria que me echaseis una mano, ya que es de vital importancia que
| esto funcione y no se como arreglarlo. Este error comienza cuando se hace
un
| cambio del servidor que aloja el ASP (el del servidor SQL es el mismo).
|
|
|
| Gracias por adelantado
|
| Salu2
|
|
| --
|
|
|