[mannkaraja]

Hello everybody

i want to do format usb drive from vb.net code. have u any idea then let me know.

i am using following code..

.....

Private Declare Function SHFormatDrive Lib "shell32" (ByVal hwnd As Long, ByVal iDrive As Long, ByVal iCapacity As Long, ByVal iFormatType As Long) As Long



Dim ret As Long
		'' I want a full format
	  ret = SHFormatDrive(hWnd, 4, -1, 1)	

	  Select Case ret
		  Case -1
			MsgBox("Error during format operation")
		  Case -2
			  MsgBox("Operation canceled by user")
		   Case -3
			   MsgBox("This drive cannot be formatted")
		   Case Else
			   MsgBox("Done")

.....

at call function SHFormat i have to pass "Me.hWnd" .. so please if any body know how to do this using vb.net..
and hWnd is passed for parent execution
as per my knowledge "Me" is not supported

Please help me out or if you have other idea then also tell me


Thanks in advance

[VB Crash]

Plase post your code like this..
Try make *.bat file and code inside: Format G:/q

Vace

[magicmonkey]

You can get the current forms handle with Me.Handle.ToInt32(). I think you want to change the long to integers as well. You would of used long in vb6 however in .net an integer is 32bits and a long is 64bits.

[mannkaraja]

magicmonkey, on 1 Dec, 2008 - 12:37 PM, said:

You can get the current forms handle with Me.Handle.ToInt32(). I think you want to change the long to integers as well. You would of used long in vb6 however in .net an integer is 32bits and a long is 64bits.

hi , thnxs for your reply. it helpful to me . but code not run successful

 
Dim ret As Long
		'' I want a full format
		ret = SHFormatDrive(Me.Handle.ToInt32(), 9, 0, 0)

		Select Case ret
			Case -1
				MsgBox("Error during format operation")
			Case -2
				MsgBox("Operation canceled by user")
			Case -3
				MsgBox("This drive cannot be formatted")
			Case Else
				MsgBox("Done")
		End Select
	End Sub

here i passed "9" for drive named "i" as 0=A , 1= B so I =9,
but it give error: Error during format operation..
can you please tell me whats wrong with this?
thanks in advance

** Edit **

[no2pencil]

VB Crash, on 1 Dec, 2008 - 10:29 AM, said:

Try make *.bat file and code inside: Format G:/q

I would put a little more effort into it than that. What if you have a friends flash drive in, & it bumps yours to the next drive letter.

Sorry friend, I just formatted your flash drive.

You can use the Windows API commands GetLogicalDriveStrings & GetDriveType to determine which drives on your system are removable type.

[magicmonkey]

If you look it up at PINVOKE.NET it mentions some default values you should use.

This post has been edited by magicmonkey: 02 December 2008 - 06:27 AM