プロジェクト フォルダを別のハード ドライブにコピーしようとしているときに問題が発生しました。Visual Studio の私のプロジェクトは で定義されてh:\
おり、exe ファイル プロジェクトを実行している間は問題ありませんが、フォルダ プロジェクトを別のハード ドライブにコピーしている間、アプリケーションを SQL Server に接続するのに問題があります。
これらのスクリーンショットを参照してください。
- http://upload.tehran98.com/img1/f9kio8ssjofg1lhkjdg.jpg
- http://upload.tehran98.com/img1/k6ajdb22xhdjrgcn419.jpg
たとえば、ログインフォームとログインボタンのコードは次のとおりです。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim conn As New SqlConnection("Server=.\SQLExpress;AttachDbFilename=" + Environment.CurrentDirectory + "\Database\Automation.mdf;Database=Automation;Trusted_Connection=Yes;")
s2 = "Select count( * ) from Login where UserName = '" & TextBox1.Text & "' and Password = '" & TextBox2.Text & "'"
Dim com As New SqlCommand(s2, conn)
Dim res As Object
conn.Open()
res = com.ExecuteScalar()
conn.Close()
If res = 1 Then
MsgBox("Welcome Dear " + TextBox1.Text, MsgBoxStyle.OkOnly, "Login Successful")
us = TextBox1.Text
If us = "admin" Then
Main.Label4.Text = "ADMINISTRATOR"
Else
Main.Label4.Text = "USER"
us = TextBox1.Text
Main.Button3.Enabled = False
Main.Button5.Enabled = False
Main.Button9.Enabled = False
End If
Main.Show()
Me.Hide()
Else
MsgBox("Invalid User OR Password", MsgBoxStyle.Critical, "Attention Please")
TextBox1.Text = ""
TextBox2.Text = ""
Exit Sub
End If
End Sub