Web services testing

[manoi]

ตอนนี้ผมได้ปรับปรุงตัว HOSxP Web services ใหม่ครับ ที่ Address นี้


http://hosxp.net:1024/wsdl

สิ่งที่เพิ่มขึ้นมาคือ class ของข้อมูลผู้ป่วยครับ ซึ่งสามารถเรียกใช้งานได้ผ่าน Method GetPatient


Download HOSxPIndyWebServiceServer ได้จากที่นี่ครับ http://hosxp.net/~manoi/HOSxPIndy.zip เผื่อจะเอาไปลองทดสอบในเครื่องตัวเอง  (เปิดโปรแกรมขึ้นมาทำงานแ้ล้วใช้ address http://127.0.0.1:1024/wsdl )


Web Service Server ถูกสร้างขึ้นโดยใช้ Delphi 2006 + Indy9 มีวิธีการสร้างอิงจากบทความนี้ครับ http://dn.codegear.com/article/27513

[manoi]

ตัวอย่าง Project ที่ใช้ Delphi ดึงข้อมูลจาก Webservice มาใช้งานครับ

[manoi]

ฝากคุณหมออรัญช่วยทดสอบใช้งานผ่าน php (pear soap) ด้วยนะครับ 

ผมพยายามจะเขียนเป็น code ตัวอย่างแต่ติดตรง soap_header ส่งไปไม่ถูกสักทีครับ

โค๊ด: PHP

1. require_once 'SOAP/Client.php';
2. $wsdl_url =
3.   'http://hosxp.net:1024/wsdl/IIHOSxP';
4. $WSDL     = new SOAP_WSDL($wsdl_url,array('trace' => 1));
5. $client   = $WSDL->getProxy();
6.  
7. $user = 'hosxp';
8. $pwd = 'hosxp';
9.  
10. $AuthHeader = array('UserName' => $user,'Password' => $pwd);
11.  
12. $SoapHeader = new SOAP_Header('{http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd}TAuthHeader', false, array('TAuthHeader' => $AuthHeader));
13.  
14. $client->AddHeader($SoapHeader);
15. $xr = $client->echoString("Hi from php","");
16. print_r($xr);
17.  

[draran]

รับทราบ ปฏิบัติครับ 

[doramon]

ขอบคุณมากครับ อ.ชัยพร  ผมหาสาเหตุ  ที่ผมทำไม่ผ่านเจอแล้วครับ
 

[GODgimuru]

คือ ผม เข้าไป ดาวโหลด ราย Form-opd-Refcr_out ไม่ได้ครับ รบกวน ด้วยครับผม

[manoi]

ช่วงนี้เปลี่ยน Harddisk เครื่อง server ใหม่ครับ ก็เลยทำให้ web service ใช้งานไม่ได้ (run อยู่ใน Harddisk ที่กำลังเปลี่ยน)

[GODgimuru]

รับทราบครับผม 

[nuttavut]

  ;Dเอาอันนี้ไปลองดูก่อนก็ได้นะครับมีการแก้ไขจากเดิม .....

[GODgimuru]

ขอบคุณมากครับ รบกวนอีกนิดนะครับ ยัง ขาด Form-opd-refer-reply ครับ ผม