עבר עריכה לאחרונה בתאריך 26.01.04 בשעה 16:13 על ידי על-ידי codmaster (מנהל הפורום)
טוב אז ככה אני רוצה ליצור שאילתת עדכון וזה מה שרשמתי והוא מוציא לי הערה שזה לא טוב ואני לא יודע מה הבעייה בבקשה תעזרו לי אני חייב עזרה..
Dim ConnADO As ADODB.Connection
Dim ssql As Stringssql = "update Customers set " & _
"Code_Customer = " & TxtCode & "," & _
"Id_Card = " & Txtid & "," & _
"Last_Name = " & TxtLastName & "," & _
"First_Name = " & TxtFirstName & "," & _
"Company_Name = " & TxtCompeny & "," & _
"Street = " & TxtStreet & "," & _
"House_Number = " & TxtHouseNum & "," & _
"City = " & TxtCity & "," & _
"Zip_Code = " & TxtZipCode & "," & _
"Telephone = " & MaskTel & "," & _
"Pelephone = " & MaskPel & "" MsgBox ssql
Set ConnADO = New ADODB.Connection
ConnADO.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=" & App.Path & "\ComputerLand.mdb;Persist Security Info=False"
ConnADO.Open
ConnADO.Execute ssql
ConnADO.Close
|
תודה רבה לכל העוזרים
גירסת הדפסה
סגן המנהל
מפקח
Winner
צל"ש
מומחה
