Nista mi ne ide...
Sta je sve potrebno (postupno) da bih uspesno kreirao datoteku sql servera?
evo koda, ali mislim da on nije jedini, koji je potreban....?
Code:
Private Sub createDB()
'Create an SQLDMO application
Dim sqlApp as New SQLDMO.ApplicationClass
' Create an Server, which resembles to your actual server
Dim srv as New SQLDMO.SQLServerClass
' Create Database
Dim nDatabase = New SQLDMO.Database
' Create Data Files
Dim nDBFileData as New SQLDMO.DBFile
'Create Log Files
Dim nLogFile As New SQLDMO.LogFile
Dim strDatabaseName As String
strDatabaseName = "Empl"
Try
' Assign a name to database
nDatabase.Name = strDatabaseName
' Assign a name to datafile
nDBFileData.Name = strDatabaseName
nDBFileData.PhysicalName = srv.Registry.SQLDataRoot & "\Data\" & strDatabaseName & "Data.mdf"
nDBFileData.PrimaryFile = True
nDBFileData.Size = 2
nDBFileData.FileGrowthType = SQLDMO.SQLDMO_GROWTH_TYPE.SQLDMOGrowth_MB
nDBFileData.FileGrowth = 1
'Add the DBFile object
'nDatabase.FileGroups.Item("PRIMARY").Add(nDBFileData)
' Assign name to Log files
nLogFile.Name = strDatabaseName & "_Log"
nLogFile.PhysicalName = srv.Registry.SQLDataRoot & "\Data\" & strDatabaseName & "_Log.ldf"
nLogFile.Size = 2
nDatabase.LogFiles.Add(nLogFile)
srv.Databases.Add(nDatabase)
Catch ex As Exception
MessageBox.Show(ex.Message)
Return
End Try
tblEmployees()
End Sub
Posle izvrsavanja (Load_form) izbacuje poruku, SQLDMO This Server Not Conected...!?
Gledao sam tutoriale, ali svi primeri su u C#, nesto razaznam a nesto ne.
Sta je sve potrebno da bi uspesno napravio bazu......
Hvala Pozzz....