Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

generar scripts ( el bueno )

03/08/2004 - 12:46 por Aitor | Informe spam
Ayuda Hacer una pregunta
Hola:
Private Sub Command1_Click()
Dim dmosrv As New SQLDMO.SQLServer
Dim dmodb As New SQLDMO.Database
Dim dmotbl As New SQLDMO.Table
dmosrv.Connect "ibintpr2", "sa", "admsql"
dmosrv.DataBases.Refresh
'->dmodb = dmosrv.DataBases.Item(Northwind, dbo)
'->dmotbl = dmodb.Tables.Item(customers, dbo)
'Dim tu As String
'->tu = dmotbl.Script(SQLDMOScript_Default +
SQLDMOScript_Drops, "c:\tor.sql")
End Sub

Estoy intentando utilizar el siguiente codigo ( vb6 ) para
obtener el script de una tabla, pero me da error en las
lineas que os marco una flecha. Sabeis a que puede ser
debido?
email Siga el debateRespuesta 2 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Carlos Sacristan
03/08/2004 - 13:05 | Informe spam
¿Qué error te da?


Un saludo

-
"Sólo sé que no sé nada. " (Sócrates)

Por favor, responder únicamente al foro
Se agradece la inclusión de sentencias DDL


"Aitor" escribió en el mensaje
news:9ff901c47947$23267ba0$
Hola:
Private Sub Command1_Click()
Dim dmosrv As New SQLDMO.SQLServer
Dim dmodb As New SQLDMO.Database
Dim dmotbl As New SQLDMO.Table
dmosrv.Connect "ibintpr2", "sa", "admsql"
dmosrv.DataBases.Refresh
'->dmodb = dmosrv.DataBases.Item(Northwind, dbo)
'->dmotbl = dmodb.Tables.Item(customers, dbo)
'Dim tu As String
'->tu = dmotbl.Script(SQLDMOScript_Default +
SQLDMOScript_Drops, "c:\tor.sql")
End Sub

Estoy intentando utilizar el siguiente codigo ( vb6 ) para
obtener el script de una tabla, pero me da error en las
lineas que os marco una flecha. Sabeis a que puede ser
debido?

Preguntas similares

 

Busqueda sugerida :