파워빌더에서 웹을 실행는 여러가지 방법이 있는데 그중에 한가지
현제 컴퓨터에 기본으로 잡혀있는 web browser 오픈하는 방법
여기저기 찾는라고 공생했는데 의외로 간단하군요
--- 함수로 만들었습니다. ---
// integer of_OpenWeb( string as_Url )
/*
web browser 를 통해서 받아온 주소를 열어 준다.
*/
OLEObject IE
if Left(as_Url, Len('http:')) = 'http:' or Left(as_Url, Len('https:')) = 'https:' then
IE = create OLEObject
IE.ConnectToNewObject("InternetExplorer.Application")
IE.MenuBar = false
IE.ToolBar = false
IE.StatusBar = false
IE.Resizable = false
IE.Width = 1024
IE.Height = 768
IE.navigate( as_Url )
IE.visible = true
DO WHILE IE.busy
setpointer(hourglass!)
yield()
LOOP
Destroy IE
else
messagebox('오류', as_Url )
end if
return 1
다음검색