corbaobject my_corbaobj
jaguarorb my_orb
namingcontext my_nc
namecomponent the_name[]
integer li_filenum
long ll_ret
string ls_orb
if not fileexists("orb.ior") then
messagebox("提示","醫保服務器的IOR地址檔案不存在,請檢查后重試")
return false
end if
li_filenum = fileopen("orb.ior")
fileread(li_filenum,ls_orb)
fileclose(li_filenum)
my_orb = create jaguarorb
ll_ret = my_orb.init("RBRetryCount=3,ORBRetryDelay=1000")
ll_ret = my_orb.string_to_object(ls_orb,my_corbaobj)
ll_ret = my_corbaobj._narrow(my_nc,"omg.org/CosNaming/NamingContext")
ii_syscode = 5
try
the_name[1].id = "MZYL"
the_name[1].kind = "Service"
my_corbaobj = my_nc.resolve(the_name) <---到這個地方就拋出例外CORBA System Exception: CORBA_BAD_OPERATION at line 44 in function of_login of object n_szyb_clinic.
my_corbaobj._narrow(ip_intmz,"hi/modMZ/intMZ")
the_name[1].id = "DZ"
the_name[1].kind = ""
my_corbaobj = my_nc.resolve(the_name)
my_corbaobj._narrow(ip_intdz,"hi/modDZ/intDZ")
catch(exception e)
messagebox("Exception Raised!",e.getmessage())
return false
end try
我這里面有一個簡單的測驗程式，需要的話留個郵箱或者QQ：69686166
uj5u.com熱心網友回復：
哈哈哈··兄弟，深圳醫保不是這樣搞的···uj5u.com熱心網友回復：
這么搞法，留個聯系方式！！！uj5u.com熱心網友回復：
深圳醫保用pb怎么處理，那位兄弟可以提供幫助uj5u.com熱心網友回復：
聯系qq：724636241轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/63678.html
標籤：API 調用
上一篇：如何把excel匯入到資料庫中