Ver Mensaje Individual
  #3 (permalink)  
Antiguo 16/03/2011, 09:46
elpaisa
 
Fecha de Ingreso: enero-2011
Ubicación: medellin
Mensajes: 194
Antigüedad: 13 años, 11 meses
Puntos: 0
Respuesta: como puedo concatenar esta instruccion de sql en visual basic

Cita:
Iniciado por Aquaventus Ver Mensaje
Hola elpaisa, una manera seria colocandolo esa instruccion a un txt y hacerle un ReadtoEnd y ejecutar la instruccion con la cadena devuelta. Y la otra manera que hacia para crear un procedure probablemente muy rudimentario seria asi... :

Código vb.net:
Ver original
  1. Sub crearProcedure7()
  2.         Dim cnn As New SqlConnection("Server=" & cboInstancias.Text & "; database=" & txtBase.Text & "; integrated security=yes")
  3.         Dim strSQL As String = "CREATE PROCEDURE modificar_paciente @cod nvarchar(10), @nom nvarchar(45), @pat nvarchar(45), @mat nvarchar(45), @ocu nvarchar(100), @dom nvarchar(250), @sex char(1), @fec nvarchar(10), @tel nvarchar(8), @cel nvarchar(9), @ale nvarchar(200), @enf nvarchar(200) as update paciente set nom_pac=@nom,pat_pac=@pat,mat_pac=@mat,ocu_pac=@ocu,dom_pac=@dom,sex_pac=@sex,fec_pac=@fec,tel_pac=@tel,cel_pac=@cel,ale_pac=@ale,enf_pac=@enf where cod_pac = @cod"
  4.         Dim cmd As New SqlCommand(strSQL, cnn)
  5.         cmd.CommandType = CommandType.Text
  6.         Try
  7.             cnn.Open()
  8.             cmd.ExecuteNonQuery()
  9.         Catch ex As SqlException
  10.             MessageBox.Show(ex.ToString, "Clients")
  11.         Finally
  12.             cmd.Dispose()
  13.             cnn.Close()
  14.         End Try
  15.     End Sub

muchas gracias por responder tan pronto pero te pregunto

bueno ademas en la instruccion que tengo que enviar hay parte

select @KeyEntry= max(KeyEntry)from SAINT_CONTAB.dbo.C03Entry

-- Insertar Tercero si no existe en Ventas Credito

If not exists (select * from SAINT_CONTAB.[dbo].[C03Thirds] where ID_Third=@ID3)
Begin
INSERT INTO SAINT_CONTAB.[dbo].[C03Thirds]
([ID_Third]
,[Descrip]
,[ID_OrgThird])
VALUES
(@ID3,@NomClie,@ID3)
Print 'SE INSERTO EL TERCERO '+@ID3
End
-- Insertar Registro Cuenta x Cobrar en Ventas Credito

INSERT INTO SAINT_CONTAB.[dbo].[C03Trans] ([KeyEntry],[siPeriod],[ID_Entry],[Id_Trans],[Nline],[ID_Account],[ID_Document],[dtDate],[siMonth],[Reference],[dtDateTrc],[Detail],[ID_Class],[Amount],[Cr],[TaxBase]) Values

es decir no puedo meter todo en una sola linea porque en ciertas partes hay que colocar un comentario y si lo coloco en una sola linea del resto para adelante lo puede tomar como un comentario y no como instruccion


lo que yo quiero es que me lo pueda tomar toda la instruccion string tal cual como es

Ademas en el procedimiento tengo que enviar los parametros para poder ejecutarlo en la base de datos