Llamar la ventana guardarcomo con varios opciones
Tengo un reporte y al exportar la data quiero que me muestre varios opciones o tipos de archivos al cual deseo guardar .
utilizo este dw_repexport.SaveAsAscii('c:\planillon.xls', '~t', '') pero solo me muestra 3 tipos de opciones para guardar para este uso un sub datawindow crosstab. Al utilizar el saveas() me muestra varias opciones pero no los datos correctamente.
Espero hacerme entender gracias de antemano
utilizo este dw_repexport.SaveAsAscii('c:\planillon.xls', '~t', '') pero solo me muestra 3 tipos de opciones para guardar para este uso un sub datawindow crosstab. Al utilizar el saveas() me muestra varias opciones pero no los datos correctamente.
Espero hacerme entender gracias de antemano
1 respuesta
Respuesta de Nestor Tirado Díaz
Intente hacerlo en tres formatos: Excel, Word y Text, pero en el Word no salia bien:
Integer li_ret, li_currow,li_fh
String ls_named,ls_txtname,ls_cod_generacion,ls_ley1
String ls_defext = "xsl"
String ls_filtro = "Archivo de Excel(*.xsl),*.xsl"
// aqui te da la opcion de escoger, pero solo te muestra el *txt y no el nombre:
//String ls_filtro = "Archivo de Excel(*.xsl),*.xsl" + "Archivo de Texto(*.txt),*.txt"
//el filtro tambien puede ser
//ls_filtro = "Archivo de Texto(*.txt),*.txt"
li_ret = GetFileSaveName("Guardar Achivo",ls_txtname,ls_named,ls_defext,ls_filtro)
//si usa el filtro de xls
dw_1.SaveAs(ls_txtname, excel!, TRUE)
//si usa el filtro de txt
//dw_1.SaveAs(ls_txtname, text!, TRUE)
Integer li_ret, li_currow,li_fh
String ls_named,ls_txtname,ls_cod_generacion,ls_ley1
String ls_defext = "xsl"
String ls_filtro = "Archivo de Excel(*.xsl),*.xsl"
// aqui te da la opcion de escoger, pero solo te muestra el *txt y no el nombre:
//String ls_filtro = "Archivo de Excel(*.xsl),*.xsl" + "Archivo de Texto(*.txt),*.txt"
//el filtro tambien puede ser
//ls_filtro = "Archivo de Texto(*.txt),*.txt"
li_ret = GetFileSaveName("Guardar Achivo",ls_txtname,ls_named,ls_defext,ls_filtro)
//si usa el filtro de xls
dw_1.SaveAs(ls_txtname, excel!, TRUE)
//si usa el filtro de txt
//dw_1.SaveAs(ls_txtname, text!, TRUE)
