Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

UPDATE EN SQL SERVER

29/06/2007 - 16:13 por CAJA CONTROL 7.5 | Informe spam
Ayuda Hacer una pregunta
HOLA a todos de antemano muchas gracias por compartir sus conocimientos


tengo una instruccion que deseo me modifique un campo de mi tabla es la
siguiente y me sale error alquien me podria orientar? gracias

Dim cn As ADODB.Connection
Set cn = New ADODB.Connection


Dim sSelect As String

sSelect = "UPDATE Mesas INNER JOIN CAJA ON Mesas.Cliente =
CAJA.cliente SET CAJA.Fecha = [MESAS].[FECHA];"

cn.Open "Provider=SQLNCLI; " & _
"Initial CatalogÊJASQL; " & _
"Data Source2.168.1.20\SQLEXPRESS; " & _
"integrated security=SSPI; persist security info=True;"


Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset


rs.Open sSelect, cn, adOpenStatic


rs.Close
cn.Close
email Siga el debateRespuesta 2 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Salvador Ramos
29/06/2007 - 09:31 | Informe spam
Hola,

No estás utilizando la sintaxis correcta de la instrucción update:
sSelect = "UPDATE Mesas INNER JOIN CAJA ON Mesas.Cliente =
CAJA.cliente SET CAJA.Fecha = [MESAS].[FECHA];"


sSelect = "UPDATE Mesas
SET CAJA.Fecha = [MESAS].[FECHA]
FROM Mesas INNER JOIN CAJA ON Mesas.Cliente =
CAJA.cliente;"

Un saludo
Salvador Ramos

www.helpdna.net (información sobre SQL Server y Microsoft .Net)
www.helpdna.net/acerca_de_salvador_ramos.htm


"CAJA CONTROL 7.5" escribió en el mensaje
news:
HOLA a todos de antemano muchas gracias por compartir sus conocimientos


tengo una instruccion que deseo me modifique un campo de mi tabla es la
siguiente y me sale error alquien me podria orientar? gracias

Dim cn As ADODB.Connection
Set cn = New ADODB.Connection


Dim sSelect As String

sSelect = "UPDATE Mesas INNER JOIN CAJA ON Mesas.Cliente =
CAJA.cliente SET CAJA.Fecha = [MESAS].[FECHA];"

cn.Open "Provider=SQLNCLI; " & _
"Initial CatalogÊJASQL; " & _
"Data Source2.168.1.20\SQLEXPRESS; " & _
"integrated security=SSPI; persist security info=True;"


Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset


rs.Open sSelect, cn, adOpenStatic


rs.Close
cn.Close




Preguntas similares

 

Busqueda sugerida :