Visual Basic - Ejecutar Script SQL7 desde VB

tengo un script q contiene la creacion de una base de datos y otro script q contiene la creacion de tablas y store porcedures en la base de datos que creo en el primer script ,
quiero que estos script (extension .sql que contiene la creacion de tablas y strore procedures).... sea llamado desde una aplicacion de visual basic, alguien me podria dar una idea de como llamarlo y ejecutarlo...
o en todo caso poner todo el script dentro de la misma aplicacion de Vb6 y ejecutarlo...

Gracias...

En esta pagina tienes un manual completisimo, y tambien de procedimientos almacenados con codigo de ejemplo.

http://www.fastlink.com.uy/usuarios/mpuente/

y ve a la seccion "vb y sql 7", te recomiendo leas todo

Lo que debes hacer es leer el archivo .SQL desde VB y almacenarlo en una variable String y luego ejecutar esta cadena. La lectura del archivo debes hacerla de la siguiente forma:

Public Function RecuperarScript(FileName As String) As String
Dim mstrScript As String
Dim mstrTemp As String
Dim mintFileNum As Integer

mintFileNum = FreeFile

Open FileName For Input As #mintFileNum
Do While Not EOF(mintFileNum)
Line Input #mintFileNum, mstrTemp
mstrScript = mstrScript & mstrTemp & vbCrLf
Loop
Close #mintFileNum

Debug.Print mstrScript
RecuperarScript = mstrScript
End Function

Luego la puedes llamar de la siguiente forma:

Dim CNN As ADODB.Connection
Dim Script As String
...
...

Script = RecuperarScript("C:\SCRIPT1.SQL")
CNN.Execute Script
...
...

Espero que te sirva...