CHUYỂN MÃ DỮ LIỆU SANG BẢNG
MÃ TIẾNG VIỆT UNICODE
I.- ĐẶT VẤN ĐỀ :
Theo quy định của Chính phủ, từ ngày 01/01/2003, tất cả các thông tin tiếng Việt trao đổi
trên mạng thông tin đều phải sử dụng bảng mã Tiếng Việt Unicode.
Hiện nay trên thị trường đã xuất hiện nhiều công cụ chuyển mã đáp ứng được yêu cầu
chuyển văn bản (Text) và siêu văn bản (Hyper Text) từ các bảng mã Tiếng Việt thông dụng như
VNI, ABC, ... sang Unicode hiệu quả khá tốt. Ngoài ra, trong bộ gõ Vietkey 2000 cũng đã cung
cấp kiểu gõ cho bảng mã Tiếng Việt Unicode. Tuy nhiên về CSDL thì việc chuyển mã sẽ chạm
đến những vấn đề phức tạp hơn. Chúng tôi đã giải quyết yêu cầu này bằng một cách đơn giản và
ít tốn kém là sử dụng một hàm chuyển mã. Chỉ cần bổ sung hàm này vào chương trình quản lý
CSDL (môi trường Foxpro), khi đó các lệnh xuất ra file văn bản phải được "lọc" qua hàm này để
văn bản xuất ra theo mã Unicode. Với cách giải quyết như vậy, ta không cần phải chuyển mã
CSDL và viết lại chương trình phần mềm.
II.- CHƯƠNG TRÌNH NGUỒN CỦA HÀM CHUYỂN MÃ :
Chúng tôi đặt tên hàm là BKTOUNI, lưu trong file tên BKTOUNI.PRG. Nội dung file
này như sau : (nếu soạn trên Windword, bạn chọn font .VnTime, rồi Save với dạng Text Only).
FUNC BKTOUNI
PARA CHUOI
PRIVATE ALL
SET TALK OFF
CHUOI1=ALLTRIM(CHUOI)
CHUOI2=""
DAI=LEN(CHUOI1)
FOR I=1 to DAI
BK=SUBS(CHUOI1,I,1)
DO CASE
CASE BK="¸"
UNI="á"
CASE BK="µ"
UNI="à"
CASE BK="¶"
UNI="ả"
CASE BK="·"
UNI="ã"
CASE BK="¹"
UNI="ạ"
CASE BK="¨"
UNI="ă"
CASE BK=""
UNI="ấ"
CASE BK="Ç"
UNI="ầ"
CASE BK=""
UNI="ẩ"
CASE BK=""
UNI="ẫ"
CASE BK=""
UNI="ậ"
CASE BK="©"
UNI="â"
CASE BK="¾"
UNI="ắ"
CASE BK="»"
UNI="ằ"
CASE BK="¼"
UNI="ẳ"
CASE BK="½"
UNI="ẵ"
CASE BK="Ỉ"
UNI="ặ"
CASE BK="Ð"
UNI="é"
CASE BK="Ì"
UNI="è"
CASE BK="Ỵ"
UNI="ẻ"
CASE BK=""
UNI="ẽ"
CASE BK="Đ"
UNI="ẹ"
CASE BK="ª"
UNI="ê"
CASE BK=""
UNI="ế"
CASE BK="Ị"
UNI="ề"
CASE BK="Ĩ"
UNI="ể"
CASE BK="Ơ"
UNI="ễ"
CASE BK="Ư"
UNI="ệ"
CASE BK="Ý"
UNI="í"
CASE BK="×"
UNI="ì"
CASE BK=""
UNI="ỉ"
CASE BK=""
UNI="ĩ"
CASE BK="Þ"
UNI="ị"
CASE BK=""
UNI="ó"
CASE BK="ß"
UNI="ò"
CASE BK=""
UNI="ỏ"
CASE BK=""
UNI="õ"
CASE BK=""
UNI="ọ"
CASE BK="«"
UNI="ô"
CASE BK=""
UNI="ố"
CASE BK=""
UNI="ồ"
CASE BK="ỉ"
UNI="ổ"
CASE BK="ç"
UNI="ỗ"
CASE BK=""
UNI="ộ"
CASE BK="¬"
UNI="ơ"