ارور براي بازكردن sql (فووووووووووووررررررريييييييي)

[takpar9]

با سلام
داخل ويژوال استاديو كد نوشتم.
اما وقتي اجرا ميكنم به con.open() ارور ميده.
چيكار كنم؟
دوبار هم ويندوز عوض كردم و برنامه هارو مجدد رو سيستم ريختم.
البته درست نصب شده چون استادم نصب كرده.
اما اونم مشكل رو نميدونه كه كجاست.
Imports System.Data.SqlClient
Public Class frmVorood
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If txtpass.Text = "" Or txtuser.Text = "" Then Exit Sub
Dim con As New SqlConnection
Dim comand As New SqlCommand
con.ConnectionString = "server=(local);database=db_akkasi;trusted_connection=yes"
con.Open()
Dim D_Reader As SqlDataReader
comand.CommandText = "select * from tbl_login where username='" & txtuser.Text & "' "
comand.Connection = con
D_Reader = comand.ExecuteReader
Dim temp(2) As String
While D_Reader.Read
temp(1) = (D_Reader.GetValue(0))
temp(2) = (D_Reader.GetValue(1))
End While
con.Close()
If txtuser.Text = temp(1) And txtpass.Text = temp(2) Then
frmMain.Show()
Me.Hide()
End If
اينم كد برنامه.
كد لاگين هست.

 

[Ramin.N]

دوست عزیز
از پنجره Server Explorer به دیتابیس وصل شوید.
روی دیتابیس راست کلیلک کنید و Properties انتخاب کنید.
Connection String را از این قسمت بردارید.

 

[takpar9]

اون پنجره دقيقا كجاس؟