Re: [indopb] hiden files

Sun, 02 Jul 2006 21:33:18 -0700

btest1 = SetFileAttributesA (sfilename, 3) // setting file attribute : hidden (2) + readonly (1)
// notes:
//        untuk melihat attribut file bisa juga dengan fungsi dirlist dari powerbuilder
//        sebagaimana dibawah ini salinan dari helpnya pb,
//        maka jadi settingannya merupakan kombinasi penjumlahan aritmatis berdasarkan:
//
//filetype 
//
//An unsigned integer representing one or more types of files you want to list in the ListBox.
//
//Types are:·
//                    0 — Read/write files· 
//                    1 — Read-only files· 
//                    2 — Hidden files· 
//                    4 — System files· 
//                    16 — Subdirectories· 
//                    32 — Archive (modified) files· 
//                    16384 — Drives· 
//                    32768 — Exclude read/write files from the list
//
//To list several types, add the numbers associated with the types.
//For example, to list read-write files, subdirectories, and drives, use 0+16+16384 or 16400 for filetype
untung d.s.
 
----- Original Message -----
From: yhr
Sent: Monday, July 03, 2006 10:46 AM
Subject: Re: [indopb] hiden files

thx atas bantuannya..

Mau tanya dikit lagi nih, kalau kita mau file tersebut bukan cuma hidden
tapi juga readonly. Setingnya gimana mas..?

----- Original Message -----
From: <[EMAIL PROTECTED]net.id>
To: <[EMAIL PROTECTED]com>
Cc: <[EMAIL PROTECTED]com>
Sent: Friday, June 30, 2006 4:42 PM
Subject: Re: [indopb] hiden files

> cara aplikasi untuk me-hidden-kannya sbb:
>
> //1. declare external functions win32 for file
>
> // Win 32 calls
> // ...
>
> Function ulong GetFileAttributesA (ref string filename) library
> "KERNEL32.DLL"
>
> Function boolean SetFileAttributesA (ref string filename, ulong attrib)
> library "KERNEL32.DLL"
>
> //...
>
> //2. script powerbuilder
>
> string sfilename
> ulong utest1, utest2
> boolean btest1
>
> sfilename = "app.ini"
> utest1 = GetFileAttributesA (sfilename) // saving current file attribut
> to utest1
> btest1 = SetFileAttributesA (sfilename, 2) // setting file attribute :
> hidden
> utest2 = GetFileAttributesA (sfilename) // checking new file attribut :
> hidden
> btest1 = SetFileAttributesA (sfilename, utest1) // restoring saved file
> attribut from utest1
>
> // notes:
> // untuk melihat attribut file bisa juga dengan fungsi dirlist dari
> powerbuilder
>
>
> cheers,
>
> untung d.s.
>

Internal Virus Database is out-of-date.
Checked by AVG Free Edition.
Version: 7.1.371 / Virus Database: 267.14.7/214 - Release Date: 12/23/2005
__._,_.___

-----------------------------------------------
IndoPB - Indonesia PB User Group
An Indonesian PowerBuilder User Group's Event
2nd PowerBuilder Update
Mezzanine Floor Hotel Ibis Slipi
26/27 August 2006
To Register :
http://groups.yahoo.com/group/indopb/database?method=addRecord&tbl=4



YAHOO! GROUPS LINKS



__,_._,___

Kirim email ke