(17-05-18, 12:12 AM)Michael Maher كتب : 28 lمشاهدة ومحدش عنده رد
PHP كود :
Private Sub LoginButton_Click(sender As Object, e As EventArgs) Handles LoginButton.Click
Try
Dim con As New SqlConnection("Data source=.;Initial Catalog=ChurchMembership;Integrated Security=True")
If TextBoxUsername.Text = "" Then
MsgBox("You Must Enter The Username", MsgBoxStyle.Exclamation, "Error")
End If
If TextBoxPassword.Text = "" Then
MsgBox("You Must Enter The Password", MsgBoxStyle.Exclamation, "Error")
End If
Dim Str As String = "select * from Users where Username =" & TextBoxUsername.Text & "and Password=" & TextBoxPassword.Text & ""
Dim da As New SqlDataAdapter(Str, Con)
Dim ds As New DataSet
da.Fill(ds)
If ds.Tables(0).Rows.Count > 0 Then
Me.Hide()
MdiParent.Show()
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
PHP كود :
Username ='" & TextBoxUsername.Text & "' and Password="
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير


