//格式

GetFileSaveName ( title, pathname, filename {, extension {, filter { , initdir { , aFlag } } } } )

 

//声明

long   li_value

string ls_docname

string ls_named

 

//一参数

li_value = GetFileSaveName("请选择输出到文件名", ls_docname, ls_named, "XLS", "Excel Files (*.XLS), *.XLS" )

//二参数

li_value = GetFileSaveName("请选择输出到文件名:", ls_docname, ls_named, "XLS", "Excel Files (*.XLS), *.XLS,DBF Files (*.DBF), *.DBF" )

//三参数

li_value = GetFileSaveName("请选择输出到文件名:", ls_docname, ls_named, "XLS", "Excel Files (*.XLS), *.XLS,DBF Files (*.DBF), *.DBF,DOC Files (*.DOC), *.DOC" )