[파워빌더]문서화일(PDF,DOC,XLS)을 WINDOW상에서 바로 확인가능하게 하는 방법?
굳이 파일을 저장하지 않고 처리하시려면 방법은 있습니다.
1) 우선 OLE( ISO9001_Doc)로 불러온 후 BLOB에 저장
불러오기
GetFileOpenName("登记资料选择!",ls_path,ls_filename)
st_name.text =''
If ls_filename ="" Then return
st_name.text = ls_filename
If ISO9001_Doc.insertfile(ls_path) = 0 Then
......
저장하기
lb_object = ISO9001_Doc.objectdata
updateblob ISO_MANUAL set ole_data = :lb_object where ,...
2) BLOB 자료를 호출한 후 OLE 에 연결하여 화면에 자료표시
blob ole_blob
selectblob ole_data into :ole_blob from ISO_MANUAL
where DOC_SEQUENCE = :as_seq;
ISO9001_Doc.objectdata = ole_blob
화면에 자료표시하기.
If ISO9001_Doc.activate(inplace!) <> 0 Then
Messagebox("Error","没有选择指定资料 !")
cb_1.postevent(Clicked!)
Return
End If
이렇게 하시면 화일로 저장하지 않고 MsOffice파일을 열람할 수 있습니다.[출처] 문서화일(PDF,DOC,XLS)을 WINDOW상에서 바로 확인가능하게 하는 방법? (파워빌더 커뮤니티(PBExpertClub)) |작성자 희망의별
1) 우선 OLE( ISO9001_Doc)로 불러온 후 BLOB에 저장
불러오기
GetFileOpenName("登记资料选择!",ls_path,ls_filename)
st_name.text =''
If ls_filename ="" Then return
st_name.text = ls_filename
If ISO9001_Doc.insertfile(ls_path) = 0 Then
......
저장하기
lb_object = ISO9001_Doc.objectdata
updateblob ISO_MANUAL set ole_data = :lb_object where ,...
2) BLOB 자료를 호출한 후 OLE 에 연결하여 화면에 자료표시
blob ole_blob
selectblob ole_data into :ole_blob from ISO_MANUAL
where DOC_SEQUENCE = :as_seq;
ISO9001_Doc.objectdata = ole_blob
화면에 자료표시하기.
If ISO9001_Doc.activate(inplace!) <> 0 Then
Messagebox("Error","没有选择指定资料 !")
cb_1.postevent(Clicked!)
Return
End If
이렇게 하시면 화일로 저장하지 않고 MsOffice파일을 열람할 수 있습니다.[출처] 문서화일(PDF,DOC,XLS)을 WINDOW상에서 바로 확인가능하게 하는 방법? (파워빌더 커뮤니티(PBExpertClub)) |작성자 희망의별