NIM

What do you guys think or have you even heard about the new project from Invision. It is called IPB Dynamic. This is a brand new product from the creators of the award winning Invision Power Board software that we use here , and will set new standards in combining ease of use with the complete freedom to create your site however you choose. Invision Power Dynamic is written in PHP and uses either MySQL, MSSQL or Oracle for database storage. Invision Power Dynamic is still in heavy development and that website will be completed in due course. More information will be added as it becomes available. It will be nice portal IMHO with lots of skins and I hope that we'll gonna use it on wincert when it will be officially released... You can check more on developer Matt's blog

I saw that once before, but always evoke a good laugh.. :lmaosmiley:

This is a list of files that are safe to delete from windows system folder. If you're unsure what this files mean, rather don't do it 1. c:\windows\system32\dllcache\ NOTE: DON

Welcome Wolf. I have to thank you in this way for making this nice logo for the forum

Since I'm an UT2004 Fanatic all I can say is that I adore Unreal, especially the ONS mode... I'm curently playing for one European clan (D2F) and practically playing every night for fun with my onslaught buddies Unreal 2007 will be made on Unreal3 engine and will provide excellent graphic which will result in high system requirements.. Think I'll need a new rig for this game.. Check this pic of Unreal 2007

Midway says the PC edition of its much-awaited shooter won't ship until "first half" of next year; PS3 version still TBA, more Xbox 360 hints dropped. Link

When I first read the title of ur post I thought, omg wtf As far as I remember I read somewhere that it could be out along with Vista..but that's impossible IMHO I think that Vista is far more important that XP SP3

Well, to be honest I know, 'cause MSFN founder is my friend It wasn't easy, the most important thing is to have several good posters who'd be active and would be a big help and support for all new forum users.

Nice post cygnus.. First of all, meaning of this forum is just as you said to help each other. It's very hard to enchain people to a new forum when there isn't much posts which could be useful to others. That's way I started with tutorials, tips and tricks threads which could help us draw some attention. In time I will put google ads and hope that with those funds I'll be able to cover site and board expenses. Until then, I have a lot of posting to do

I have changed the whole forum skin instead, takes less time and it looks better

'Changes Windows NT clients from using static IP address's to use DHCP. Could be called from the logon script. Combined with the use of the SU utility this could be added to a logon script to perform a hands off migration. 'All variables declared Option Explicit Dim oWSHShell Dim sNIC, sMan Dim iCount Set oWSHShell = Wscript.CreateObject("Wscript.Shell") ' Set the DCHP service to autostart oWSHShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\Services\DHCP\Start", 2 ' Get Network card On Error Resume Next iCount = 1 Do sNIC = oWSHShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\NetworkCards\" & iCount & "\ServiceName") sMan = oWSHShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\NetworkCards\" & iCount & "\Manufacturer") ' Skip the Async and NDIS services If sMan <> "Microsoft" And Err.Number = 0 Then Call SetNIC End If iCount = iCount + 1 Loop Until Err.Number <> 0 ' Clear the error Err.Clear ' End of Script Sub SetNIC Dim iTest ' Set the NIC service to use DHCP sNIC = "HKLM\SYSTEM\CurrentControlSet\Services\" & sNIC &"\Parameters\TCPIP\" iTest = oWSHShell.RegRead(sNIC & "EnableDHCP") If iTest = 0 Then oWSHShell.RegWrite sNIC & "EnableDHCP", 1, "REG_DWORD" oWSHShell.RegWrite sNIC & "IPAddress", "0.0.0.0", "REG_MULTI_SZ" oWSHShell.RegWrite sNIC & "SubnetMask", "0.0.0.0", "REG_MULTI_SZ" End If End Sub

DomainName = InputBox("Enter domain name") ServerName = InputBox("Enter server name") ShareName = InputBox("Enter share name to be deleted") Set cont = GetObject("WinNT://"& DomainName &"/"& ServerName &"/LanmanServer,FileService") cont.Delete "FileShare", ""& ShareName &""

Dim oFSO, oFolder, oFiles, oFile Set oFSO = CreateObject("Scripting.FileSystemObject") Set oFolder = oFSO.GetFolder("C:\TEST") Set oFiles = oFolder.Files for each oFile in oFiles if oFile.DateLastModified > DateAdd("d", -14, Now()) then if MsgBox("Delete " & oFile.Path, vbYesNo) = vbYes then ' Omit 'True' in the next line if ReadOnly should be respected oFile.Delete True end if end if next

decNum = Inputbox("Enter the Decimal Value you want to convert:") hexNum = hex(decNum) MsgBox "Decimal Value You Entered: " & decNum & vbCRLF & "Hex Value Conversion: " & hexNum

Dim Container Dim ContainerName Dim User Dim NewUser ContainerName = InputBox("Enter the Domain Name:") Newuser = InputBox("Enter the new user name:") Set Container = GetObject("WinNT://" & ContainerName) Set User = Container.Create("User", NewUser) User.SetInfo

