Gitiho contest
Cùng gitiho contest chinh phục kiến thức, khẳng định bản thân với hệ thống bài test phong phú, đầy đủ các chủ đề để bạn khám phá.
Lộ trình học tập
Khám phá đỉnh cao tri thức cùng Gitiho qua hành trình học tập được thiết kế tỉ mỉ và toàn diện. Với kho tàng lộ trình đa dạng, chuyên sâu trên mọi lĩnh vực, chúng tôi sẽ đồng hành cùng bạn khai phá tiềm năng, chinh phục thách thức và khẳng định giá trị bản thân. Mỗi hành trình đều được nghiên cứu công phu, tạo nên bước đệm vững chắc để bạn tự tin bứt phá và tỏa sáng trên con đường phát triển sự nghiệp."
Gitiho for leading business
Tối ưu và đơn giản hóa hoạt động đào tạo tại doanh nghiệp. Sẵn sàng nền tảng, nội dung đào tạo cho tất cả các vị trí, bộ phận. Ứng dụng MIỄN PHÍ ngay vào doanh nghiệp chỉ với MỘT click.
Đã được tin tưởng sử dụng bởi các doanh nghiệp
e có câu lệnh update trong sql như sau sqlcmd = "UPDATE NhapXuatTon SET SLTON=' " + uf_XuatBanLetbx_SLTontext
thầy ơi, e có câu lệnh update trong sql như sau: sqlcmd = "UPDATE NhapXuatTon SET SLTON=' " + uf_XuatBanLe.tbx_SLTon.text + " ', NGAYBAN = ' " + uf_XuatBanLe.tbx_NgayBan.text + " ', TENDV_BAN=' " + uf_XuatBanLe.tbx_TenDVBan.text + " ', TENKH_LE=' " + uf_XuatBanLe.tbx_HoTen.text + " ' WHERE NhapXuatTon.SOKHUNG =" + uf_XuatBanLe.tbx_SoKhung1.text + " OR NhapXuatTon.SOMAY=" + uf_XuatBanLe.tbx_SoMay1.text + " )"
khi chạy e vào cửa sổ local windows kiểm tra :"UPDATE NhapXuatTon SET SLTON=' ', NGAYBAN = ' 06/10/2021 ', TENDV_BAN=' H5 ', TENKH_LE=' AAAAAAAA ' WHERE NhapXuatTon.SOKHUNG = AAAAAAA1111111111 OR NhapXuatTon.SOMAY= AAAAAAA111111 )". nhìn thấy đã ra kết quả rồi
Nhưng khi e bấm chạy nó báo lỗi, e bị sai chỗ nào vậy thầy
25 câu trả lời
267 lượt xem
vỗ tay
Chào bạn bạn chạy xem câu query đó trên access có đúng không?
bạn thử query sau
UPDATE NhapXuatTon SET SLTON=' ', NGAYBAN = ' 06/10/2021 ', TENDV_BAN=' H5 ', TENKH_LE=' AAAAAAAA ' WHERE NhapXuatTon.SOKHUNG = 'AAAAAAA1111111111' OR NhapXuatTon.SOMAY= 'AAAAAAA111111'
vỗ tay
vỗ tay
vỗ tay
bạn xem trong code có cái số khung nào như thế không?
vỗ tay
vỗ tay
Bạn có thể đẩy file access lên ko?
vỗ tay
dạ e gửi thầy file access ạ
vỗ tay
Chào bạn đúng rồi bạn nhé mình kiểm tra câu query của bạn
vỗ tay
dạ
vỗ tay
vỗ tay
Bạn gửi file lên giúp gitiho nhé
vỗ tay
hướng dẫn e cách tải file lên nha thầy
vỗ tay
Bạn gửi lên Google drive nhé
vỗ tay
em gửi thầy file access ạ
vỗ tay
Bạn mở quyền truy cập ra giúp gitiho
vỗ tay
Chào bạn bạn xem lại nhé phần mã hàng của bạn có hai dấu cách ở đầu và cuối của chuỗi bạn thêm 2 dấu cách đó sẽ ra kết quả
vỗ tay
vỗ tay
Chúc bạn học tốt cùng gitiho cảm ơn bạn
vỗ tay
e kiểm tra câu query trong access chạy rồi
code vba của e vẫn chưa chạy được.
Private Sub cmd_XuatVaCapNhatVoucher_Click()
Dim Spart As String
Dim sqlcmd As String
Dim kq As Boolean
Spart = ThisWorkbook.Path + "\Database.accdb"
sqlcmd = "UPDATE NhapXuatTon SET SLTON=' " + uf_XuatBanLe.tbx_SLTon.text + " ', NGAYBAN = ' " + uf_XuatBanLe.tbx_NgayBan.text + " ', TENDV_BAN=' " + uf_XuatBanLe.tbx_TenDVBan.text + " ', TENKH_LE=' " + uf_XuatBanLe.tbx_HoTen.text + " ' WHERE SOKHUNG =' " + uf_XuatBanLe.tbx_SoKhung1.text + " ' OR SOMAY=' " + uf_XuatBanLe.tbx_SoMay1.text + " ')"
kq = QuerySQLExecute(sqlcmd, Spart, True)
Call Laydulieu3
Sub Laydulieu3() ' Gan du lieu vao lbx ton xe tren uf_XuatXe
Dim Arr As Variant
Spart = ThisWorkbook.Path + "\Database.accdb"
sqlcmd = "SELECT NhapXuatTon.* FROM NhapXuatTon"
Arr = QuerySQL(sqlcmd, Spart, True)
uf_XuatXe.lbx_TonXe.Clear
If IsArray(Arr) Then
uf_XuatXe.lbx_TonXe.List = Arr
'uf_XuatXe.lbx_TonXe.ColumnCount = 11
End If
End Sub
vỗ tay
Chào bạn bạn thử với câu lệnh không bị lỗi dấu cách xem nhé.
vỗ tay
hoặc bạn thử copy cái sqlcmd khi tạo chuỗi trực tiếp vào access xem có tạo ra câu update không?
vỗ tay
vỗ tay
Chúc bạn học tốt cùng gitiho
vỗ tay
Câu hỏi liên quan
Top
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông