
25/11/2004, 15:23
|
 | | | Fecha de Ingreso: septiembre-2002 Ubicación: Buenos Aires - Argentina
Mensajes: 220
Antigüedad: 22 años, 7 meses Puntos: 0 | |
te copio un ejemplo del mismo
'<------------- Insertar por parametros los datos en remedy-------------------->
Set strConection = Server.CreateObject("ADODB.Connection")
strConection = "DRIVER={SQL Server}; SERVER=sdbuetycau01; DATABASE=Arsystem; UID=webuser; PWD=1234567"
set cmdInsertOpinion = Server.CreateObject("ADODB.Command")
cmdInsertOpinion.ActiveConnection = strConection
cmdInsertOpinion.CommandText = "SP_NewRemedyTicket"
cmdInsertOpinion.CommandType = 4
cmdInsertOpinion.CommandTimeout = 0
cmdInsertOpinion.Prepared = true
cmdInsertOpinion.Parameters.Append cmdInsertOpinion.CreateParameter("@Fecha_Hora_Llam ada", 135, 1, 20,Now())
cmdInsertOpinion.Parameters.Append cmdInsertOpinion.CreateParameter("@grupo", 200, 1, 15,"CAU LLAMADAS")
cmdInsertOpinion.Parameters.Append cmdInsertOpinion.CreateParameter("@abierta_por", 200, 1, 10, "YP00448")
cmdInsertOpinion.Parameters.Append cmdInsertOpinion.CreateParameter("@usuario", 200, 1,10,request.form("id"))
cmdInsertOpinion.Parameters.Append cmdInsertOpinion.CreateParameter("@descripcion", 200, 1,255,request.form("descripcion"))
cmdInsertOpinion.Parameters.Append cmdInsertOpinion.CreateParameter("@Tipo_servicio", 200, 1,15,request.form("tipo_servicio"))
cmdInsertOpinion.Parameters.Append cmdInsertOpinion.CreateParameter("@servicio", 200, 1,15,request.form("servicio"))
cmdInsertOpinion.Parameters.Append cmdInsertOpinion.CreateParameter("@Estado", 2, 1, 1, "0")
cmdInsertOpinion.Parameters.Append cmdInsertOpinion.CreateParameter("@Asignada_a", 200, 1,15,request.form("resolucion"))
cmdInsertOpinion.Parameters.Append cmdInsertOpinion.CreateParameter("@ip", 200, 1,12,request.ServerVariables("remote_addr"))
cmdInsertOpinion.Execute()
__________________ <% Viru %> |