Đánh giá chủ đề:
  • 1 Votes - 5 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Chỉnh sửa lại dữ liệu trong access
#1
Trong form của em có một cái textbox lưu đường dẫn thế này
"Y:\Duoc\Database\Images\ZINC SULFATE MONO 98% ZN 35.7% -Lantian Chemical - Back (Large).jpg"
Nhưng vì bây giờ em chuyển cái Database của em sang chổ khác nên đường dẫn này không hoạt động được,em muốn thay "Y:\Duoc\" bằng "K:\QC QA database\VNGTD\" và giử lại toàn bộ đường dẫn thì em phải làm sao??
Rất mong nhận được giúp đỡ của các sư huynh sư tỷ.
Chữ ký của Hoanggiathanhsingles Xin chào! Mình là Hoanggiathanhsingles, thành viên của Thủ Thuật Access tham gia ngày Oct 2010.
Reply
Những người đã cảm ơn
#2
Tham khảo cái này

Sample


Chữ ký của Cafe Via He Ở nhờ nhà mẹ mình big green
ღღღღღTài sản của Cafe Via He (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#3
Cảm ơn Cafe Via He nhiều, nhưng cái này vẫn chưa đáp ứng được như mình mong muốn.
Mình mong muốn là khi nhấp chuột vào nút lệnh thì cái đường dẫn này
"Y:\Duoc\Database\Images\ZINC SULFATE MONO 98% ZN 35.7% -Lantian Chemical - Back (Large).jpg"
Sẽ tự động mất cái cụm "Y:\Duoc\" và tự động thế vào đó bằng cụm "K:\QC QA database\VNGTD\"
Mong nhận được sự chỉ dẫn của các sư huynh tỷ.
Chữ ký của Hoanggiathanhsingles Xin chào! Mình là Hoanggiathanhsingles, thành viên của Thủ Thuật Access tham gia ngày Oct 2010.
Reply
Những người đã cảm ơn
#4
Mình chỉ đưa ví dụ minh họa thôi, còn việc áp dụng vào bài của bạn là do bạn làm chứ. Tự làm như thế mới nhớ và hiểu chứ ng khác làm dùm hết thì bạn sẽ k tiến bộ đâu

Câu query đại loại nó sẽ là:
Mã:
UPDATE Table SET table.path = "K:\QC QA database\VNGTD\" & Mid([table.path],8);
Chữ ký của Cafe Via He Ở nhờ nhà mẹ mình big green
ღღღღღTài sản của Cafe Via He (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#5
Giải thuật thế này, bạn cố gắng thực hiện nhé, ví dụ đường dẫn bạn lưu vào field có tên duongdan.

1/ ta thấy "Y:\Duoc\" gồm 8 ký tự. Như vậy, để lấy đoạn còn lại, ta dùng:
mid(duongdan,8)

2/ ta ghép kết quả có được với đường dẫn mới:
"K:\QC QA database\VNGTD\" & mid(duongdan,8)

Cuối cùng, gọi 1 query update đường dẫn mới này vào duongdan cũ!

Chúc thành công!
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Cafe Via He
#6
Hi..hi..hi
Cảm ơn các sư huynh tỷ đã chỉ dẫn và đưa em khẩu quyết, nương theo đó em đã làm và đã thành công.
Cảm ơn các sư huynh tỷ rất nhiều.
Em xinh gửi đoạn code của em cho sư huynh tỷ xem nhé!

Mã:
Private Sub Command60_Click()
Dim Db As DAO.Database
Dim Rs As DAO.Recordset
Set Db = CurrentDb
Set Rs = Db.OpenRecordset("select duongdan from [Q-LayoutInputing]")
If Rs.RecordCount > 0 Then
Rs.MoveFirst

While Rs.EOF = False
Dim Str, Str2, Str3, Str4 As String
Str = Mid(Rs.Fields("duongdan"), 8) 'cat bo cum dau cua duong dan "Y:\Duoc\"
Str4 = "K:\QC QA database\VNGTD" 'gan cho mac dinh cho bien Str4 cum "K:\QC QA database\VNGTD\"
If Left(Rs.Fields("duongdan"), 8) = "Y:\Duoc\" Then
Dim Cancel As Boolean
Rs.Edit
Rs.Fields("duongdan") = Str4 & Str
Rs.Update
Else
Cancel = True
End If
Rs.MoveNext
Wend
If Rs.EOF = True Then
MsgBox "Update link completed", , "Updated All Completed"
Exit Sub
End If
End If
Chữ ký của Hoanggiathanhsingles Xin chào! Mình là Hoanggiathanhsingles, thành viên của Thủ Thuật Access tham gia ngày Oct 2010.
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
  Nhiều người cùng phát triển 1 ứng dụng Access killitmore 4 119 08-11-17, 01:24 PM
Bài mới nhất: cpucloi
  Phát hiện nhiều sự tào lao của Access 2016 tranthanhan1962 12 296 03-11-17, 11:16 PM
Bài mới nhất: DooHoaangPhuuc
  Hướng Dẫn Lưu 1 file access sẽ về 2 thư mục folder thanhtruong 14 1,514 30-10-17, 11:39 AM
Bài mới nhất: ongke0711
  [Help] Nhiều người truy cập cùng một dữ liệu import từ Excel nap0le0n 5 155 26-10-17, 12:08 AM
Bài mới nhất: tranthanhan1962
  [Help] Import từ MS Access vào phần mềm Bravo tuanvn291089 1 91 24-10-17, 09:03 PM
Bài mới nhất: maidinhdan

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ơ