PB 通过 PostRul
一、 创建Standard Class对象 type为"internetresult" n_ir
二、 界面中,增加按钮。点击测试post提交。
Blob lblb_args
String ls_header
String ls_url
String ls_args
Long ll_length
Integer li_rc
inet iinet_base,iinet
n_ir ir
iinet_base = Create inet
iinet = Create inet
li_rc = GetContextService( "Internet", iinet_base )
IF li_rc = 1 THEN
ir = Create n_ir
ls_url = "http://127.0.0.1/DrugstorePresc/user/login"
//ls_url = "http://www.baidu.com"
ls_args = '{ &
"password": "",&
"username": ""&
}'
lblb_args = Blob( ls_args )
ll_length = Len( lblb_args )
ls_header = "Content-Type: " + &
"application/json;charset=UTF-8~n"