NIM

First I will put a link to this page: The Deep Sky Frontier Q: How BIG is this page? A: This page is 9 quadrillion pixels wide by 9 quadrillion pixels tall. Thus it contains a large number of pixels: 8,100,000,000,000,000,000,000,000,000,000 otherwise known as 8.1 nonillion. In scientific notation, that's 8.1x10^30, hereafter shown in the form 8.1e30. This means that the repeating background image has 5.4e28 stars on it-- about as many as there would be if our universe was multiplied to a million times it's current observable size. Futhermore, at 77 pixels to the inch, this page takes up 3.4e18 square miles and is 1.844 billion miles on a side-- an area roughly equivalent to a section of the plane of our Solar System with the sun at the center and the orbit of Saturn on the outside edge (a square 22 AU on a side). That's about 17 billion times the surface area of the Earth. Test it for yourself. Using the arrow keys to scroll, see if you can move the scroll button even one pixel. On second thought, don't-- especially if you're the doggedly persistent type. To do so will take about seven times longer than How big is this page? Press F11 to optomize your view. Here's another way to imagine the size of this webpage. Let us exaggerate outrageously and say that a trillion books might have been written during the history of the world (a figure more in line with all reading that has ever been done), and that each of those trillion books has an extremely generous allotment of 10,000 pages. Let us then say that each of those pages has an average size of about one square foot. That would mean that this webpage would have ten trillion times the space necessary to fit it all in. If you were to do a random search of this webpage at a rate of ten pageviews per second, it would take you about 31,000 years-- on average-- before you would find even a single page of even one of those books. And here's another way to look at it. The World Wide Web is currently the biggest part of the internet-- and it is huge. Google currently knows of over 8 billion webpages-- and there are certainly a great many pages that Google does not know about. There are an unknowable number that have come and gone and will never be seen again. Let us imagine that there have been a total of a twenty billion webpages each year since 1990-- a gross overestimation (at least in regard to the early days). Let us then imagine that each of those webpages was at least 25,000 pixels long and 1,000 pixels wide-- equivalent to about twenty-five pages of writing. Given these figures, this one page would have enough raw area to house a quadrillion years worth of the World Wide Web. If you were to search randomly at a rate of ten pageviews per second, it would take you 3 million years-- on average-- to find even just one of those twenty billion pages. If you'd like, you can support this page with a very small donation (between 89 cents and a $2.33 would be shiny). Include a short comment as your "shipping address"-- anything-- and I'll place it in the vastness. You can also support this by rating with a thumb-up on StumbleUpon and by telling your friends. Would you like to visit the exact center? (Only works properly with Mozilla Firefox) _your natural lifespan. This method causes you to "move" across the plane of this page at the equivalent of a toddler's walking pace-- around 0.5 mph. At this rate, it would take you half a million years to cross from one end to the other. As you may know, it is enormously quicker to use the mouse and click on the empty part of the scroll bar and then hold down the mouse button. Using this method, you would be able to cross in about 100 minutes. Doing so causes you to move at about Warp 1.5-- a virtual velocity of over 1.5 times the speed of light (ignoring relativistic effects). If you try it, you'll see that the background starfield appears to be going by at no more than ten miles an hour. In actuality, the glimpses you are seeing of the starfield are tens of thousands of miles apart. Enormous expanses are being skipped over completely. Of course, it is far quicker to use the mouse to grab the scroll button and slide it over. Not as quick as using this link, however: To the Corner. Click here for another angle on how big this page is. Note: While this page is very, very large when viewed using Internet Explorer and others, you need Mozilla Firefox to view it properly. Firefox is the open-source phoenix of once-defeated Netscape. It offers improved speed, security, and simplicity. It's tabs feature alone makes it worth switching. It's free.

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