24-03-18, 03:19 PM
(آخر تعديل لهذه المشاركة : 24-03-18, 03:20 PM {2} بواسطة السيد الجوهري.)
كود :
Sub ADD_1(ByVal NAME As String, ByVal guid_ As String, ByVal date_e As String)
Dim CON As New CLS_CON
CON.EXECUTE_TXT("INSERT INTO user_transaction(NAME,guid,date_)VALUES('" & NAME & "','" & guid_ & "','" & date_e & "')")
End Sub