Recent content by Dannyc989

  1. D

    If text box is empty do nothing else do something

    I'm not to sure, I would like another opinion on this as I'm not sure if it would return an error... I'm not in the office at the moment so can't input it to try...
  2. D

    If text box is empty do nothing else do something

    Evening folks... I am hoping someone can help with the below... I have a form which has 2 text boxes on it one is for imputing a company name and one is for putting in a purchase order number. I want to be able to do the following but not sure of the coding: If the company name text box is...
  3. D

    Append Query depending on check box

    Hi Folks, I'm after a piece of code which works as described below. I have a save button on a form I have a append query ready to run. When the save button is clicked, I want the code to see if a checkbox is true or not and if its true I want the append query to run if its not then I want the...
  4. D

    errorkeeps occuring

    Ok I did the first option and it gave me back the correct paths in the message boxes but still isn't copying the folder from the source to destination it isn't giving me anything to suggest which of the 2 is giving the error.... I have seen on one thread somewhere something at the end which...
  5. D

    errorkeeps occuring

    Forgive my novice ability how and where would I check this??
  6. D

    errorkeeps occuring

    Thanks for that... that bit worked a treat... I have altered the code slightly as I had some issues after this missing a space issue but now I have an issue with the part at the bottom please see code below: [LEFT]Sub CopyFolder() Dim fso As Scripting.FileSystemObject...
  7. D

    errorkeeps occuring

    sorry forgot to say the debug says it is happening on the Setfso = New Scripting.FileSystemObject line of the code
  8. D

    errorkeeps occuring

    I keep having an error occurring when I use this module and I cant work out why, I have made reference to the Microsoft scripting runtime etc can anyone help please Function CopyFolder() Dim fso As Scripting.FileSystemObject Dim sSourceDir As String, sDestinationDir As String...
  9. D

    Copy Folder problem

    ok i must be doing something wrong copied and changed the bits needed but I get an error of Compile error invalid use of Me Keyword, on the sSourceDir havent got past this so not sure if the sDestinationDir works either here is the code as i have it at the moment in the module Sub...
  10. D

    error help

    Same error occurs
  11. D

    error help

    I have this code in a module but it comes up with a compile error invalid outside procedure error at the bold red line...can anyone help?? Dim fso As Scripting.FileSystemObject Dim sSourceDir As String, sDestinationDir As String Setfso = New Scripting.FileSystemObject...
  12. D

    Copy Folder problem

    Ghudson I would like to use this code but how would I get the ssourcedirectory to come from a field on my form??
  13. D

    Selecting information

    Sorry ISP decided they didnt want to fix my fault before the weekend had no internet... please see below the entire code I have on the page, the part im having problems with is the coping of the entire folder and it returns a Path not found and the debug points me towards the bold red line...
  14. D

    Selecting information

    I have some code where by I want to move a folder from one location to another but the strings/paths are both on the form... I have sfoldersource = me.quote_files_directory_ref But it keeps throwing back an Error... Where am I going wrong??
  15. D

    Move entire folder

    I have tried all sorts of different code but none seem to work, can anyone assist by writing the code on the quick and I can modify to suit field names etc
Top Bottom