//格式
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" )