![]() ![]() Private Sub cmdConnect_Click(sender As System. Object, e As System.EventArgs) Handles cmdSend.Click Private Sub cmdSend_Click(sender As System. This is form 1 that i want connect with database If Report = True Then MsgBox(Exception, MsgBoxStyle.Critical, "Exception:") If String.IsNullOrEmpty(Exception) Then Return False Public Function HasException(Optional Report As Boolean = False) As Boolean ![]() Public Sub AddParam(Name As String, Value As Object)ĭim NewParam As New SqlParameter(Name, Value) If DBCon.State = ConnectionState.Open Then DBCon.Close() Params.ForEach(Sub(p) (p))Įxception = " ExecQuery Error: "
0 Comments
Leave a Reply. |
Details
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |