Thanks Mas Nurhamid
====================
string docname, named
integer value
value = GetFileSaveName("Select File", &
docname, named, "DOC", &
"Excel Files (*.xls),*.HTM," + &
" All Files (*.*), *.*")
docname = left(docname, len(trim(docname)) - 4 )
IF value = 1 THEN
dw_1.Saveas(docname + '.xls', HTMLTable!, True)
END IF
===============
Sedikit modifikasi supaya namanya bukan test.htm.xls
Yazid
Axiasolusi
--- In [email protected], [EMAIL PROTECTED] wrote:
>
> Mas Yazid,
> Coba pakai function : GetFileSaveName(), function ini akan membuka
window
> dialog dimana user bisa pilih folder dan nama filenya.
> Contoh :
>
> string docname, named
> integer value
>
> value = GetFileSaveName("Select File", &
> docname, named, "DOC", &
> "HTML Files (*.HTM),*.HTM," + &
> " All Files (*.*), *.*")
>
> IF value = 1 THEN //bila user klik OK button
> dw_1.Saveas(docname, HTMLTable!, True)
> END IF
>
> Regards,
>
> Nurhamid Abdulbasith
> PT Avon Indonesia
>
>
>
>
>
> "yazid" <[EMAIL PROTECTED]>
> Sent by: [email protected]
> 21/12/2005 09:37 AM
> Please respond to indopb
>
> To: [email protected]
> cc:
> Subject: [indopb] Re: save dw preview to excell - not
dw
>
>
> Thanks to Erwansyah
>
> Ada pertanyaan lagi, kalo saya pake fungsi saveas dibawah
> ===========
> dw_1.SaveAs('test.xls', HTMLTable!, True)
> ===========
> maka file test.xls nya :
> 1. akan ditaruh di folder yg sama dgn db
> 2. nama file xls statis
>
> Gimana caranya supaya,
> 1. folder bisa milih, (browse)
> 2. nama bisa dinamis (user bisa namain sesukanya)
>
> Saya coba pake
> =========
> dw_1.SaveAs('', HTMLTable!, True)
> =========
>
> Tapi di save dialognya, format savenya HTML, dan utk namanya perlu
> ditambah .xls
>
> Kalo utk operator atau user (format HTML dan .xls) agak
membingungkan
> & sedikit gak biasa.
> Ada ide, supaya folder & nama bisa dinamis tapi gak membingunkan
user?
>
> Thanks
>
>
>
>
> --- In [email protected], Erwam Suaj <[EMAIL PROTECTED]>
wrote:
> >
> > saveastype pake htmltable ... filenya manipulasi ke
> > xls aja beres
> >
> > contoh : dwcontrol.saveas('test.xls', htmltable!,true)
> >
> >
> > Coba deh and buktikan sendiri
> >
> > Erwansyah
> >
> >
> > --- yazid <[EMAIL PROTECTED]> wrote:
> >
> > > Need clue ....
> > >
> > > Perintah dibawah ini digunakan utk menyimpan data2
> > > dari datawindow ke
> > > file excell atau lainnya.
> > > ===============
> > > dwcontrol.SaveAs ( { filename, saveastype,
> > > colheading } )
> > > ===============
> > >
> > > Yg saya belum tau, gimana caranya menyimpan data2
> > > setelah dw di
> > > preview, krn jika menggunakan perintah
> > > dwcontrol.saveas() diatas,
> > > kolom2 COMPUTE tidak akan tersimpan ke file excell
> > > dan kolom2 yg tidak
> > > ditampilkan dipreview akan ke simpan di file excell.
> > >
> > > Thanks
> > >
> > >
> > >
> > >
> > >
> > >
> > > ------------------------ Yahoo! Groups Sponsor
> > > --------------------~-->
> > > Get Bzzzy! (real tools to help you find a job).
> > > Welcome to the Sweet Life.
> > >
> > http://us.click.yahoo.com/KIlPFB/vlQLAA/TtwFAA/NhFolB/TM
> > >
> > ------------------------------------------------------------------
--
> ~->
> > >
> > >
> > > -----------------------------------------------
> > > Reuni SMA Negeri 1 Angkatan 1988
> > > Hari/ Tanggal : Minggu, 18 Desember 2005
> > > Pukul : 09.00 â" 12.00 WIB
> > > Lokasi : SMA Negeri 1 Jl. Ir H. Juanda Bandung
> > > Info lanjut hub.: Udjo 0811140603, Ilo 021 â"
> > > 70682007, Ratih 08122129539, Alland 0818202247,
> > > Happy 08161815734
> > > -----------------------------------------------
> > > IndoPB - Indonesia PB User Group
> > > To Post a message, send it to: [EMAIL PROTECTED]
> > > To Unsubscribe,send a blank message to:
> > > [EMAIL PROTECTED]
> > > Yahoo! Groups Links
> > >
> > >
> > > [EMAIL PROTECTED]
> > >
> > >
> > >
> > >
> > >
> >
> >
> > __________________________________________________
> > Do You Yahoo!?
> > Tired of spam? Yahoo! Mail has the best spam protection around
> > http://mail.yahoo.com
> >
>
>
>
>
>
>
> ------------------------ Yahoo! Groups Sponsor --------------------
~-->
> Most low income homes are not online. Make a difference this holiday
> season!
> http://us.click.yahoo.com/5UeCyC/BWHMAA/TtwFAA/NhFolB/TM
> --------------------------------------------------------------------
~->
>
> -----------------------------------------------
> Reuni SMA Negeri 1 Angkatan 1988
> Hari/ Tanggal : Minggu, 18 Desember 2005
> Pukul : 09.00 â" 12.00 WIB
> Lokasi : SMA Negeri 1 Jl. Ir H. Juanda Bandung
> Info lanjut hub.: Udjo 0811140603, Ilo 021 â" 70682007, Ratih
08122129539,
> Alland 0818202247, Happy 08161815734
> -----------------------------------------------
> IndoPB - Indonesia PB User Group
> To Post a message, send it to: [EMAIL PROTECTED]
> To Unsubscribe,send a blank message to: [EMAIL PROTECTED]
> Yahoo! Groups Links
>
>
>
>
>
>
>
>
>
>
>
> [Non-text portions of this message have been removed]
>
------------------------ Yahoo! Groups Sponsor --------------------~-->
Get Bzzzy! (real tools to help you find a job). Welcome to the Sweet Life.
http://us.click.yahoo.com/KIlPFB/vlQLAA/TtwFAA/NhFolB/TM
--------------------------------------------------------------------~->
-----------------------------------------------
Reuni SMA Negeri 1 Angkatan 1988
Hari/ Tanggal : Minggu, 18 Desember 2005
Pukul : 09.00 12.00 WIB
Lokasi : SMA Negeri 1 Jl. Ir H. Juanda Bandung
Info lanjut hub.: Udjo 0811140603, Ilo 021 70682007, Ratih 08122129539,
Alland 0818202247, Happy 08161815734
-----------------------------------------------
IndoPB - Indonesia PB User Group
To Post a message, send it to: [EMAIL PROTECTED]
To Unsubscribe,send a blank message to: [EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indopb/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
