PDA

View Full Version : مشکل در attach فایل



isaac23
پنج شنبه 03 اردیبهشت 1394, 14:01 عصر
سلام دوستان من از ویژال بیسک 6 استفاده میکتم و الان بانک رو ک
dettach
کردم مشکلی نداشت اما واسه attach کردن هر کار میکنم نمیشه میشه راهنمائی کنید .
130577



نمونه کد
Dettach

Set objConn = New ADODB.Connection
objConn.ConnectionString = "driver={SQL Server};server=(local);uid=;pwd=;database=master"
objConn.Open
objConn.Execute "sp_detach_db @dbname = N'Dbase'"

objConn.Close






و نمونه کد attach


Set objConn = New ADODB.Connection
objConn.ConnectionString = "driver={SQL Server};server=(local);uid=;pwd=;database=master"
objConn.Open
objConn.Execute "sp_attach_db @dbname = N'F:\Zip\Test\Dbase.mdf'"

objConn.Close

isaac23
پنج شنبه 03 اردیبهشت 1394, 16:34 عصر
از ویژال بیسک 6 استفاده میکنم نمونه کد این رو میخوام

isaac23
پنج شنبه 03 اردیبهشت 1394, 18:35 عصر
خیلی لازم دارم ممنون میشم راهنمائی کنید...

isaac23
جمعه 04 اردیبهشت 1394, 00:23 صبح
به هر حال ممنون از کمکی که نکردید خودم پیداش کردن میزام شاید بدرد کسی خورد
Dim objConn As ADODB.Connection
Set objConn = New ADODB.Connection
objConn.ConnectionString = "driver={SQL Server};server=(local);uid=;pwd=;database=master"
objConn.Open
objConn.Execute "sp_attach_db @dbname = N'Dbase',@filename1 = N'C:\Program Files\Microsoft SQL Server\MSSQL.1\MSSQL\Data\Dbase.mdf',@filename2 = N'C:\Program Files\Microsoft SQL Server\MSSQL.1\MSSQL\Data\Dbase_log.ldf'"


objConn.Close