[dbms] Script sql

Tue, 24 Oct 2006 14:37:03 -0700

Ahí va un archivo de muestra

 

-----Mensaje original-----
De: [email protected] [mailto:[EMAIL PROTECTED] En nombre de Diego Campos
Enviado el: martes, 24 de octubre de 2006 18:01
Para: dbms List Member
Asunto: [dbms] Script sql

 

con la funcion OPEN, deberías abrir el archivo y luego comenzar a buclear hasta leer todo el contenido y eso lo cargas en una variable.

despues con el .Execute de la conexion tiras el query.

Tenes una muestra de como es el contenido del TXT ?

Diego.-



Jesús dos Santos wrote:

 

Es un archivo txt

 

-----Mensaje original-----
De: [email protected] [mailto:[email protected]] En nombre de Diego Campos
Enviado el: martes, 24 de octubre de 2006 16:15
Para: dbms List Member
Asunto: [dbms] Script sql

 

El script lo tenes en un archivo TXT ??
O la sentencia esta en una variable ??

Con el .EXECUTE de la conexión podes ejecutar queries..
Si queres recuperarlo podes armarte un Recordset.

Tambien tenes los ADODB.Command

Saludos,
Diego.-




Jesús dos Santos wrote:

Lista, alguien sabe como hacer que se ejecute un script sql desde vb6?? Uso sql 2000  y vb6.

Muchas gracias

 

 

--

SISTEMATICA ingenieria de software srl

Diego Campos

Pasco 1675 (2000) Rosario, Santa Fe, Argentina.

Tel./Fax: +54 (341) 485-1432 / 568-0183

 

 

--

SISTEMATICA ingenieria de software srl

Diego Campos

Pasco 1675 (2000) Rosario, Santa Fe, Argentina.

Tel./Fax: +54 (341) 485-1432 / 568-0183

 

ÿþif exists (select * from 
dbo.sysobjects where id = 
object_id(N'[dbo].[Vencimientos]') and 
OBJECTPROPERTY(id, N'IsUserTable') = 1)

drop table [dbo].[Vencimientos]

GO



CREATE TABLE [dbo].[Vencimientos] (

       [Vencimientofecha] [datetime] NULL 
,

       [vencimientodetalle] [varchar] 
(250) COLLATE Modern_Spanish_CI_AS NULL 
,

       [ventaid] [int] NULL ,

       [compraid] [int] NULL ,

       [vencimientoid] [int] IDENTITY (1, 
1) NOT NULL ,

       [vencimientocumplido] [tinyint] 
NULL 

) ON [PRIMARY]

GO



ALTER TABLE [dbo].[Vencimientos] WITH 
NOCHECK ADD 

       CONSTRAINT [PK_Vencimientos] 
PRIMARY KEY  CLUSTERED 

       (

              [vencimientoid]

       )  ON [PRIMARY] 

GO



 CREATE  INDEX [IX_Vencimientos] ON 
[dbo].[Vencimientos]([Vencimientofecha])
 ON [PRIMARY]

GO

Responder a