I can't get move() to work! [RESOLVED]

[Kasracer]

Dim mov As Directory

            Try
                mov.Move(app & OldFileName, OldPath & OldFileName)
                MessageBox.Show("Sucess!")

I am trying to move a file that will be in the same directory as my program to a system directory but it just won't work. I'm not sure *** is wrong!

app = application.StartupPath
OldFileName = "\text.txt"
OldPath = "C:\WINDOWS"

I used the rename() function to rename something and I am going to replace it with the file that is in the folder with my program. File names in the example are different from what I'm actually doing but it doesn't matter.

[Edneeis]

Are you getting an error? Does nothing happen? What? How do you know it wont work?

Try:

Dim sysPath As String = Environment.GetEnvironmentVariable("windir")
        Dim filename As String = "text.txt"
        IO.Directory.Move(IO.Path.Combine(Application.StartupPath, filename), IO.Path.Combine(sysPath, filename))

PS: Doesn't seem to work if one is a network share or mapped network drive.

[Kasracer]

I just tried that and it didn't work. Ugh I'm gonna turn off my custom error handling message boxes and see what it actaully says the error is.

EDIT: It says something about the root of the start and end must be identical, and it cannot move accross volumes... but they ARE identical! Ugh now I'm lost.

[Pirate]

http://www.vbforums.com/showthread.p...hreadid=252241

[Kasracer]

Originally posted by Pirate
http://www.vbforums.com/showthread.p...hreadid=252241

Yes, I know..... I posted that question, you answered it and I tried to impliment it. Rename() works perfectly, however, move() refuses to co-operate.

Now I got another problem! VB cannot remember my Tab order! I got a form with a bunch fo tabs, and when I re-arrang them it shows them as re-arranged but then I compile it shows it in a completely screwed up order and the collection of tabs changes as well but the form doesn't until I close and re-open it. UGH!!

[Edneeis]

If rename works then just use it and don't change the name, instead of move.

[Pirate]

When using Move , you have to specify both the path and the file name for both Original and destination .

[Kasracer]

Originally posted by Pirate
When using Move , you have to specify both the path and the file name for both Original and destination .

I need to get the file out of the same directory as the program, so if the user decides to put my program's directory in another place, they wouldn't be able to use this AT ALL.

[Pirate]

lol ... How then you would move a file without specifying the path ?? What I mean is you have to combine the file name(and ext) with the path whether it's original or target paths . You can do it in different ways : make a file explorer or textbox to let the user type the path or load content of a directory in treeview or or or . I dunno why you are getting troubles with that , it's working well here .

[Kasracer]

Originally posted by Pirate
lol ... How then you would move a file without specifying the path ?? What I mean is you have to combine the file name(and ext) with the path whether it's original or target paths . You can do it in different ways : make a file explorer or textbox to let the user type the path or load content of a directory in treeview or or or . I dunno why you are getting troubles with that , it's working well here .

I have 1 file in the directory of my program, I need it to be moved to a system directory. The user shouldn't have to say where the file is, this is something that should be automatic without ANY user involvement.

Right now I'm trying to move a file with the application.startuppath and the file name to the system folder with the same file name.

[Edneeis]

Actually we are all lame the problem is you are using the DIRECTORY.Move method instead of the FILE.Move method.

Dim sysPath As String = Environment.GetEnvironmentVariable("windir")
        Dim filename As String = "text.txt"
        IO.File.Move(IO.Path.Combine(Application.StartupPath, filename), IO.Path.Combine(sysPath, filename))

Although rename takes the same basic parameters as move so the only difference would have been to use Rename instead of Move.

[Kasracer]

Originally posted by Edneeis
Actually we are all lame the problem is you are using the DIRECTORY.Move method instead of the FILE.Move method.

Dim sysPath As String = Environment.GetEnvironmentVariable("windir")
        Dim filename As String = "text.txt"
        IO.File.Move(IO.Path.Combine(Application.StartupPath, filename), IO.Path.Combine(sysPath, filename))

Although rename takes the same basic parameters as move so the only difference would have been to use Rename instead of Move.

No I am using that code. WIth the Mov.Move() in that file, I got errors. Even when I imported some stuff it just didn't work right. I changed it to the code you posted, still won't work!

[Edneeis]

Maybe the trouble is not the code but something else. When you say it doesn't work what does that mean? Are you getting an error if so then what error?

That code worked for me. Is this an ASP.NET project if so does the ASP.NET user or whatever user you are using to run it with have IO Permissions to move files?

[Pirate]

You can use GetFiles() function to get the file you want without user interaction . Then move or rename it .

edit : the problem is not the code I and Edneeis posted , it's you . Sorry .

[Kasracer]

Originally posted by Pirate
You can use GetFiles() function to get the file you want without user interaction . Then move or rename it .

edit : the problem is not the code I and Edneeis posted , it's you . Sorry .

