رشته اتصال به SQL Server Desktop Engine

[mgh64120]

سلام
يه ديتابيس دارم كه با SQL Server2000 تهيه شده.
من ميخوام روي سيستمي كه SQL بصورت Desktop Engine نصب شده با استفاده از VB.Net ديتابيس رو Attach كنم. چطوري ؟
من از كد زير استفاده كردم ولي جواب نداد. نميدونم رشته اتصال اشتباه هست يا نه؟

:متفکر::ناراحت::افسرده::عصبا� �ی++::گریه:



Function AttachDB() As Boolean
ConOpen()
Dim cmd As New SqlCommand()
Dim txt As String
txt = "sp_attach_db @dbname = N'Day', " & vbCrLf & _
"@filename1 = N'C:\Database\DayData.mdf', " & vbCrLf & _
"@filename2 = N'C:\Database\DayLog.ldf'"
cmd.CommandText = txt
cmd.Connection = con
cmd.ExecuteNonQuery()
End Function
Public Sub ConOpen()
Try
constatus = True
con = New SqlConnection("Data Source=.;Initial Catalog=Master;Integrated Security=True")
con.Open()
Catch ex As Exception
constatus = False
End Try
End Sub

[volkswagen]

سلام

توی این کد که من دارم، از دستور con.Open() ایراد می گیره ، چرا؟
من می خوام به sql server وصل بشم ، در حالی که توی رشته اتصال ، " اکسپرس" نوشته ، اونو باید به چی تغییر بدم؟
بسیار ممنون



Imports System.Data
Imports System.Data.SqlClient
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim strsql As String
Dim strcon As String
Dim srtcon As String = "Data Source=RAM\SQLEXXPRESS;lnitial caalog=student;lntegrated security=true"
Dim con As New SqlConnection(strcon)
con.Open()
strsql = "select * from stTable"
Dim da As New SqlDataAdapter(strsql, con)
Dim ds As New DataSet()
da.Fill(ds, "stTable")
DataGrid1.DataBindings.Add(New Binding("dataource", da, "stTable"))
con.Close()
End Sub
End Class

[damanpak]

سلام
يه ديتابيس دارم كه با SQL Server2000 تهيه شده.
من ميخوام روي سيستمي كه SQL بصورت Desktop Engine نصب شده با استفاده از VB.Net ديتابيس رو Attach كنم. چطوري ؟
من از كد زير استفاده كردم ولي جواب نداد. نميدونم رشته اتصال اشتباه هست يا نه؟

:متفکر::ناراحت::افسرده::عصبا� �ی++::گریه:



Function AttachDB() As Boolean
ConOpen()
Dim cmd As New SqlCommand()
Dim txt As String
txt = "sp_attach_db @dbname = N'Day', " & vbCrLf & _
"@filename1 = N'C:\Database\DayData.mdf', " & vbCrLf & _
"@filename2 = N'C:\Database\DayLog.ldf'"
cmd.CommandText = txt
cmd.Connection = con
cmd.ExecuteNonQuery()
End Function
Public Sub ConOpen()
Try
constatus = True
con = New SqlConnection("Data Source=.;Initial Catalog=Master;Integrated Security=True")
con.Open()
Catch ex As Exception
constatus = False
End Try
End Sub




سلام به این حالت تغیییر بده فکر کنم جواب بده


Try
con.ConnectionString = "Data Source=.;Integrated Security=True"
With cmd
.CommandText = "EXEC sp_attach_db 'Day',@filename1 = N'C:\Database\DayData.mdf',@filename2 = N'C:\Database\DayLog.ldf'"
.Connection = con
.Connection.Open()
.ExecuteNonQuery()
.Connection.Close()
End With
MessageBox.Show("بانک اطلاعاتی متصل گردید", title, MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1, MessageBoxOptions.RightAlign)
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try

[damanpak]

سلام

توی این کد که من دارم، از دستور con.Open() ایراد می گیره ، چرا؟
من می خوام به sql server وصل بشم ، در حالی که توی رشته اتصال ، " اکسپرس" نوشته ، اونو باید به چی تغییر بدم؟
بسیار ممنون



