1. Guest - Remember that Thread Prefixes are a search tool! Click on a Thread Prefix and all threads with the same Prefix in that forum will be offered to you. To dismiss this notice click on X >>>
    Dismiss Notice
  2. Our gif only content threads have a rule where all thumbs must be posted as a static thumbnail that does not play. Currently imagebam made a change where they no longer produce static thumbs. Therefore, please do not use imagebam, or any host, that provides live playing gifs in those specific threads. If you see your gif playing once you post, try to use a smaller thumbnail and if that does not work use a different approved host.
    Dismiss Notice
  3. Can't Log-in?. If your password is no longer accepted but the email address registered in your profile is working, use the "Forgot Your Password?" routine. However, if your registered email address is unusable, create a new temporary phun account and contact S-type.
    Dismiss Notice
  4. ATTN: Imagehost picpie is infected with the "internet security warning" redirect that tries to take users hostage with an inescapable redirect. Avoid using picpie as an imagehost.
    Dismiss Notice
  5. Too many Alerts? Why not adjust your "Alert Preferences" in your Profile Page?
    Dismiss Notice

My little VB Script

Discussion in 'Creative Backyard' started by Bongman, Jan 30, 2009.

  1. Bongman

    Bongman

    Joined:
    Jan 26, 2009
    Messages:
    6
    Likes Received:
    10
    Im not very creative, as such the closest thing I can contribute here, is this little VB Script to keep your "Recent Documents" clean ;)

    Basically, it checks all your shortcuts in your recent documents, and deletes any that link to a particular location.

    Code:
    dim srchtxt(4)
    srchtxt(0) = "C:\Pr0n"
    srchtxt(1) = "C:\More Pr0n"
    srchtxt(2) = "C:\Even more Pr0n"
    srchtxt(3) = "C:\Unsorted Pr0n"
    srchtxt(4) = "C:\Documents and Settings\Bongman\Desktop\Temp Pr0n"
    
    for each x in srchtxt
    
    set WshShell = WScript.CreateObject("WScript.Shell")
    set fso = createobject("Scripting.FilesystemObject")
    usrProfile = WshShell.ExpandEnvironmentStrings("%UserProfile%")
    
    set folder = fso.GetFolder(usrProfile & "\recent\") 
    
    for each file in folder.files
       if right(file.name,4) = ".lnk" then
    	filetarget =  WshShell.CreateShortcut(folder & "\" & file.name).Targetpath
    	if InStr(filetarget, x) <> 0 then	
    		file.delete
    	end if
       end if
    next
    
    next
    Its pretty simple to use/customise. Just paste the code into notepad, and save it as something like "clearrecentpr0n.vbs" (dropping down the "save as type" to "all files" first) Then you can schedule it to run whenever you want, or just manually run it.

    If your Pr0n is stored elsewhere, just change the text in the quotation marks at thre top of the script, to your Pr0n folders. Bear in mind, the folders are CASE SENSITIVE!

    I thought (or at least hoped) you guys would find this useful.

    Bongman
     
  2. Noodle Panda

    Noodle Panda ★ ★ ★ ★ ☆ 15 Year Member

    Joined:
    Apr 22, 2007
    Messages:
    38,349
    Likes Received:
    77,324
    I have absolutely no idea what that is about. In any way whatsoever.
     
  3. Billy Sastard

    Billy Sastard One thousand brown M&Ms ★ ★ ★ ☆ ☆ Ten Years of Phun

    Joined:
    Aug 18, 2006
    Messages:
    34,814
    Likes Received:
    43,039
    Me to.

    Heres the bestest code I can come up with (if you still have a Sinclair ZX81)

    ..Your name scrolls down the screen, fucking wicked man!
     
  4. Lukin

    Lukin Mr Nici ★ ★ ☆ ☆ ☆ Ten Years of Phun Power Poster

    Joined:
    Nov 27, 2008
    Messages:
    4,209
    Likes Received:
    14,308
    The wonders of technology. What next?!
     
    karabastrahabas likes this.
  5. Bongman

    Bongman

    Joined:
    Jan 26, 2009
    Messages:
    6
    Likes Received:
    10
    Jammsbro :

    Its a Script (or program) that deletes shortcuts from your "recent documents" folder. It doesnt just delete all of them, just the ones that you dont want in there ;)

    Billy Sastard:

    LOL!
     
    karabastrahabas and Noodle Panda like this.
  6. otis driftwood

    otis driftwood

    Joined:
    May 31, 2007
    Messages:
    484
    Likes Received:
    997
    looks to me like it's a cron event

    and calling porn prOn is fucking retarded
     
    karabastrahabas likes this.
  7. SilentKnight

    SilentKnight Photographer

    Joined:
    Oct 13, 2008
    Messages:
    522
    Likes Received:
    2,119
    Prawn is good - especially with a little garlic butter and side order of scallops.
     
    irish-sid, karabastrahabas and smi like this.
  8. Noodle Panda

    Noodle Panda ★ ★ ★ ★ ☆ 15 Year Member

    Joined:
    Apr 22, 2007
    Messages:
    38,349
    Likes Received:
    77,324
    Thanks for the explanation bongman. I am phuns resident technical idiot @F

    See, i can#'t even do a smiley face.
     
    karabastrahabas likes this.
  9. Jtb

    Jtb

    Joined:
    Jan 2, 2009
    Messages:
    9
    Likes Received:
    0
    good effort, who would have though anyone could write code on this site!

    Quite interesting nesting there, and I LIKE your Arrays!

    I however have disabled the 'recent' part of xp, can't have the little woman (she just watches p0rn on sky+!) finding out what I have been up to!
     
  10. haydaddict

    haydaddict Smiley King ★ ★ ★ ★ ☆ 15 Year Member

    Joined:
    Nov 28, 2007
    Messages:
    74,065
    Likes Received:
    94,859
    Here :92::18::489::09::35::1244:
     
  11. irish-sid

    irish-sid BANNED

    Joined:
    Mar 17, 2008
    Messages:
    18,174
    Likes Received:
    12,291
    tech_guru_guy_2

    fucking :spam:
     
  12. essential

    essential Evil wakes in vengeance,be careful what you choose ★ ★ ★ ★ ☆ 15 Year Member Movers & Shakers Power Poster

    Joined:
    Aug 28, 2005
    Messages:
    117,650
    Likes Received:
    57,060
    wtf....people trying to get killed ?
     

Share This Page