Το είχα πρόχειρο στον installer του project που δουλεύω:
Private Function GetDatabaseInstallScript() As String()
Dim statements As String = LoadManifestResource("DBInstaller.DBInstall.sql")
statements = statements.Replace("GO", ";")
Return statements.Split(";")
End Function
Και
sqlInstall = GetDatabaseInstallScript
conn = New SqlConnection(strConnection)
conn.Open()
Try
For Each sql As String In sqlInstall
cmd = New SqlCommand(sql, conn)
cmd.ExecuteNonQuery()
Next
Catch ex As Exception
Throw
Finally
conn.Close()
End Try
Οπότε το φέρνεις στα μέτρα σου και είσαι έτοιμος...
Vir prudens non contra ventum mingit