Hi, I'm working on a Windows Send-To Extension, and I need to be able to get a filesname and path if it's sent to my program, how would I do that? Thanks for your help.

I'm also trying to perform this action: For SearchNo = 0 To 10000 If FileInfo(SearchNo) = "" Then FileInfo(SearchNo) = TotalFileToMove Reference = SearchNo Next SearchNo lbxFILESMOVE.AddItem FileInfo(Reference) But for some reason nothing prints to the listbox, just a blank entry, I think I'm using the Liberty BASIC way of setting array contents rather than the VB way, but I'm pretty sure it's the same?

For the first thing, put this into a module, and set the project's Starting Object to Sub Main: Sub Main() Dim SentPath As String SentPath = Left(Command, len(Command) - Len(App.Path) End Sub For the second problem, the reason that is happening is because the list box code is outside of the For/Next. It should be like this: For SearchNo = 0 To 10000 If FileInfo(SearchNo) = "" Then FileInfo(SearchNo) = TotalFileToMove Reference = SearchNo lbxFILESMOVE.AddItem FileInfo(Reference) Next SearchNo -Burbble