DomainName = InputBox("Enter domain name") ServerName = InputBox("Enter server name") ShareName = InputBox("Enter share name to be created") PathName = InputBox("Enter the full path of the new share") Set cont = GetObject("WinNT://"& DomainName &"/"& ServerName &"/LanmanServer,FileService") Set fs = cont.Create("FileShare", ""& ShareName &"") fs.Path = ""& PathName &"" fs.MaxUserCount = -1 fs.SetInfo

If err.number = 0 Then Set FSO = CreateObject("Scripting.FileSystemObject") FSO.CreateTextFile "c:\MSO2000.TXT" Else End if

Set fso = CreateObject("Scripting.FileSystemObject") fso.copyFile "c:\mytext.txt" , "c:\temp\"

Dim UserName Dim UserDomain UserDomain = InputBox("Enter the user's login domain name") UserName = InputBox("Enter the user's login name") Set User = GetObject("WinNT://"& UserDomain &"/"& UserName &"",user) Dim NewPassword NewPassword = InputBox("Enter new password") Call User.SetPassword(NewPassword) If err.number = 0 Then Wscript.Echo "The password change was successful." Else Wscript.Echo "The password change failed!" End if

Set SNSet = GetObject("winmgmts:").InstancesOf ("Win32_BIOS") for each SN in SNSet MsgBox "The serial number for this PC is: " & SN.SerialNumber Next

Set SNSet = GetObject("winmgmts:").InstancesOf ("Win32_BIOS") for each SN in SNSet Wscript.Echo "BIOS Manufacturer of this computer is: " & SN.Manufacturer Wscript.Echo "BIOS Version of this computer is: " & SN.Version Wscript.Echo "BIOS Version date of this computer is: " & SN.ReleaseDate Wscript.Echo "SMBIOS Version of this computer is: " & SN.SMBIOSBIOSVersion Next

Dim p p = InputBox("Enter the network path to the printer you want to install:", "Add Printer", "\\Server\PrinterName") If p <> "" Then Dim cmd cmd = "rundll32 printui,PrintUIEntry /in /n" & p WScript.CreateObject("WScript.Shell").Run cmd End If

UserName = InputBox("Enter the user's login name that you want to unlock:") DomainName = InputBox("Enter the domain name in which the user account exists:") Set UserObj = GetObject("WinNT://"& DomainName &"/"& UserName &"") If UserObj.IsAccountLocked = -1 then UserObj.IsAccountLocked = 0 UserObj.SetInfo If err.number = 0 Then Wscript.Echo "The Account Unlock Failed. Check that the account is, in fact, locked-out." Else Wscript.Echo "The Account Unlock was Successful" End if

Option Explicit Dim NetworkAdapter, AdapterConfiguration 'Objects Dim IPAddress, SubnetMask, Gateway, DNS 'String Arrays Dim RetVal 'Integers For Each NetworkAdapter In GetObject("winmgmts:").InstancesOf("Win32_NetworkAdapter") If NetworkAdapter.AdapterType = "Ethernet 802.3" Then For Each AdapterConfiguration In GetObject("winmgmts:").InstancesOf("Win32_NetworkAdapterConfiguration") If UCase(AdapterConfiguration.ServiceName) = UCase(NetworkAdapter.ServiceName) Then IPAddress = Array("192.168.0.10") SubnetMask = Array("255.255.255.0") Gateway = Array("192.168.0.1") DNS = Array("35.8.2.41") RetVal = AdapterConfiguration.EnableStatic(IPAddress, SubnetMask) If Not RetVal = 0 Then WScript.Echo "Failure assigning IP/Subnetmask." End If RetVal = AdapterConfiguration.SetGateways(Gateway) If Not RetVal = 0 Then WScript.Echo "Failure assigning Gateway." End If RetVal = AdapterConfiguration.SetDnsServerSearchOrder(DNS) If Not RetVal = 0 Then WScript.Echo "Failure assinging DNS search order." End If End If Next End If Next

This guide will show how to launch an application with Administrative rights under a limited user account. This is very useful for people who want to use Limited User accounts but have some apps/games that do not work native in this environment. All you need is AutoIT (free) and the following code. Create a txt file and put this (make changes as necessary) inside: CODE ; Set the RunAs parameters to use local adminstrator account ; Run program as admin ; Reset user's permissions RunAsSet("username", "computername", "password") RunWait("C:\Program Files\Path\To.exe") RunAsSet() rename this file runas.au3 Now were just going to compile this as an exe so others cannot get the administrator password. Run Aut2Exe For Source choose the au3 file you just created. For Destiniation choose a name for the exe to be created. (Optional) Choose an Icon for the exe. Uncheck decompilation Finish by hitting Convert to create the exe! Easy Right!? The Secondary Logon service must be running! You can always manually run/(un)install programs while a Limited User by right clicking on a file and selecting runas. The administrator account needs to have a password for this to work. You can extract the icon from any file using XN Resource Editor (free/standalone). [TWEAK] Hide the Administrator Account on the XP Logon Screen. You can logon as Administrator by switching to the classic logon by hitting Ctrl+Alt+Del twice at the xp logon screen. CODE Windows Registry Editor Version 5.00[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList]"Administrator"=dword:00000000