Visual Basic para Aplicaciones - Crear Vista en servidor SQL desde VBA

Life is soft - evento anual de software empresarial
 
Vista:

Crear Vista en servidor SQL desde VBA

Publicado por Gurí (4 intervenciones) el 07/03/2007 17:34:48
Hola, necesito crear una vista en el servidor SQL Server desde VBA. Al principio pensé que podría hacerlo como una inserción mediande un querydef, pero no es así. Si alguien me ayuda, me será de gran alegría. Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Crear Vista en servidor SQL desde VBA

Publicado por jorge avalos (1 intervención) el 27/03/2007 19:48:18
haa ps ests bien facil mi chavo
ahi te va el codigo oki

dim vm_Select as string

vm_Select = "CREATE VIEW Vw" & C_USERID & " AS "
vm_Select = vm_Select & "SELECT KNTB_Companias.KNnv_nombre AS Sucursal, " & _
"FAnv_Talon, FAdt_FechaFac, " & _
"Cliente = CASE WHEN FAnv_CveCliPaga = FAnv_RemCve " & _
"THEN FAnv_Remitente ELSE FAnv_Destinatario END, " & _
"FAdc_Total, FAnv_Descripcion AS Motivo, CRTb_Clientes.CRin_Grupo AS Grupo, "

vm_Select = vm_Select & "Total = 1, FATb_Factura.FAin_DestinoSuc AS No_Suc " & _
"From FATb_Factura " & _
"INNER JOIN KNTB_Companias ON FATb_Factura.FAin_DestinoSuc = KNTB_Companias.KNin_nucia " & _
"LEFT JOIN CRTb_Clientes ON FATb_Factura.FAnv_CveCliPaga = CRTb_Clientes.CRnv_CveCliente " & _
"LEFT JOIN FATb_MotivoCancela ON FATb_MotivoCancela.FAnv_Clave = FATb_Factura.FAnv_CveCancela "

'etc... todo lo que quieras en tu select para la vista...

'y despues lo creas

Cn_W.Execute vm_Select

'nota: Cn_W es una coneccion a la base de datos oki

Saludos!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar