[VB6] - เช็คสิทธิ์ จาก สปสช.
ไม่ทราบว่าเพื่อนๆหรือ อ. เคยเขียนโปรแกรม เช็คสิทธิ์ จาก สปสช. หรือเปล่าจากตัวอย่างเป็นโค้ดจาก Delphi
https://medium.com/dev2pro/%E0%B8%9E%E0%B8%B1%E0%B8%92%E0%B8%99%E0%B8%B2%E0%B8%A3%E0%B8%B0%E0%B8%9A%E0%B8%9A%E0%B9%80%E0%B8%8A%E0%B9%87%E0%B8%84%E0%B8%AA%E0%B8%B4%E0%B8%97%E0%B8%98%E0%B8%B4%E0%B9%8C-%E0%B9%82%E0%B8%94%E0%B8%A2%E0%B8%81%E0%B8%B2%E0%B8%A3-%E0%B9%80%E0%B8%8A%E0%B8%B7%E0%B9%88%E0%B8%AD%E0%B8%A1%E0%B8%95%E0%B9%88%E0%B8%AD-%E0%B8%81%E0%B8%B1%E0%B8%9A-webservice-%E0%B8%82%E0%B8%AD%E0%B8%87-%E0%B8%AA%E0%B8%9B%E0%B8%AA%E0%B8%8A-51886a7d5772
https://medium.com/dev2pro/%E0%B8%9E%E0%B8%B1%E0%B8%92%E0%B8%99%E0%B8%B2%E0%B8%A3%E0%B8%B0%E0%B8%9A%E0%B8%9A%E0%B9%80%E0%B8%8A%E0%B9%87%E0%B8%84%E0%B8%AA%E0%B8%B4%E0%B8%97%E0%B8%98%E0%B8%B4%E0%B9%8C-%E0%B9%82%E0%B8%94%E0%B8%A2%E0%B8%81%E0%B8%B2%E0%B8%A3-%E0%B9%80%E0%B8%8A%E0%B8%B7%E0%B9%88%E0%B8%AD%E0%B8%A1%E0%B8%95%E0%B9%88%E0%B8%AD-%E0%B8%81%E0%B8%B1%E0%B8%9A-webservice-%E0%B8%82%E0%B8%AD%E0%B8%87-%E0%B8%AA%E0%B8%9B%E0%B8%AA%E0%B8%8A-%E0%B8%94%E0%B9%89%E0%B8%A7%E0%B8%A2-delphi-607881bf175e
เพื่อเป็นแนวทางในการพัฒนาโปรแกรมให้ รพ. ได้ใช้งานในลำดับถัดไป
ขอบคุณมากครับ
สั้นๆง่ายๆ ... คุณหลอกดาว ... เพราะเราต้องทำเรื่องในการเข้าถึงข้อมูล และต้องเป็นคนในสายงานเขาครับ ... ทดสอบกับ VB .NET ...
แก้ไขครั้งสุดท้ายโดย my2alee เมื่อ 2020-8-25 14:54
thongkorn ตอบกลับเมื่อ 2020-8-25 14:14
สั้นๆง่ายๆ ... คุณหลอกดาว ... เพราะเราต้องทำเรื่องในการ ...
ผมลงทะเบียนใช้งานโปรแกรมนี้เรียบร้อยแล้วครับ อ.พอเราเสียบบัตรมันจะได้ token เพื่อให้เราสามารถนำไปใช้งานได้ตามตัวอย่างของเดลไฟ ครับ
เพราะปกติผมก็ใช้ Software ตัวนี้อยู่แล้ว ในการเช็คสิทธให้ผู้มารับบริการที่โรงพยาบาลครับ
------
แต่พอดี ผู้ใหญ่เขาอยากได้ software ที่เขียนขึ้นมาให้เช็คสิทธิผู้ป่วยแล้วให้ระบบลงทะเบียนผู้ป่วย-เข้าระบบซักประวัติเลย
แต่ตอนนี้ติดตรงการเช็คสิทธิ์อยู่ครับ
ผมไม่มี Authen ครับ รู้สึกเขาจะให้เฉพาะหน่วยงานสาธารณสุข กับพวกโรงพยาบาลของรัฐ/เอกชน ผมติดต่อกับบัตรประชาชนได้แล้ว แต่ไม่มีสิทธิ์เข้าถึงครับ แก้ไขครั้งสุดท้ายโดย my2alee เมื่อ 2020-8-26 13:03
thongkorn ตอบกลับเมื่อ 2020-8-25 16:36
ผมไม่มี Authen ครับ รู้สึกเขาจะให้เฉพาะหน่วยงานสาธารณส ...
ผมมีรหัส authen ครับ แต่รหัสจะใช้ได้แค่ 1 วัน
ถ้าส่งให้ อ.test ได้ไหมครับ
ตอนนี้กำลังทดลองใช้ library ตัวนี้อยู่ครับ
แต่ไปต่อไม่เป็น
https://microsoft-soap-toolkit.software.informer.com/3.0/
และลองทำตามนี้E:\NIDCardPlusVB6.0\soap1.png
https://www.vbforums.com/showthr ... sual-Basic-amp-SOAP ผมลง add references เข้ามาแล้ว แต่ไม่รู้จะเรียกใช้ยังไง
ถ้าตามรูปของ อ. .net มันเรียกเข้ามาได้เลย
รูปที่แนบมาผมลองกับ soap ui
my2alee ตอบกลับเมื่อ 2020-8-26 12:12
ผมมีรหัส authen ครับ แต่รหัสจะใช้ได้แค่ 1 วัน
ถ้าส่งให้...
จัดมาทางกล่องข้อความได้เลยครับ UserID/Authen thongkorn ตอบกลับเมื่อ 2020-8-26 13:35
จัดมาทางกล่องข้อความได้เลยครับ UserID/Authen
ส่งให้แล้วครับ อ.
มันใช้ได้เป็น วันนะครับ
ถ้า อ. ทดสอบแล้ว หมดอายุ ผมจะส่ง token ไปให้ใหม่อีกทีครับ
ขอบคุณ อ.ล่วงหน้าครับ my2alee ตอบกลับเมื่อ 2020-8-26 14:10
ส่งให้แล้วครับ อ.
มันใช้ได้เป็น วันนะครับ
ขอบคุณครับผม ... เรียบร้อยแล้วครับ แต่เป็น VB.NET น่ะครับผม
thongkorn ตอบกลับเมื่อ 2020-8-26 14:25
ขอบคุณครับผม ... เรียบร้อยแล้วครับ แต่เป็น VB.NET น่ะครับผม
อยากได้เป็น VB6 ครับ อ. เพราะโปรแกรมผมเขียนไปเยอะแล้ว เหลือติดอยู่ตรงนี้อย่างเดียว my2alee ตอบกลับเมื่อ 2020-8-26 16:17
อยากได้เป็น VB6 ครับ อ. เพราะโปรแกรมผมเขียนไปเยอะแล้ว เหลือติดอยู่ตรงนี้อย่างเดียว
ส่งโค้ดต้นฉบับเฉพาะในส่วนการติดต่อกับ Web Service และบีบไฟล์ส่งมาให้ผมได้มั้ยครับ ผมขี้เกียจพิมพ์ใหม่ ... อันที่จริงไม่ได้ยากเลยเพราะเราได้ข้อมูลแบบ XML มาแล้ว จากนั้นก็ทำการแยกแยะ (Parser) แต่ละ Element ออกมาใส่ TextBox เท่านั้นเองครับ
หน้า:
[1]
2