//删除rcpt.ini
int ii
if FileExists("rcpt.ini") then
filedelete("rcpt.ini")
end if
//重建rcpt.ini
ii = FileOpen("rcpt.ini",StreamMode!, Write!, LockWrite!, Replace!)
fileclose(ii)
//写ini
SetProfileString("rcpt.ini","rcpt_master","rcpt_no",ls_rcpt_no)
//读ini
charge_type=profilestring("obilling.ini","unit_in_contract","contract_charge_type","")
