Prev: Help on Using orabind in oratcl
Next: Tcl/Tk 8.5.7 supplied with HTTP/1.0 ?
From: Highstat on 16 Feb 2010 17:27
Hello,

I need a piece of Tcl code that shows my end user the hard drive
serial number of the drive on which he/she installs my software. How
would I do that?

Alain
From: tcltk-d on 16 Feb 2010 19:07
Under WINDOWS,
"Scripting.FileSystemObject" is installed,
So you can access it via "OPTCL".

Example tcl:
load "optcl.dll";
set FS [optcl::new Scripting.FieSystem.Object];
set Drive [$FS GetDrive C:]; # I think "Get" is not objective!!
print [$Drive : SerialNumber]
print [$Drive : FreeSpace]
print [$Drive : VolumeName]
# and so on...

On 17Feb, 7:27AM, Highstat <highs...(a)highstat.com> wrote:
> Hello,
>
> I need a piece of Tcl code that shows my end user the hard drive
> serial number of the drive on which he/she installs my software. How
> would I do that?
>
> Alain

From: APN on 17 Feb 2010 00:15
On Feb 17, 3:27 am, Highstat <highs...(a)highstat.com> wrote:
> Hello,
>
> I need a piece of Tcl code that shows my end user the hard drive
> serial number of the drive on which he/she installs my software. How
> would I do that?
>
> Alain

Using twapi,

package require twapi
twapi::get_volume_info c: -serialnum

From: Sean Woods on 17 Feb 2010 06:36
On Feb 17, 12:15 am, APN <palm...(a)yahoo.com> wrote:
> On Feb 17, 3:27 am, Highstat <highs...(a)highstat.com> wrote:
>
> > Hello,
>
> > I need a piece of Tcl code that shows my end user the hard drive
> > serial number of the drive on which he/she installs my software. How
> > would I do that?
>
> > Alain
>
> Using twapi,
>
> package require twapi
> twapi::get_volume_info c: -serialnum

Oh cool... I'd been synthesizing a batch file and calling it through
exec up until now.

Thank you Tcl Dudes!

--Sean "The Hypnotoad" Woods
From: Will Duquette on 17 Feb 2010 10:17
On Feb 17, 3:36 am, Sean Woods <y...(a)etoyoc.com> wrote:
> On Feb 17, 12:15 am, APN <palm...(a)yahoo.com> wrote:
>
> > On Feb 17, 3:27 am, Highstat <highs...(a)highstat.com> wrote:
>
> > > Hello,
>
> > > I need a piece of Tcl code that shows my end user the hard drive
> > > serial number of the drive on which he/she installs my software. How
> > > would I do that?
>
> > > Alain
>
> > Using twapi,
>
> > package require twapi
> > twapi::get_volume_info c: -serialnum
>
> Oh cool... I'd been synthesizing a batch file and calling it through
> exec up until now.
>
> Thank you Tcl Dudes!
>
> --Sean "The Hypnotoad" Woods

Can someone explain to me why you need to do this?
 |  Next  |  Last
Pages: 1 2
Prev: Help on Using orabind in oratcl
Next: Tcl/Tk 8.5.7 supplied with HTTP/1.0 ?