/* */

Wednesday, December 2, 2015

FW: [belajar-access] Re: Membagi Isi Field berdasarkan Karakter [1 Attachment]

 

 


From: belajar-access@yahoogroups.com [mailto:belajar-access@yahoogroups.com]
Sent: 23 Oktober 2015 8:12
To: belajar-access@yahoogroups.com
Subject: Re: [belajar-access] Re: Membagi Isi Field berdasarkan Karakter [1 Attachment]

 

 

[Attachment(s) from Ahmad Qomaruddin ud13en@gmail.com [belajar-access] included below]

Saya masih bingung dengan script yang bang Aksan buat, namun saya dapat dari file lama saya (kayaknya dapat juga di milis ini juga) saya pakai fungsi InStr([«start»];[«string»];[«stringmatch»];[«compare»]), untuk mencari lokasi "titik_spasi" sebagai pemisah antara nama dan gelar, kemudian saya kombinasikan dengan fungsi left/right/mid/len sehingga ketemu hasilnya sebagaimana file terlampir.

 

2015-10-22 19:33 GMT+07:00 Aksan Kurdin aksan.kurdin@gmail.com [belajar-access] <belajar-access@yahoogroups.com>:

 

Nah,
berangkat dari logika tersebut,
mencontoh dari script yang sudah saya berikan, ayo... dicoba...
ikan cukup sekali diberikan, selanjutnya kailnya sudah di tangan.
jangan ragu, coba implementasikan ... kalau buntu, coba bawa sini nanti kita pikirkan bersama-sama dimana buntunya...

silakang......


A.K.

On 10/22/2015 2:23 PM, Ahmad Qomaruddin ud13en@gmail.com [belajar-access] wrote:

 

mungkin gelar depan dan nama kita buat pemisah berupa titik dan spasi dan gelar belakang koma dan spasi. Nanti kalo gelar depan dua diantara kedua gelar tidak pakai spasi

 

Misal Prof.Dr. Bambang Raharjo, SH.

Drs. Slamet

Aksan Kurding, ST

Memang pengennya langsung di aplikasikan ke tabel/query aja.

 

 

2015-10-22 12:02 GMT+07:00 aksan.kurdin@gmail.com [belajar-access] <belajar-access@yahoogroups.com>:

 

betul,

jika tidak punya gelar yang ada dalam list prefix dan sufix, maka hanya nama yang terisi:

 

SplitName "aksan kurdin, st."

Prefix : 

Name   : aksan kurdin

Sufix  : st.

 

 

saya perbaiki fungsi IsInArray:

Public Function IsInArray(stringToBeFound As String, arr As Variant) As Boolean

    IsInArray = UBound(Filter(arr, UCase(stringToBeFound))) > -1

End Function

 

 

yang di list dalam array dijadikan uppercase semua (kapital), jadi apa pun inputnya bisa di cek oleh fungsi tersebut.

 

 

Ini hanya salah satu jalan keluar.

cara lain, tidak dengan array, tetapi dibawa ke tabel. nanti tinggal di lookup saja. maintenance lebih gampang, karena list nya ada di tabel, bukan di source code.

 

 

ok, sekarang coba kita bermain logika, mencari cara lain.

bagaimana bisa membedakan kira-kira gelar depan itu bisa dikenali dengan pola apa ?

gelar belakang juga bisa dikenali dengan pola apa ...

 

 

 

A.K.

 



 

--

Ahmad Qomaruddin
DPPKAD Kab. Rembang Jawa Tengah
email : ud13en@gmail.com
blog : ud13en.blogspot.com

 



 

--

Ahmad Qomaruddin
DPPKAD Kab. Rembang Jawa Tengah
email : ud13en@gmail.com
blog : ud13en.blogspot.com

__._,_.___

Attachment(s) from Ahmad Qomaruddin ud13en@gmail.com [belajar-access] | View attachments on the web

1 of 1 File(s)


Posted by: Ahmad Qomaruddin <ud13en@gmail.com>


Reply via web post

Reply to sender

Reply to group

Start a New Topic

Messages in this topic (7)

SPAM IS PROHIBITED

Visit Your Group

·                                 New Members 3



.


__,_._,___

No comments:

Post a Comment