my2alee โพสต์ 2024-12-20 10:17:15

[vb6] - ชนิดตัวแปรที่เก็บค่าได้มากกว่า 255 ตัวอักษร

แก้ไขครั้งสุดท้ายโดย my2alee เมื่อ 2024-12-20 12:08

- ชนิดตัวแปรที่เก็บค่าได้มากกว่า 255 ตัวอักษร

ผมดึงข้อมูลจากไฟล์ xxx.ini ข้อมูลค่าของคีย์ที่ดึงมาเก็บในตัวแปรมีความยาวมากกว่า 255 ตัวอักษร
ลองประกาศตัวแปรเป็นชนิด string หรือ Variant แล้วเพื่อรับค่ามาเก็บไว้ในตัวแปร แต่มันดึงมาได้แค่ 255 ตัวอักษร
ไม่ทราบว่าต้องประกาศชนิดตัวแปรแบบไหนครับ ถึงดึงออกมาได้ทั้งหมด

ที่ลองแล้ว Dim op1x AS String หรือ Dim op1x AS Variant

xxx.ini >>


OP1='001','005','021', ......... ประมาณ 600-700 อักษรได้
แต่ลองดึงจากไฟล์ .txt สามารถดึงมาได้ครบ แต่ไม่สามารถแยกคีย์แบบ ini ได้หรือคีย์มีข้อจำกัดครับว่ากำหนดค่าได้ไม่เกิน 255

key=value

ขอบคุณครับ


my2alee โพสต์ 2024-12-20 13:59:55

ได้แล้วครับ เผื่อใครติดปัญหา
https://www.tek-tips.com/threads/reading-from-ini-file.1530581/
อยู่ที่ฟังก์ชั่น

Public Function sGetINI(sINIFile As String, sSection As String, sKey _
                As String, sDefault As String) As String
    Dim sTemp As String * 255
    Dim nLength As Integer
    sTemp = Space$(255)
    nLength = GetPrivateProfileString(sSection, sKey, sDefault, sTemp, _
            255, sINIFile)
    sGetINI = Left$(sTemp, nLength)
End Function

เปลี่ยนจาก 255 เป็นค่าที่มากกว่า
หน้า: [1]
ดูในรูปแบบกติ: [vb6] - ชนิดตัวแปรที่เก็บค่าได้มากกว่า 255 ตัวอักษร