if exists (select * from sysdevices where name=''''TruckDB'''') EXEC sp_dropdevice ''''TruckDB'''' Else EXEC sp_addumpdevice ''''disk'''',''''TruckDB'''', ''''C:\Program Files\Microsoft SQL Server\MSSQL\Data\TruckDB.mdf'''' restore database TruckDB from disk=''''c:\TempDB\TruckDB'''' with replace 其次,在你的工程中添加一个Installer Class:选中Project主工程,添加Installer Class,名称假定为installer1。选择instller1的代码页,添加下面的代码: Public Overrides Sub Install(ByVal stateSaver As System.Collections.IDictionary) ''''重写install方法 Dim file As System.IO.File If file.Exists("C:\Program Files\Microsoft SQL Server\MSSQL\Data\TruckDB_data.mdf") = True Then Exit Sub MyBase.Install(stateSaver) Dim CheckedDir As System.IO.Directory If CheckedDir.Exists("C:\Program Files\Microsoft SQL Server\MSSQL\Data") = False Then CheckedDir.CreateDirectory("C:\Program Files\Microsoft SQL Server\MSSQL\Data")
<< 上一页 [11] [12] [13] [14] [15] [16] [17] [18] [19] [20] 下一页 |