Imports System.Data
Imports System.Data.SqlClient
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim strsql As String
Dim strcon As String
Dim srtcon As String = "Data Source=RAM\SQLEXXPRESS;lnitial caalog=student;lntegrated security=true"
Dim con As New SqlConnection(strcon)
con.Open()
strsql = "select * from stTable"
Dim da As New SqlDataAdapter(strsql, con)
Dim ds As New DataSet()
da.Fill(ds, "stTable")
DataGrid1.DataBindings.Add(New Binding("dataource", da, "stTable"))
con.Close()
End Sub
End Class



دوست عزیز واسه اتچ کردن دیتابیس فکر کنم باید از کانکشن استرینگ زیر استفاده کنی

"Data Source=.;Integrated Security=True"

جوابی رو که برای mgh64120 گذاشتم 99% جواب سوال شما هم هست

[volkswagen]

بسیار ممنون

من کد رو به این شکل تغییر دادم:
ولی بازم ارور می ده ، مشکل می تونه از خود بانک باشه؟ من روی بانک پسورد گذاشتم ، بردارم درست میشه؟ خیلی ممنون



Imports System.Data
Imports System.Data.SqlClient
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim strsql As String
Dim strcon As String
Dim srtcon As String = ".;Integrated Security=True"
Dim con As New SqlConnection(strcon)
con.Open()
strsql = "select * from stTable"
Dim da As New SqlDataAdapter(strsql, con)
Dim ds As New DataSet()
da.Fill(ds, "stTable")
DataGrid1.DataBindings.Add(New Binding("dataource", da, "stTable"))
con.Close()
End Sub
End Class

[damanpak]

Dim srtcon As String = ".;Integrated Security=True":متعجب::متعجب:
سلام
حب بایدم ارور بده
این کانکشن استرینگی هست که من گذاشتم

"Data Source=.;Integrated Security=True"

اینم کانکشن استرینگی هست که شما گذاشتی توی برنامه ات

".;Integrated Security=True"

خب بنظرت کانکشن استرینگ شما عبارت "Data Source=" رو اولش کم نداره؟
ضمنا این سایت (http://www.connectionstrings.com/sql-server/) اطلاعات خیلی خوبی در زمینه کانکشن استرینگ داره

[volkswagen]

ببخشید ، من توی کپی کردن اشتباه کردن ، والا صددرصد اینو می ذاشتم.به هر حال ممنون.

الان ظاهرا اون مشکل برطرف شده و به این خط ایراد می گیره:
da.Fill(ds, "f12")



Imports System.Data
Imports System.Data.SqlClient
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim strsql As String
Dim strcon As String
strcon = "Data Source=.;Integrated Security=True"

Dim con As New SqlConnection(strCon)
con.Open()
strsql = "select * from f12"
Dim da As New SqlDataAdapter(strsql, con)
Dim ds As New DataSet()
da.Fill(ds, "f12")
DataGrid1.DataBindings.Add(New Binding("dataource", da, "f12"))
con.Close()
End Sub
End Class

[volkswagen]

از این خط این خطا رو می گیره ، مشکل از خود بانک نیست؟:گریه:

111283

[damanpak]

سلام ازین استفاده کن

dim con as new sqlconnection( "Data Source=.;Integrated Security=True")
Dim da As New Sqldataadapter("select * from f12",con)
Dim ds As New DataSet()
da.Fill(ds)
DataGrid1.Datasource=ds

[volkswagen]

اون ارور همچنان پاربرجاست:عصبانی++:

خب ببخشید ی سوال ، الان این به چه بانکی وصل میشه؟

توی رشته ی اتصال اصلا اسم بانک رو ننوشتیم

من توی بانک ی یوزرنیم تعریف کردم ، فکر می کنم توی رشته اتصال می بایست یوزر نیم و پسورد بدم ، درسته؟چجوری؟

تشکر