Dear all,
I am using the following code to retrieve the size of a certain file and the
available (free) space on the disk. The problem is, that I get the size of
the file returned as a Long and the size of free disk space as UInt64.
Apparently, there are no function to convert a Long to a UInt64 or to
compare the two (I'm not expecting to convert the UInt64 to a Long
necessarily, but it should work the other way round, right?).
Short story: How to compare a Long with a UInt64?
Long story, please read the code below to see the problem described in the
very last comment statement
'------ snip - snip -------
Dim objDiskClass As System.Manageme nt.ManagementCl ass
Dim objDisks As System.Manageme nt.ManagementOb jectCollection
Dim objDisk As System.Manageme nt.ManagementOb ject
Dim lFileSize As Long
Dim uiDiskSpace As System.UInt64
Dim objFileInfo = New FileInfo("MyFil e.txt")
lFileSize = objFileInfo.Len gth
objDiskClass = New System.Manageme nt.ManagementCl ass("Win32_Logi calDisk")
objDisks = objDiskClass.Ge tInstances()
For Each objDisk In objDisks
If CStr(objDisk("N ame")) = "D:" Then
uiDiskSpace = CType(objDisk(" FreeSpace"), System.UInt64)
Exit For
End If
Next objDisk
'now I got the File Size as Long in lFileSize
'and the Free Disk Space as UInt64 in uiDiskSpace
'??? How can I compare the two ???
'------ snip - snip -------
Thank you for all of your help and have some great holidays too!
Wolfgang
12  2023 
Untested . .
Dim ui As UInt64 = Convert.ToUInt6 4(500)
Dim int64 = Convert.ToInt64 (ui)
Regards - OHM
Wolfgang Kaml wrote: Dear all,
I am using the following code to retrieve the size of a certain file
and the available (free) space on the disk. The problem is, that I
get the size of the file returned as a Long and the size of free disk
space as UInt64. Apparently, there are no function to convert a Long
to a UInt64 or to compare the two (I'm not expecting to convert the
UInt64 to a Long necessarily, but it should work the other way round,
right?).
Short story: How to compare a Long with a UInt64?
Long story, please read the code below to see the problem described
in the very last comment statement
'------ snip - snip -------
Dim objDiskClass As System.Manageme nt.ManagementCl ass
Dim objDisks As System.Manageme nt.ManagementOb jectCollection
Dim objDisk As System.Manageme nt.ManagementOb ject
Dim lFileSize As Long
Dim uiDiskSpace As System.UInt64
Dim objFileInfo = New FileInfo("MyFil e.txt")
lFileSize = objFileInfo.Len gth
objDiskClass = New
System.Manageme nt.ManagementCl ass("Win32_Logi calDisk") objDisks =
objDiskClass.Ge tInstances()
For Each objDisk In objDisks
If CStr(objDisk("N ame")) = "D:" Then
uiDiskSpace = CType(objDisk(" FreeSpace"), System.UInt64)
Exit For
End If
Next objDisk
'now I got the File Size as Long in lFileSize
'and the Free Disk Space as UInt64 in uiDiskSpace
'??? How can I compare the two ???
'------ snip - snip -------
Thank you for all of your help and have some great holidays too!
Wolfgang
Regards - OHM# OneHandedMan{at }BTInternet{dot }com
Unless you're expecting to query a disk with more than 9 billion gigabytes
of free space just declare uiDiskSpace as Long.
"Wolfgang Kaml" <ms@no-spam.kaml.com> wrote in message
news:Oe******** ******@TK2MSFTN GP10.phx.gbl... Dear all,
I am using the following code to retrieve the size of a certain file and
the available (free) space on the disk. The problem is, that I get the size of
the file returned as a Long and the size of free disk space as UInt64.
Apparently, there are no function to convert a Long to a UInt64 or to
compare the two (I'm not expecting to convert the UInt64 to a Long
necessarily, but it should work the other way round, right?).
Short story: How to compare a Long with a UInt64?
Long story, please read the code below to see the problem described in the
very last comment statement
'------ snip - snip -------
Dim objDiskClass As System.Manageme nt.ManagementCl ass
Dim objDisks As System.Manageme nt.ManagementOb jectCollection
Dim objDisk As System.Manageme nt.ManagementOb ject
Dim lFileSize As Long
Dim uiDiskSpace As System.UInt64
Dim objFileInfo = New FileInfo("MyFil e.txt")
lFileSize = objFileInfo.Len gth
objDiskClass = New System.Manageme nt.ManagementCl ass("Win32_Logi calDisk")
objDisks = objDiskClass.Ge tInstances()
For Each objDisk In objDisks
If CStr(objDisk("N ame")) = "D:" Then
uiDiskSpace = CType(objDisk(" FreeSpace"), System.UInt64)
Exit For
End If
Next objDisk
'now I got the File Size as Long in lFileSize
'and the Free Disk Space as UInt64 in uiDiskSpace
'??? How can I compare the two ???
'------ snip - snip -------
Thank you for all of your help and have some great holidays too!
Wolfgang
OK, so now you have to tell me if you tested that or actually have done
that, because I'm getting an Exception when changing the line from uiDiskSpace = CType(objDisk(" FreeSpace"), System.UInt64)
touiDiskSpac e = CType(objDisk(" FreeSpace"), Long)
And assigning the UInt64 to a Long won't work either, because at that point
I get a
"Value of type 'System.UInt64' cannot be converted to 'Long'.
PLEASE show me of how you want to accomplish your proposed solution.
Thanks,
Wolfgang
"Stephen Martin" <sm*****@remove this.emsoft.and this.ca> wrote in message
news:eh******** ******@TK2MSFTN GP12.phx.gbl... Unless you're expecting to query a disk with more than 9 billion gigabytes
of free space just declare uiDiskSpace as Long.
"Wolfgang Kaml" <ms@no-spam.kaml.com> wrote in message
news:Oe******** ******@TK2MSFTN GP10.phx.gbl... Dear all,
I am using the following code to retrieve the size of a certain file and
the available (free) space on the disk. The problem is, that I get the size
of the file returned as a Long and the size of free disk space as UInt64.
Apparently, there are no function to convert a Long to a UInt64 or to
compare the two (I'm not expecting to convert the UInt64 to a Long
necessarily, but it should work the other way round, right?).
Short story: How to compare a Long with a UInt64?
Long story, please read the code below to see the problem described in
the very last comment statement
'------ snip - snip -------
Dim objDiskClass As System.Manageme nt.ManagementCl ass
Dim objDisks As System.Manageme nt.ManagementOb jectCollection
Dim objDisk As System.Manageme nt.ManagementOb ject
Dim lFileSize As Long
Dim uiDiskSpace As System.UInt64
Dim objFileInfo = New FileInfo("MyFil e.txt")
lFileSize = objFileInfo.Len gth
objDiskClass = New
System.Manageme nt.ManagementCl ass("Win32_Logi calDisk") objDisks = objDiskClass.Ge tInstances()
For Each objDisk In objDisks
If CStr(objDisk("N ame")) = "D:" Then
uiDiskSpace = CType(objDisk(" FreeSpace"), System.UInt64)
Exit For
End If
Next objDisk
'now I got the File Size as Long in lFileSize
'and the Free Disk Space as UInt64 in uiDiskSpace
'??? How can I compare the two ???
'------ snip - snip -------
Thank you for all of your help and have some great holidays too!
Wolfgang
Thanks so much for your help!!!
I ended up converting the UInt64 to a Long, which is not without risk, but
talking about disk space, I should be OK for another dozen years.
lDiskSpace = Convert.ToDecim al(uiDiskSpace)
By converting the Long to a UInt64 I ran into the next problem, that the
operand '<' is not defined for UInt64.
I'm not sure if there would have been a way around that.
I'm just not sure, of why they used UInt64 for Diskspace. A Long should have
worked for a while longer, no?
Wolfgang
"One Handed Man [ OHM# ]" <OneHandedMan{a t}BTInternet{do t}com> wrote in
message news:O5******** ******@TK2MSFTN GP09.phx.gbl... Untested . .
Dim ui As UInt64 = Convert.ToUInt6 4(500)
Dim int64 = Convert.ToInt64 (ui)
Regards - OHM
Wolfgang Kaml wrote: Dear all,
I am using the following code to retrieve the size of a certain file
and the available (free) space on the disk. The problem is, that I
get the size of the file returned as a Long and the size of free disk
space as UInt64. Apparently, there are no function to convert a Long
to a UInt64 or to compare the two (I'm not expecting to convert the
UInt64 to a Long necessarily, but it should work the other way round,
right?).
Short story: How to compare a Long with a UInt64?
Long story, please read the code below to see the problem described
in the very last comment statement
'------ snip - snip -------
Dim objDiskClass As System.Manageme nt.ManagementCl ass
Dim objDisks As System.Manageme nt.ManagementOb jectCollection
Dim objDisk As System.Manageme nt.ManagementOb ject
Dim lFileSize As Long
Dim uiDiskSpace As System.UInt64
Dim objFileInfo = New FileInfo("MyFil e.txt")
lFileSize = objFileInfo.Len gth
objDiskClass = New
System.Manageme nt.ManagementCl ass("Win32_Logi calDisk") objDisks =
objDiskClass.Ge tInstances()
For Each objDisk In objDisks
If CStr(objDisk("N ame")) = "D:" Then
uiDiskSpace = CType(objDisk(" FreeSpace"), System.UInt64)
Exit For
End If
Next objDisk
'now I got the File Size as Long in lFileSize
'and the Free Disk Space as UInt64 in uiDiskSpace
'??? How can I compare the two ???
'------ snip - snip -------
Thank you for all of your help and have some great holidays too!
Wolfgang
Regards - OHM# OneHandedMan{at }BTInternet{dot }com
* "Wolfgang Kaml" <ms@no-spam.kaml.com> scripsit: I am using the following code to retrieve the size of a certain file and the
available (free) space on the disk. The problem is, that I get the size of
the file returned as a Long and the size of free disk space as UInt64.
Apparently, there are no function to convert a Long to a UInt64 or to
compare the two (I'm not expecting to convert the UInt64 to a Long
necessarily, but it should work the other way round, right?).
Short story: How to compare a Long with a UInt64?
What to do if the value of the UInt64 is bigger than a long? There is
no built-in way to compare UInt64 values -- you may want to convert the
value to a Long (if possible) and then do the comparison.
--
Herfried K. Wagner [MVP]
<http://www.mvps.org/dotnet>
Glad I could help you.
Regards - OHM
Wolfgang Kaml wrote: Thanks so much for your help!!!
I ended up converting the UInt64 to a Long, which is not without
risk, but talking about disk space, I should be OK for another dozen
years. lDiskSpace = Convert.ToDecim al(uiDiskSpace)
By converting the Long to a UInt64 I ran into the next problem, that
the operand '<' is not defined for UInt64.
I'm not sure if there would have been a way around that.
I'm just not sure, of why they used UInt64 for Diskspace. A Long
should have worked for a while longer, no?
Wolfgang
"One Handed Man [ OHM# ]" <OneHandedMan{a t}BTInternet{do t}com> wrote
in message news:O5******** ******@TK2MSFTN GP09.phx.gbl... Untested . .
Dim ui As UInt64 = Convert.ToUInt6 4(500)
Dim int64 = Convert.ToInt64 (ui)
Regards - OHM
Wolfgang Kaml wrote: Dear all,
I am using the following code to retrieve the size of a certain file
and the available (free) space on the disk. The problem is, that I
get the size of the file returned as a Long and the size of free
disk space as UInt64. Apparently, there are no function to convert
a Long to a UInt64 or to compare the two (I'm not expecting to
convert the UInt64 to a Long necessarily, but it should work the
other way round, right?).
Short story: How to compare a Long with a UInt64?
Long story, please read the code below to see the problem described
in the very last comment statement
'------ snip - snip -------
Dim objDiskClass As System.Manageme nt.ManagementCl ass
Dim objDisks As System.Manageme nt.ManagementOb jectCollection
Dim objDisk As System.Manageme nt.ManagementOb ject
Dim lFileSize As Long
Dim uiDiskSpace As System.UInt64
Dim objFileInfo = New FileInfo("MyFil e.txt")
lFileSize = objFileInfo.Len gth
objDiskClass = New
System.Manageme nt.ManagementCl ass("Win32_Logi calDisk") objDisks =
objDiskClass.Ge tInstances()
For Each objDisk In objDisks
If CStr(objDisk("N ame")) = "D:" Then
uiDiskSpace = CType(objDisk(" FreeSpace"), System.UInt64)
Exit For
End If
Next objDisk
'now I got the File Size as Long in lFileSize
'and the Free Disk Space as UInt64 in uiDiskSpace
'??? How can I compare the two ???
'------ snip - snip -------
Thank you for all of your help and have some great holidays too!
Wolfgang
Regards - OHM# OneHandedMan{at }BTInternet{dot }com
Regards - OHM# OneHandedMan{at }BTInternet{dot }com
My apologies, I see that I should have shown the necessary change to that
line as well.
uiDiskSpace = Convert.ToInt64 ((objDisk("Free Space")))
"Wolfgang Kaml" <ms@no-spam.kaml.com> wrote in message
news:e6******** ******@TK2MSFTN GP11.phx.gbl... OK, so now you have to tell me if you tested that or actually have done
that, because I'm getting an Exception when changing the line from uiDiskSpace = CType(objDisk(" FreeSpace"), System.UInt64) touiDiskSpac e = CType(objDisk(" FreeSpace"), Long)
And assigning the UInt64 to a Long won't work either, because at that
point I get a
"Value of type 'System.UInt64' cannot be converted to 'Long'.
PLEASE show me of how you want to accomplish your proposed solution.
Thanks,
Wolfgang
"Stephen Martin" <sm*****@remove this.emsoft.and this.ca> wrote in message
news:eh******** ******@TK2MSFTN GP12.phx.gbl... Unless you're expecting to query a disk with more than 9 billion
gigabytes of free space just declare uiDiskSpace as Long.
"Wolfgang Kaml" <ms@no-spam.kaml.com> wrote in message
news:Oe******** ******@TK2MSFTN GP10.phx.gbl... Dear all,
I am using the following code to retrieve the size of a certain file
and the available (free) space on the disk. The problem is, that I get the
size of the file returned as a Long and the size of free disk space as UInt64.
Apparently, there are no function to convert a Long to a UInt64 or to
compare the two (I'm not expecting to convert the UInt64 to a Long
necessarily, but it should work the other way round, right?).
Short story: How to compare a Long with a UInt64?
Long story, please read the code below to see the problem described in the very last comment statement
'------ snip - snip -------
Dim objDiskClass As System.Manageme nt.ManagementCl ass
Dim objDisks As System.Manageme nt.ManagementOb jectCollection
Dim objDisk As System.Manageme nt.ManagementOb ject
Dim lFileSize As Long
Dim uiDiskSpace As System.UInt64
Dim objFileInfo = New FileInfo("MyFil e.txt")
lFileSize = objFileInfo.Len gth
objDiskClass = New System.Manageme nt.ManagementCl ass("Win32_Logi calDisk") objDisks = objDiskClass.Ge tInstances()
For Each objDisk In objDisks
If CStr(objDisk("N ame")) = "D:" Then
uiDiskSpace = CType(objDisk(" FreeSpace"), System.UInt64)
Exit For
End If
Next objDisk
'now I got the File Size as Long in lFileSize
'and the Free Disk Space as UInt64 in uiDiskSpace
'??? How can I compare the two ???
'------ snip - snip -------
Thank you for all of your help and have some great holidays too!
Wolfgang
Hi,
Dim u As UInt64 = UInt64.Parse("1 00")
Dim l As Long = 100
Me.Text = u.Equals(UInt64 .Parse(l.ToStri ng))
Ken
-----------------------
"Wolfgang Kaml" <ms@no-spam.kaml.com> wrote in message
news:Oe******** ******@TK2MSFTN GP10.phx.gbl... Dear all,
I am using the following code to retrieve the size of a certain file and
the
available (free) space on the disk. The problem is, that I get the size of
the file returned as a Long and the size of free disk space as UInt64.
Apparently, there are no function to convert a Long to a UInt64 or to
compare the two (I'm not expecting to convert the UInt64 to a Long
necessarily, but it should work the other way round, right?).
Short story: How to compare a Long with a UInt64?
Long story, please read the code below to see the problem described in the
very last comment statement
'------ snip - snip -------
Dim objDiskClass As System.Manageme nt.ManagementCl ass
Dim objDisks As System.Manageme nt.ManagementOb jectCollection
Dim objDisk As System.Manageme nt.ManagementOb ject
Dim lFileSize As Long
Dim uiDiskSpace As System.UInt64
Dim objFileInfo = New FileInfo("MyFil e.txt")
lFileSize = objFileInfo.Len gth
objDiskClass = New System.Manageme nt.ManagementCl ass("Win32_Logi calDisk")
objDisks = objDiskClass.Ge tInstances()
For Each objDisk In objDisks
If CStr(objDisk("N ame")) = "D:" Then
uiDiskSpace = CType(objDisk(" FreeSpace"), System.UInt64)
Exit For
End If
Next objDisk
'now I got the File Size as Long in lFileSize
'and the Free Disk Space as UInt64 in uiDiskSpace
'??? How can I compare the two ???
'------ snip - snip -------
Thank you for all of your help and have some great holidays too!
Wolfgang
Hi,
Try this.
Dim u As UInt64 = UInt64.Parse("1 00")
Dim l As Long = 100
if u.Equals(UInt64 .Parse(l.ToStri ng)) then
' They are equal
end if
Ken
---------------
"Wolfgang Kaml" <ms@no-spam.kaml.com> wrote in message
news:Oe******** ******@TK2MSFTN GP10.phx.gbl... Dear all,
I am using the following code to retrieve the size of a certain file and
the
available (free) space on the disk. The problem is, that I get the size of
the file returned as a Long and the size of free disk space as UInt64.
Apparently, there are no function to convert a Long to a UInt64 or to
compare the two (I'm not expecting to convert the UInt64 to a Long
necessarily, but it should work the other way round, right?).
Short story: How to compare a Long with a UInt64?
Long story, please read the code below to see the problem described in the
very last comment statement
'------ snip - snip -------
Dim objDiskClass As System.Manageme nt.ManagementCl ass
Dim objDisks As System.Manageme nt.ManagementOb jectCollection
Dim objDisk As System.Manageme nt.ManagementOb ject
Dim lFileSize As Long
Dim uiDiskSpace As System.UInt64
Dim objFileInfo = New FileInfo("MyFil e.txt")
lFileSize = objFileInfo.Len gth
objDiskClass = New System.Manageme nt.ManagementCl ass("Win32_Logi calDisk")
objDisks = objDiskClass.Ge tInstances()
For Each objDisk In objDisks
If CStr(objDisk("N ame")) = "D:" Then
uiDiskSpace = CType(objDisk(" FreeSpace"), System.UInt64)
Exit For
End If
Next objDisk
'now I got the File Size as Long in lFileSize
'and the Free Disk Space as UInt64 in uiDiskSpace
'??? How can I compare the two ???
'------ snip - snip -------
Thank you for all of your help and have some great holidays too!
Wolfgang
This thread has been closed and replies have been disabled. Please start a new discussion. Similar topics | |
by: Wolfgang Kaml |
last post by:
Dear all,
I am using the following code to retrieve the size of a certain file and the
available (free) space on the disk. The problem is, that I get the size of
the file returned as a Long and the size of free disk space as UInt64.
Apparently, there are no function to convert a Long to a UInt64 or to
compare the two (I'm not expecting to convert the UInt64 to a Long
necessarily, but it should work the other way round, right?).
Short...
|
by: ThunderMusic |
last post by:
Hi,
I have a problem, I have to do this (MyUInt64 / MyOtherUInt64). the IDE
tells me that the / operator has not been overloaded for UInt64. Is there a
way I can do what I need to do?
Thanks
|
by: donbro |
last post by:
If my read of the extension source (Mac/Modules/file/_Filemodule.c) is
correct, the parameter sizes specified for data and resource file sizes
are UInt32 where they should be UInt64.
In both OS9 and OSX Carbon, the MacOS File Manager (Files.h) uses
UInt64 values for data and resource filesizes.
Testing Python 2.3 and 2.4.2 on MacOS 10.3 returns 0L for the file size
values and correct values for other elements such as parentDirID:
|
by: jiangyh |
last post by:
hi there :
I have a question about how to convert Type to DbType?
thanks a lot.
jiangyh
|
by: Mike Miller |
last post by:
What is the best way to convert a managed unsigned int64 to an
unsigned long? Basically I need to do the following:
System::UInt64 managedInt = 10;
unsigned long unmanagedInt;
unmanagedInt = managedInt;
Also it would be nice to know how to do this:
System::UInt64 managedInt;
| | |
by: Sanjib Biswas |
last post by:
Could anyone point out to me the difference between ulong (C#) and
UInt64/ULong (VB.Net)? I was under the impression that both are same. Below
C# code works fine for a particular value of 'data' (string length 36) and
initial hash value '0' whereas VB.Net code throws an exception in the 8th
iteration, saying the data is either too large or too small for a Uint64. I
am using VB.Net/C# 2005. Am I missing anything here?
C# Code:
=======...
|
by: stuie_norris |
last post by:
Hi Group
I am trying to write a method to unpack a byte array into an Uint64.
But the results are wrong.
public static void UnpackUint64(ref UInt64 dst, byte Data,
ref uint Index)
{
dst = Data;
dst += (UInt64)((Data & 0xffffffff) << 08);
|
by: Pedrop |
last post by:
I have to check if a long value is between two other long values (range check). Since all values are generated by shifting and because in java long is always signed the use of simple operators >= <= does not work.
Is there an algorithm to compare two long values using bitwise operators?
|
by: marktang |
last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However, people are often confused as to whether an ONU can Work As a Router. In this blog post, we’ll explore What is ONU, What Is Router, ONU & Router’s main usage, and What is the difference between ONU and Router. Let’s take a closer look !
Part I. Meaning of...
|
by: Hystou |
last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can effortlessly switch the default language on Windows 10 without reinstalling. I'll walk you through it.
First, let's disable language synchronization. With a Microsoft account, language settings sync across devices. To prevent any complications,...
|
by: Oralloy |
last post by:
Hello folks,
I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>".
The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed.
This is as boiled down as I can make it.
Here is my compilation command:
g++-12 -std=c++20 -Wnarrowing bit_field.cpp
Here is the code in...
| | |
by: jinu1996 |
last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven tapestry of website design and digital marketing. It's not merely about having a website; it's about crafting an immersive digital experience that captivates audiences and drives business growth.
The Art of Business Website Design
Your website is...
|
by: agi2029 |
last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then launch it, all on its own....
Now, this would greatly impact the work of software developers. The idea...
|
by: conductexam |
last post by:
I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and then checking html paragraph one by one.
At the time of converting from word file to html my equations which are in the word document file was convert into image.
Globals.ThisAddIn.Application.ActiveDocument.Select();...
|
by: 6302768590 |
last post by:
Hai team
i want code for transfer the data from one system to another through IP address by using C# our system has to for every 5mins then we have to update the data what the data is updated we have to send another system
|
by: muto222 |
last post by:
How can i add a mobile payment intergratation into php mysql website.
|
by: bsmnconsultancy |
last post by:
In today's digital era, a well-designed website is crucial for businesses looking to succeed. Whether you're a small business owner or a large corporation in Toronto, having a strong online presence can significantly impact your brand's success. BSMN Consultancy, a leader in Website Development in Toronto offers valuable insights into creating effective websites that not only look great but also perform exceptionally well. In this comprehensive...
| |