I copied and pasted that code, then modified the receiving directory, it just refuses to work!

bah!

[Pirate]

Can you upload your project ??

[Kasracer]

IO.Directory.Move(IO.Path.Combine(Application.StartupPath, FileName), IO.Path.Combine(endPath, FileName))
            MessageBox.Show("Patch Successful!")

I can't upload it right now cause my program is no where near finished and the code isn't cleaned up.

Dim sysPath As String = Environment.GetEnvironmentVariable("windir")
        Dim endPath As String = sysPath + "\System32\"

The variables

[Pirate]

What about the variable "FileName" ?? Can you take a screen shot of a msgbox shown the paths for orginial and target before you do your operation ?? Maybe a slash or missing symbol ...Weird it's working on my machine.

[Kasracer]

Dim FileName As String = "weeee.txt"

It never moves the file at all. Just gives me an error saying the system root must be the same for the destination and the origin

[Pirate]

And where is this file ?? Can you paste the path here ??

[Kasracer]

Originally posted by Pirate
And where is this file ?? Can you paste the path here ??

The file is wherever the exe is. Same folder.

The output is C:\WINDOWS\system32

[Pirate]

Although , it shouldn't be different , but what's your OS and File System ?

[Kasracer]

Originally posted by Pirate
Although , it shouldn't be different , but what's your OS and File System ?

Windows XP Pro
NTFS

[Edneeis]

You are still using Directory instead of File. You must have cut and pasted the first set of code not the second. Using File instead of Directory should solve the error about the same root. Also if you want the System32 folder then you can use a different environmental variable.

Dim sysPath As String = Environment.SystemDirectory
        Dim filename As String = "text.txt"
        IO.[b][color=red]File[/color][/b].Move(IO.Path.Combine(Application.StartupPath, filename), IO.Path.Combine(sysPath, filename))

[Pirate]

Edneeis both ways run can do the same thing . He's doing something wrong maybe in the file or something . I dunno ...
anyways , I tried this , it's workin also . Use this (copy and paste) and create a textfile under bin\ folder named "weeee.txt" , you should find it in Windows\System32 folder . That's all what I can do about it . Can't see anything wrong .

Public Function MoveMe() As Boolean
        Dim OldPath As String = Application.StartupPath
        Dim OldFileName As String = "\weeee.txt"
        Dim DesPath As String = "C:\Windows\System32"
 
 
        Dim mov As Directory
 
        Try
            mov.Move(OldPath & OldFileName, DesPath & OldFileName)
            MessageBox.Show("File was moved to ..." & DesPath)
            Return True
 
        Catch ex As Exception
            MsgBox(ex.Message)
            Return False
        End Try
    End Function

[Edneeis]

I get the error like he mentioned when I run that or use the Directory.Move method.

Although the project files and the destination aren't on the same root or drive on my machine. One is on E:\ and the Other is on C:\

[Kasracer]

Originally posted by Edneeis

Dim sysPath As String = Environment.SystemDirectory
        Dim filename As String = "text.txt"
        IO.[b][color=red]File[/color]<b>You are still using Directory instead of File.  You must have cut and pasted the first set of code not the second.  Using File instead of Directory should solve the error about the same root.  Also if you want the System32 folder then you can use a different environmental variable.
 
</b>.Move(IO.Path.Combine(Application.StartupPath, filename), IO.Path.Combine(sysPath, filename))

[/B]

Worked Perfectly! Thanks! I didn't realize I was using IO.Directory still. IO.File works fine.

EDIT: Now my tabs are working fine... hmm o well

[Pirate]

. Kidding . I tested it three times . Trust me , it's working . Can't help anymore . Out of thughts .

[Edneeis]

I think it only works if the original root and destination root are on the same drive. I believe you, but I have my projects on a seperate drive. I tried it on another computer and the samething happened but there the projects where on a networked drive so its the same deal.

I didn't test it where both roots are the same drive but if you did and it worked then I'm sure it would.

[Pirate]

It seems true Edneeis . I've just tried moving the file to another partition but gave me that error too . Phew , that sux . . kasracer didn't tell us he's trying to move a file to another partition .

[VictorB212]

Please change the topic of this thread to include [RESOLVED] -- I was about to say use File.Move when it had already been suggested. It'd also be very nice to add a post at the end summing up the solution to make it easy for people searching the forums to learn from your mistake

[Kasracer]

Originally posted by VictorB212
Please change the topic of this thread to include [RESOLVED] -- I was about to say use File.Move when it had already been suggested. It'd also be very nice to add a post at the end summing up the solution to make it easy for people searching the forums to learn from your mistake

Sorry, I'm used to forums which don't allow users to alter there title after posting.

[VictorB212]

Get used to the higher quality forums here then

[Pirate]

Originally posted by VictorB212
Get used to the higher quality forums here then

Used to be that but after those spams all over the boards , it sukx