Tiptop GP中如何opendialog

不羅嗦，直接上代碼：

MAIN
  DEFINE DirName   STRING
  DEFINE FType     STRING
  DEFINE FExt      STRING
  DEFINE WTitle    STRING
  DEFINE myFile    STRING
  
  LET DirName="C:\\Temp" 
  LET FType="Excel File"
  LET FExt="*.xls"
  LET WTitle="Open a Excel File For Import"

  CALL ui.interface.frontcall("standard","openfile",[DirName,FType,Fext,WTitle],myFile)
  IF myFile IS NOT NULL THEN
    display "you select file is : ",myFile
  ELSE
    display "Has been canceled by user!"
  END IF  

END MAIN

說明：可以接上篇，當要選擇客戶端的excel文件，來導入tiptop時用。