+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Tablodan İstenilen Veriyi Alma Hk. Part2 (/konu-tablodan-istenilen-veriyi-alma-hk-part2.html)
RE: Tablodan İstenilen Veriyi Alma Hk. Part2 - serkan1985 - 12/06/2022
Evet oldu ama en 12 karakterli olan verileri 11 olarak getirdi eksik veri oluştu.
RE: Tablodan İstenilen Veriyi Alma Hk. Part2 - berduş - 12/06/2022
(12/06/2022, 00:16)serkan1985 yazdı: 12 karakterli olan verileri 11 olarak getirdi eksik veri oluştu.örnek veri verebilir misiniz?
RE: Tablodan İstenilen Veriyi Alma Hk. Part2 - serkan1985 - 12/06/2022
080BT001359 booking alanında yazan örneklerden biri normalde 080BT001359'6' olarak kayıtlı.
RE: Tablodan İstenilen Veriyi Alma Hk. Part2 - berduş - 12/06/2022
Function xBooking(xVeri As String) As String
xBooking = ""
Dim regex As RegExp
Set regex = New RegExp
With regex
.Pattern = "Booking No : (.+[^ \t\r\n\v\f])" '[^ \t\r\n\v\f] yerine \S de yazılabilir ===> "Booking No : (.+\S)" gibi
.IgnoreCase = True
.Multiline = False
Set eslesmeler = regex.Execute(xVeri)
For Each eslesme In eslesmeler
If eslesme.SubMatches.Count > 0 Then
For Each alteslesme In eslesme.SubMatches
xBooking = Trim(alteslesme)
Next alteslesme
End If
Next eslesme
End With
End FunctionRE: Tablodan İstenilen Veriyi Alma Hk. Part2 - serkan1985 - 12/06/2022
Çok teşekkür ederim şuan tamamdır elinize emeğiniz sağlık desteğiniz için teşekkürler. Birde outogate_S tablosundaki İçindekiler verisini outogate_S1 tablosunda bulunana sadece içindekiler verisine aynı güncelleme yöntemi ile aktarabilir miyiz? outogate_S İçindekiler verisi otomatik geliyor oraya ordan outogate_S1 içindekiler veri alanına copy paste yapıyorum bunu güncelle şeklinde yapabilmemiz mümkün mü?
Re: Tablodan İstenilen Veriyi Alma Hk. Part2 - berduş - 12/06/2022
her konuda tek soru sorulmalı
o nedenle yeni soru için yeni konu açmalısınız?
Not: [^ \t\r\n\v\f] yerine \S de yazılabilir ===> .Pattern = "Booking No : (.+\S)" gibi S harfi BÜYÜK S olmalı küçük s yazarsanız sonuç değişir