Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
tạo 1 cơ sơ dữ liệu từ cơ sở có sẵn và đặt tên có dạng baocaongay/thang/nam.
#1
Giúp mình với mình có 1 cơ sở dữ liệu access mình tạo thành có sỡ dữ liệu khác bằng cách tạo các table báo cáo, phần này đã làm xong, nhưng khi xuất cái tên file bắt buộc phải có dạng như sau: baocao01022012.Nhưng làm theo cách này:
Private Sub x_Click()
Dim dd As String
Call THUMUC
bcngay = "baocao" & Trim(Day(Me!ngay)) & Trim(Month(Me!ngay)) & Trim(Year(Me!ngay))
dd = "d:\filecapnhatweb\" & bcngay & ".mdb"
If Len(Dir(dd)) = 0 Then
Set W = DBEngine.Workspaces(0)
Set db = W.CreateDatabase(dd, dbLangGeneral, dbEncrypt)
End If
khi xuất ra nếu ngày 1 tháng 1 năm 2012 nó chỉ xuất ra dạng baocao112012 trong khi cái mình cần là baocao01012012.
Bạn nào giúp mình với.
Chữ ký của com031082 Xin chào, mình là com031082, Tham gia http://thuthuataccess.com/forum từ ngày 16-03 -12.
Reply
Những người đã cảm ơn
#2


Mã:
bcngay = "baocao" & Trim(Day(Me!ngay)) & Trim(Month(Me!ngay)) & Trim(Year(Me!ngay))
Bạn sửa lại là
Mã:
bcngay = "baocao" & format(Me!ngay,"ddmmyyyy")
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#3
Bạn thử theo cách sau nhé :
bcngay="baocao" & Trim(iif(Day(me!ngay)<10,"0" & day(me!ngay),day(me!ngay))) & Trim(iif(month(me!ngay)<10, "0" & month(me!ngay),month(me!ngay))) & Trim(year(me!ngay))

ủa, lại chậm nữa ^^!
Chữ ký của hoanglonglangtu Chiều tắt nắng trên con đường quen thuộc
Mưa rơi buồn qua ngõ vắng không em
Từng hạt ngọc rơi đùa qua kẽ lá
Những giọt tràn đầy ngõ ngách tâm tư
Em có biết chiều nay anh vẫn nhớ
Ở nơi nào em có nhớ chăng anh

Trên đời có quá nhiều chữ nếu,đáng tiếc là đều đã qua,việc đã xảy ra,hối hận cũng vô dụng
ღღღღღTài sản của hoanglonglangtu (View All Items) ღღღღღ
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Hướng Dẫn Cách lưu (back up database) dữ liệu! danhxetnghiem 38 8,486 12-05-18, 11:46 AM
Bài mới nhất: MTNQ
  chia sẻ dữ liệu db access qua mạng LAN. tuanvu2409 5 441 02-02-18, 12:41 AM
Bài mới nhất: tranthanhan1962
  [Help] Nhiều người truy cập cùng một dữ liệu import từ Excel nap0le0n 5 446 26-10-17, 12:08 AM
Bài mới nhất: tranthanhan1962
  Về các field (cột dữ liệu) có kiểu là OLE Object lehongduc 2 449 28-08-17, 08:25 AM
Bài mới nhất: lehongduc
  [Hỏi] Sao lưu file MDB và tạo lệnh phục hồi dữ liệu hoangminh 5 622 17-08-17, 03:54 PM
Bài mới nhất: cpucloi

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ| PMA Nha Trang| Gỗ Acrylic Không Đường Line