• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

Chỉnh sửa lại dữ liệu trong access

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Thành viên giúp nhau
  • Chỉnh sửa lại dữ liệu trong access
• Chỉnh sửa lại dữ liệu trong access

• Chỉnh sửa lại dữ liệu trong access

  Hoanggiathanhsingles > 16-05-11, 04:59 PM

  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ỷ.

• RE: Chỉnh sửa lại dữ liệu trong access

  Cafe Via He > 16-05-11, 05:31 PM

  Tham khảo cái này
  
  Sample
  
  
  

• RE: Chỉnh sửa lại dữ liệu trong access

  Hoanggiathanhsingles > 17-05-11, 12:02 PM

  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ỷ.

• RE: Chỉnh sửa lại dữ liệu trong access

  Cafe Via He > 17-05-11, 12:25 PM

  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);

• RE: Chỉnh sửa lại dữ liệu trong access

  Noname > 17-05-11, 12:28 PM

  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!

• RE: Chỉnh sửa lại dữ liệu trong access

  Hoanggiathanhsingles > 19-05-11, 05:07 PM

  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
• Bài trước Bài tiếp