من کدی که گفتید که به هر 2 صورت در برنامم قرار دادم ولی هیچ کدومش جواب نداد
آیا باید تغییرات دیگه ای هم بدم تا کار کنه یا اینکه محل گذاشتنش اشتباهه؟
من کد attach رو در جایی قرار دادم که قرار هست در برنامه فقط 1 بار اجرا بشه و به صورت زیر نوشتمش
Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button11.Click
If TextBox1.TextLength = 0 Or TextBox2.TextLength = 0 Or TextBox3.TextLength = 0 Or TextBox4.TextLength = 0 Or TextBox5.TextLength = 0 Then
MessageBox.Show("لطفا اطلاعات را كامل وارد کنید ")
ElseIf TextBox4.Text <> TextBox5.Text Then
MessageBox.Show("تكرار رمز عبور اشتباه است ")
Else
Dim cn As New SqlClient.SqlConnection
cn.ConnectionString = "Data Source=.\SQLEXPRESS;AttachDbFilename=I:\\project_d ata;Integrated Security=True;User Instance=True"
Dim cmd As New SqlClient.SqlCommand
cn.Open()
cmd.Connection = cn
cmd.CommandType = Data.CommandType.Text
و یکی هم به این صورت نوشتم
Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button11.Click
If TextBox1.TextLength = 0 Or TextBox2.TextLength = 0 Or TextBox3.TextLength = 0 Or TextBox4.TextLength = 0 Or TextBox5.TextLength = 0 Then
MessageBox.Show("لطفا اطلاعات را كامل وارد کنید ")
ElseIf TextBox4.Text <> TextBox5.Text Then
MessageBox.Show("تكرار رمز عبور اشتباه است ")
Else
Dim cn As New SqlClient.SqlConnection
cn.ConnectionString = "Data Source=(local);Initial Catalog=project;Integrated Security=True"
Dim cmd As New SqlClient.SqlCommand
cn.Open()
cmd.Connection = cn
cmd.CommandType = Data.CommandType.Text
cmd.CommandText = "EXEC sp_attach_db @dbname,@filename1,@filename2"
cmd.Parameters.Add("@dbname", SqlDbType.VarChar, 260).Value = "project"
cmd.Parameters.Add("@filename1", SqlDbType.VarChar, 260).Value = "I:\\project_data.mdf"
cmd.Parameters.Add("@filename2", SqlDbType.VarChar, 260).Value = "I:\\project_log.mdf"
cmd.ExecuteNonQuery()
cmd.CommandText = " INSERT INTO [user](id,name,vahed,pass1,pass2)VALUES(@TextBox1,@TextB ox2,@TextBox3,@TextBox4,@TextBox5)"
cmd.Parameters.AddWithValue("textbox1", Me.TextBox1.Text)
cmd.Parameters.AddWithValue("textbox2", Me.TextBox2.Text)
cmd.Parameters.AddWithValue("textbox3", Me.TextBox3.Text)
cmd.Parameters.AddWithValue("textbox4", Me.TextBox4.Text)
cmd.Parameters.AddWithValue("textbox5", Me.TextBox5.Text)
cmd.ExecuteNonQuery()
MessageBox.Show("اطلاعات با موفقیت به ثبت رسید ")
cn.Close()
ولی هیچ کدوم از این حالت ها درست اجرا نشد و موقع اجرای برنامه خطا می داد که نمی تونم به بانک project وصل بشم