Post removed: Caused annoying stylesheet error. If you need the code, you can look it up through Google Cache, or The Web Archive (any dates between original post date & 5/12/07).
Archive
Here are some cool SS’s.
Recently i’ve been playing with WS2003 in a Virtual Machine, and i’ve had to create some stuff to automatically setup a user with a roaming profile, and a home directory (and set the appropriate permissions). Enjoy. Save it as createUser.vbs, double click on it and you’re ready to go. NOTE: You might want to remove some domain specific stuff (and if you have special OU’s, edit the script accordingly. The script assigns permissions to the users profile/home dir folders, in this script it gives Administrator full control, and the user themselves full control.
1: Option Explicit
2: Dim wshShell
3: Dim strUser
4: Dim objRootLDAP, objContainer, objNewUser
5: Dim fso
6: Dim profilePath
7: Dim strFullName
8: dim strPassword
9: Dim homePath
10: Set fso = CreateObject(“Scripting.FileSystemObject”)
11:
12: Set wshShell = WScript.CreateObject(“WScript.Shell”)
13:
14: strUser = InputBox(“User Name?”, “Prompt”, “”, 100, 100)
15: strFullName = InputBox(“Full Name?”, “Prompt”, “”, 100, 100)
16: strPassword = InputBox(“Password?”, “Prompt”, “”, 100, 100)
17:
18: ‘ Bind to Active Directory, Users container.
19: Set objRootLDAP = GetObject(“LDAP://rootDSE”)
20: Set objContainer = GetObject(“LDAP://cn=Users,” & _
21: objRootLDAP.Get(“defaultNamingContext”))
22:
23: homePath = “\\HURRICANE\Homes\”+strUser
24: profilePath = “\\HURRICANE\Profiles\”+strUser
25:
26: Dim objFSO
27: Set objFSO = CreateObject(“Scripting.FileSystemObject”)
28:
29:
30: If fso.FolderExists(homePath) = False Then
31: fso.CreateFolder(homePath)
32: End If
33:
34: If fso.FolderExists(profilePath) = False Then
35: fso.CreateFolder(profilePath)
36: End If
37:
38: ‘ Build the actual User.
39: Set objNewUser = objContainer.Create(“User”, “cn=” & strUser)
40: objNewUser.Put “sAMAccountName”, strUser
41: objNewUser.Put “userPrincipalName”, strUser + “@homegroup.int”
42: objNewUser.Put “displayName”, strFullName
43: objNewUser.Put “HomeDirectory”, “\\HURRICANE\Homes\”+strUser
44: objNewUser.Put “profilePath”, “\\HURRICANE\Profiles\”+strUser
45: objNewUser.SetInfo
46: objNewUser.SetPassword strPassword
47: objNewUser.Put “userAccountControl”, 512
48: objNewUser.SetInfo
49:
50: Dim intRunError
51: Dim strHomeFolder
52: strHomeFolder = “\\HURRICANE\Homes\”+strUser
53: If strHomeFolder <> “” Then
54: If Not objFSO.FolderExists(strHomeFolder) Then
55: On Error Resume Next
56: objFSO.CreateFolder strHomeFolder
57: If Err.Number <> 0 Then
58: On Error GoTo 0
59: Wscript.Echo “Cannot create: “ & strHomeFolder
60: End If
61: On Error GoTo 0
62: End If
63: If objFSO.FolderExists(strHomeFolder) Then
64: ‘ Assign user permission to home folder.
65: intRunError = wshShell.Run(“%COMSPEC% /c Echo Y| cacls “_
66: & strHomeFolder & ” /t /c /g Administrators:f “_
67: & strUser & “:F”, 2, True)
68: If intRunError <> 0 Then
69: Wscript.Echo “Error assigning permissions for user “ _
70: & strUser & ” to home folder “ & strHomeFolder
71: End If
72: End If
73: End If
74:
75: Dim strProfileFolder
76: strProfileFolder = “\\HURRICANE\Profiles\”+strUser
77: If strProfileFolder <> “” Then
78: If Not objFSO.FolderExists(strProfileFolder) Then
79: On Error Resume Next
80: objFSO.CreateFolder strProfileFolder
81: If Err.Number <> 0 Then
82: On Error GoTo 0
83: Wscript.Echo “Cannot create: “ & strProfileFolder
84: End If
85: On Error GoTo 0
86: End If
87: If objFSO.FolderExists(strProfileFolder) Then
88: ‘ Assign user permission to home folder.
89: intRunError = wshShell.Run(“%COMSPEC% /c Echo Y| cacls “_
90: & strProfileFolder & ” /t /c /g Administrators:f “_
91: & strUser & “:F”, 2, True)
92: If intRunError <> 0 Then
93: Wscript.Echo “Error assigning permissions for user “ _
94: & strUser & ” to profile folder “ & strProfileFolder
95: End If
96: End If
97: End If
98: WScript.Echo(“Done.”)
99: WScript.Quit
Someone is doing something about those goddamn social networking sites. Illinois has introduced a bill to ban ALL social networking websites from their schools and public libraries.
http://politics.slashdot.org/article.pl?sid=07/02/14/0226222&from=rss
Apparently my school has banned those sites. http://securecomputing.com/sfwhere/index.cfm for more info.
Lately I’ve been getting a LOT of emails from those retarded myspace clone sites & ‘Movie Quiz Websites’. The other day I received a few emails from a site called ‘tagged’, saying that someone had tagged me to be on their friends list. From what I understand (without signing up to the site), people export their WHOLE msn contact lists, and upload them to an unknown site for them to do god-knows-what with them. The worst thing about this tagged site was the fact that they KEPT sending email after email if you did not reply (aka: clicking on a yes/no link). The REALLY ironic thing was that both the yes & no link go to the same page (their signup page). Without further ado, is an email you can send if you get any more of those loser emails.
Attn: idiot,
Lately, I’ve been getting pissed by a lot of emails sent from so-called ’social networking’ websites, and ‘movie quiz’ websites. Google defines ’socialising’ as “The act of meeting for social purposes”, I therefore submit to you the following question: How do you ’socialize’ with people that YOU DO NOT KNOW OVER A WEBSITE. There have been numerous cases of people being sexually assaulted (and in one case, a guy even got his car stolen from a crazy-ass teenage chick) from interaction on myspace. Below are my grudges about the websites I have got emails from in the last few days:
First and foremost, tagged.com:
Okay, go do a google search for the word ‘tagged’. The first result will most likely be for tagged.com. Read the blurb. It says that apparently tagged is the PREMIER teen socializing website on the internet. That’s a big claim. I did a quick look around their website and found no page listing the amount of members they have (so, how can they call themselves the premier teen socializing site). My second grudge against them is the obvious fact is that they are a MYSPACE clone. MySpace was the first website that started the phenomenon, and lots of other loser sites started to pop up over the place over time. I’ve been tagged,sliced,diced and zebo’ed(?).
MySpace.com
The site that started it all. Correction: The crappiest site that started it all. Whenever I get a myspace link now, I turn down my volume and make sure my door is shut. That’s because I’m afraid of some retard having lemonparty/tubgirl as their background and having some emo music on their page. Then theres the fact that 52 million out of their 72 million members are probably pedophiles. Theres probably some page on the internet that lists all the rapes caused by myspace, incredible isn’t it? I had NOTHING against the good ol’ msn chat style of service. There was a simple profile page, a fairly comprehensive list of chatrooms and no retarded sounds allowed in the profiles. People bitch about how chatrooms are full of pedophiles and so on, but if they are on IRC, you are able to get their ip address and do something about it, whereas, if there was one looking at your profile on myspace, what can you do? Jack shit. I really doubt myspace would start trying to filter through their 1 million hits a day (probably more) to find one guy. Besides, the laws about this crap aren’t even good enough to prosecute people now-a-days.
Then theres the people that are subscribed to like fucking 12 social networking websites. WHY WOULD YOU NEED TO KNOW ONE HUNDRED THOUSAND FUCKING RANDOM PEOPLE ON TWELVE SITES? That is what infuriates me. This one person that I knew like 3 years ago (the person that triggered this post) ‘tagged’ me for a ‘friend’. A few months prior to that, she sent an email asking me to sign up for ‘zebo’ and theres probably a multitude of other things that one particular person has asked me to sign up for. I really wish gmail had an option to filter out movie quiz’s and social networking site crap.
Just so you know, I DO have a myspace profile (but, I never ever changed it from the defaults, because I only needed to look at someone elses myspace).
I hope this post/email has changed your opinion about those retarded social networking websites.
Regards,
Brent
Testing to see this shiz actually works. Heh.
PS: 24 ftw.
Okay, some of you out there probably download certain files that are split over many archives (ie: r01, r02 etc) and need to combine them. This is meant for files that ARE NOT rar files. Trying to combine rar files with copy /B will fuck up the headers and so on. You can also use this to generate links for flashget, as flashget does not have a ‘Generate Links’ option, like GetRight does (that i know of yet). You can make the links in this application, and then copy and paste them, and they can be added to flashget, or you can copy the text and then drag it into the flashget ‘dropzone’. The program is self explanitory, and i’ll probably upload the code for it at a later date if the demand arises.
Without further ado:
http://brentp.net/CSharp/LinkGenReplace.exe
Yes, i know this post could have been written better.
Here’s the radar image for the townsville/ayr/giru area. Assloads of rain.
If anyone doesn’t know, its pissing down rain here atm. Attached are some photos of Giru’s insanely high water level (and Townsville Airports flooded runways). Enjoy.
Edit:
Radar image for townsville area:
http://mirror.bom.gov.au/products/IDR213.loop.shtml
Short n sweet. Below is a link to an EBOOT.PBP which allows you to access recovery mode in XMB. Works pretty well so far.
Enjoy.
To make it work, just shove it inside /PSP/GAME150/RECOVERY.
