Jump to content

ahuxham

Members
  • Posts

    1,139
  • Joined

  • Last visited

Everything posted by ahuxham

  1. EES from BT - Extended Ethernet Services, connects two campus together, and they both act as if on the same lan. You're guaranteed lan speeds between the two as well, however campus that your connecting too, will have the internet feed of the main site. (Which is what Pillock is referring too)
  2. Power saving is all, that would be the only need to keep it at 2.8GHz
  3. Naturally.
  4. I'm sure you were Chris/Apeo
  5. Perfect thank you. However its 34 not 32, 32 is a space, but that's beside the point.
  6. Work to some regards, however I've found a problem, and not sure how to fix it as all the """"""'s are confusing me. The file name which is Y:\& strLine & should be "Y:\& strLine &". I'm getting file cannot be found, but the second I load cmd and add the quotes the command works in it's entirety. Any ideas?
  7. I'll change to /c, thanks for that. The command is prncmd.exe Y:\filename.pdf -CY:\Resources\Macro.txt -i And I'd like to process everything in the dir, the prnccmd doesn't accept mutliple instances, only single files, and this would have to be VBS. 1) Only scripting language I roughly know and can cobble together 2) The files are generated daily on exports, and different times of day, so would be run twice daily to get everything imported, thus vbs. Obviously as Chris was showing, I want prncmd.exe Y:\%stringname%.pdf -CY:\Resources\Macro.txt -i The 0 at the end of the line is VBS for hiding the Window.
  8. Odd indeed, the functionability is all there now, however the RunCommand line isn't working as expected. Keeps prompted for an "Expected end of statement" at Char 70 which is the end of prncmd.exe Currently have: RunCommand = "cmd /K cd c:\Program Files\A-PDF Rename\" & prncmd.exe "Y:\ "& strLine &" -CY:\Resources\macro.txt -i", 0" I have tested with wscript.echo strLine and it outputs perfectly, now just to attached to said command
  9. What about this? Obviously "newfile" is mentioned earlier in the script as sFolder = "Y:\" Set newfile = write.CreateTextFile(sFolder&"\Resources\pdf_list.txt, True) Set read = CreateObject("Scripting.FileSystemObject") Set prncmd= wscript.createobject("WScript.shell") strData = read.OpenTextFile(newfile,ForReading).ReadAll arrLines = Split(strData,vbCrLf) For Each strLine in arrLines prncmd.run "cmd /K cd c:\Program Files\A-PDF Rename\ & prncmd.exe Y:\A.pdf -CY:\Resources\macro.txt -i", 0 Next Just need to figure out how to convert the "Y:\a.pdf" argument into the line information. Way beyond my intellect on VBS, might have to toy around with it for a while.
  10. You mean auto run? I.e. U3 execing when the memory stick is plugged in? Sure I can see how this is blocked, and very good reason. Are you not able to browse the memory stick and run the U3 application manually? If not, there isn't a thing you can do within the rules. Auto Run is normally blocked for a reason, and I doubt users are going to help you break the rules, just how the cookie crumbles.
  11. Afternoon Folks, My second query of the day regarding VBS; Is it at all possible to exec a command within VBS, based on lines within a text document. At present I have a portion of script to index the current folder: Set write = CreateObject("Scripting.FileSystemObject") sFolder = "Y:\" Set newfile = write.CreateTextFile(sFolder&"\Resources\pdf_list.txt", True) Set folder = wrIte.GetFolder(sFolder) Set files = folder.files For each folderIdx In files newfile.writeline(folderIdx.Name) Next newfile.Close From there I would like to exec the following snippet for every line in the document: Set cmd= wscript.createobject("WScript.shell") cmd.run "cmd /K cd c:\Program Files\Program\ & command.exe Y:\file.pdf -CY:\Resources\macro.txt -i", 0 Is there any means to get the second snippet to run the said command on each line of the file. The above command is a third part PDF renaming solution designed to rename files based on content, I.e. Invoice number at a specified location, and a trimming mechanism to only attain the actual number, as previous these are named 00*****.pdf as the invoice number. pdf_list.txt: AB invoice (13112009 214705).PDF AC invoice (3112009 214704).PDF BU invoice (13112009 214706).PDF DP invoice (13112009 214716).PDF FI invoice (13112009 214718).PDF
  12. Works perfectly now thanks! Busy adding things to the script though to make it an all in one feature-set
  13. Done. if left(file.name, 2) = "00" then fso.movefile "server" & file.name, "server" & file.name Removed the chr(34)'s if Left(file.name, 2) = "00" then fso.MoveFile "\\Pghwms1\Pyramid\Report\Test\" & file.name, "\\Pghwms1\Pyramid\Report\Processed\" & file.name
  14. Code as shown on my screen; Set fso = CreateObject("Scripting.FileSystemObject") Set pyramid = fso.GetFolder("\\Pghwms1\Pyramid\Report\Test\") For Each file In pyramid.Files if Left(file.name, 2) = "00" then fso.MoveFile chr(34) & "\\Pghwms1\Pyramid\Report\Sage\" & file.Name & chr(34), chr(34) & "\\Pghwms1\Pyramid\Report\Processed\" & file.name &chr(34) Next The scripts intent is to move all PDF's starting with 00 to the Sage folder for importing, and the Processed folder for backup. I've removed the subdir statement for now, as this will be added at a later stage.
  15. I've enclosed the end path with a \ showing, "\\server\share\invoices\sage\" and still the same. The double quotes have changed the error message from not found, to bad filename or number now.
  16. Well, an improvement on the error message. Bad Filename or Number now.
  17. Files are 00 sequenced, and should be moved into the Sage folder, for Sage to import them.
  18. How would the similar code look in command shell? I guess, it's always easy to fall back on whats easiest for the user
  19. Very nice indeed.
  20. Morning Folks, Currently fondling with VBS trying to get a script together to move files based on file name. I have the following code; Set fso = CreateObject("Scripting.FileSystemObject") Set pyramid = fso.GetFolder("\\server\share\invoices") For Each file In pyramid.Files if Left(file.name, 2) = "00" then fso.MoveFile "\\server\share\invoices\Sage" & file.Name, "\\server\share\invoices\Processed" & file.name Next For Each subdir in pyramid.SubFolders Set pyramid = pyramid.GetFolder("\\server\share\invoices" & subdir.name) For Each file In pyramid.Files if Left(file.name, 2) = "00" then fso.MoveFile "\\server\share\invoices\Sage" & subdir.name & "\" & file.Name, "\\server\share\invoices\Processed" & file.name Next Recurse(subdir) Next As you can see I'm, trying to match files with file names beginning with 00, and move them to the Sage folder to be imported into Sage, and another to move them into a processed folder for storage, however, currently getting and error on Line 5, Char 35 stating "File not found" Anyone have any ideas, or alterations to the script? I'm not even sure Left(file.name, 2) is valid, only ever used it for extensions as if Right(file.name, 4) = ".ext" then fso.MoveFile ....
  21. How do you monitor communications between the devices, or stop grooming should anyone infiltrate the ipod syndicate. How do you monitor image transfers and the likes, too many question, and a totally uncontrollable solution. Very cleverly thought out, more a boast than anything else.
  22. Public or Private? If public, I think I'm a bit outraged that my tax money is being spent on a situation like that. It makes communication so inter-personal. What ever happened to the library, the canteen, tutor rooms, common rooms and communication along those lines. What if they're lost, stolen (sold on eBay), smashed and devoid of warranty due to ill happenings, I'd have no problem if this was in the Private sector, using their own money, but why public funds. £1500 for 10 Students. £15000 for 100 Students. £135000 for all Students. Absolutely appaling. In my own opinion
  23. Head to the "All" Folder on the left hand side, and the bottom "wave" is an invite application.
  24. All Gone Sorry if anyone didn't get one
  25. Neil, sent. 3 Invites left
×
×
  • Create New...