http://jar.yosephine.com/ Scripts and stuff I en-us Nucleus CMS v3.32 � Weblog http://backend.userland.com/rss http://jar.yosephine.com//nucleus/nucleus2.gif http://jar.yosephine.com/ http://jar.yosephine.com/index.php?itemid=20 I happen to work at such a place. As we have about 1500 computers, most of which need to have JRE installed, there's a lot of work keeping the JRE's on the workstations up to date. Even though we have a workstation management system for deploying the new Java it's a lot of work. To ease the burden of keeping the JRE environment up to date I made a simple script to remove all old versions of Java and install the new veresion.
The script checks what version(s) of Java is installed. It then removes all versions, except the most recent version. If the most recent version isn't installed it will install it. Furthermore, the script will copy the deployment.config file to the workstation. This file points the Java installation on the workstation to use settings from a central settings file. This might be useful in a corporate environment.
Please click on "Read more..." to read more :)The script will need administrative privileges to work. Also, the location of the JRE installer file must be a trusted location (in Internet Options). Otherwise the client will get the annoying "Open file security warning" dialog box.

The script looks somewhat like this:
*----CUT HERE---*
Option Explicit
Dim msiObject, msiProduct, strProdList, strProdInfo, msiProdVersion,appName1, appName2, InstallerPath
Dim CommandShell, cmdline, strDontUninstallThis, boolNewJavaExists, fso, objShell, variable, newfolder, ConfigFile
Const msiInstallStateDefault = 5

appName1 = "java" 'Application name (or part of name) to search for and uninstall.
appName2 = "j2se" 'Name of another application to search for and uninstall (some old java versions are shown in Add/remove programs as j2se)
strDontUninstallThis = "java(tm) 6 update 18" 'Here we put the name of the version that should NOT be uninstalled.
InstallerPath = "\\Servername\sharename\jre-6u18-windows-i586-s.exe" 'Change this to reflect the path where you have saved the JRE installer file.
ConfigFile = "\\servername\sharename\deployment.config" 'Change this to reflect the path where you have saved the deployment.config file.
boolNewJavaExists = False

strProdList = ""
Set msiObject = Wscript.CreateObject("WindowsInstaller.Installer")

For Each msiProduct In msiObject.Products
If InStr(LCase(msiObject.ProductInfo(msiProduct, "ProductName")), LCase(appName1)) Then
If not (LCase(msiObject.ProductInfo(msiProduct, "ProductName")) = LCase(strDontUninstallThis)) Then
set CommandShell = createobject("wscript.shell")
cmdline = "msiexec /X " & msiProduct & " /qn"
CommandShell.run cmdline, 1, true
Else
boolNewJavaExists = True
End If
ElseIf InStr(LCase(msiObject.ProductInfo(msiProduct, "ProductName")), LCase(appName2)) Then
If not (LCase(msiObject.ProductInfo(msiProduct, "ProductName")) = LCase(strDontUninstallThis)) Then
set CommandShell = createobject("wscript.shell")
cmdline = "msiexec /X " & msiProduct & " /qn"
CommandShell.run cmdline, 1, true
Else
boolNewJavaExists = True
End If

End If
Next

If (boolNewJavaExists = False) Then
set CommandShell = createobject("wscript.shell")
cmdline = Chr(34) & InstallerPath & Chr(34) & " /s AgreeToLicense=YES IEXPLORER=1 MOZILLA=1 REBOOT=Suppress JAVAUPDATE=0"
CommandShell.run cmdline, 1, true
End If

set fso=CreateObject("Scripting.FileSystemObject")
If fso.FileExists(ConfigFile) Then
If not fso.FolderExists(EnvString("windir") & "\sun\") Then
newfolder = fso.CreateFolder(EnvString("windir") & "\sun\")
End IF
If not fso.FolderExists(EnvString("windir") & "\sun\java\") Then
newfolder = fso.CreateFolder(EnvString("windir") & "\sun\java\")
End IF
If not fso.FolderExists(EnvString("windir") & "\sun\java\deployment\") Then
newfolder = fso.CreateFolder(EnvString("windir") & "\sun\java\deployment\")
End IF
fso.CopyFile ConfigFile, EnvString("windir") & "\sun\java\deployment\"
End If

Function EnvString(variable)
'This function returns a particular environment variable’s value.
' for example, if you use EnvString("username"), it would return
' the value of %username%.
set objShell = WScript.CreateObject( "WScript.Shell" )
variable = "%" & variable & "%"
EnvString = objShell.ExpandEnvironmentStrings(variable)
Set objShell = Nothing
End Function
*----CUT HERE---*

In addition to the script you will need the JRE installer, which can be downloaded from Sun's website.

Also, you will need to create a deployment.config file, which could look somewhat like this:

*----CUT HERE---*
deployment.system.config=file:\\\\Servername\\sharename\\deployment.properties
deployment.system.config.mandatory=FALSE
*----CUT HERE---*

Finally you will need a deployment.properties file, which you should save on some server share. The file might look something like this:

*----CUT HERE---*
deployment.javaws.shortcut=NEVER
deployment.javaws.autodownload=NEVER
deployment.javaws.autodownload.locked
deployment.cache.max.size = 200
*----CUT HERE---*

You may save all files in the same network share. Just make sure it's readable from the computers. The script can be run locally on each workstation e.g. using some workstation management system. You can also run it remotely e.g. using psexec.exe.]]> General http://jar.yosephine.com/index.php?itemid=20 Mon, 1 Feb 2010 02:53:35 -0500 http://jar.yosephine.com/index.php?itemid=18
The script uses w3sockets (socketreg.exe & socket.dll) from http://www.dimac.net. I won't post those files here, but you can download them from here.

Also, the script uses Microsoft's SMS sender for sending the SMS messages using a mobile phone connected to the computer that runs the script. The SMS sender program can be found here.

The SMS sender program is kind of problematic. When you send an SMS it will throw a notification on the screen. I've used pskill.exe (part of the pstools, available here) to kill the SMS sender program and its notifications.

And finally, the script itself is shown below...

'This script sends e-mail using SMTP, and then checks that the messages have arrived in the Excgange server mailbox using POP3.
'The purpose of the script is to monitor SMTP mail flow and alert if there is a problem in the mail flow.
'The script is dependent upon the socket.dll, which should be registered on the server (by running SocketReg.exe).
'The required files should be kept in the same dir as this script, in order to be available.
'This script also utilizes Microsoft's free smssender.exe to send alerts using a mobile phone connected to the computer.
'Also pskill.exe is used to kill the smssender.exe's notification.

'The following variables may be changed:
arrSMTPServers = array("SERVER1", "SERVER2") 'Put your servers here
intSMTPPort = 25 'Set the port to use for sending SMTP mail
strFromAddr = "youraddress@yourdomain.com" 'Set the sender address for the messages
strToAddr = "destinationaddress@yourdomain.com" 'Set the recipient address for the messages
strPOPServer = "popserver.yourdomain.com" 'Set the POP server
intPOPPort = 110 'Set the POP server port
strSMSSender = "c:\Program files\Microsoft SMS Sender\smssender.exe" 'Path to smssender.exe
strPhoneNumber = "5551234" 'Phone number to send alert messages to
strPSKill = "c:\temp\pskill.exe" 'Path to pskill.exe
strExpectedGreeting = "Microsoft Exchange" 'Expected greeting text of POP server
strPOPUser = "username" 'Username for the POP mailbox
strPOPPass = "password" 'Password for the POP mailbox

'Do not change anything below this line!
'---------------------------------------

Dim arrID() 'Array, containing the ID's for the messages to send.
On Error Resume Next
arrPath = Split(strSMSSender, "\")
strSMSexe = arrPath(Ubound(arrPath))

For i=0 to Ubound(arrSMTPServers)
'Generate ID's for the messages to send:
ReDim Preserve arrID(i)
arrID(i) = fGenerateID
'Send message:
subSendMail arrSMTPServers(i), intSMTPPort, strFromAddr, strToAddr, arrID(i), arrID(i)
Next

'Sleep for a while to allow time for the messages to be scanned and delivered:
Wscript.sleep 20000

For i=0 to Ubound(arrSMTPServers)
'Read mailbox, and search for our messages:
If fReadPOPMsgs (arrID(i), strPOPServer, intPOPPort, strExpectedGreeting, strPOPUser, strPOPPass) = 1 Then
Wscript.echo "Inbound SMTP route through " & arrSMTPServers(i) & " is OK!"
Else
Wscript.echo "Inbound SMTP route through " & arrSMTPServers(i) & " is DOWN!"
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run (Chr(34) & strSMSSender & Chr(34) & " /p:" & strPhoneNumber & " /m:" & Chr(34) & "Inbound SMTP route through " & arrSMTPServers(i) & " is DOWN!" & Chr(34)),0
wscript.sleep 30000
objShell.Run (Chr(34) & strPSKill & Chr(34) & " " & strSMSexe)
End If
Next

fDelPOPMsgs strPOPServer, intPOPPort, strExpectedGreeting, strPOPUser, strPOPPass









'***************** subSendMail() **********************
Sub subSendMail(server, port, sender, recipient, subject, body)
Set objEmail = CreateObject("CDO.Message")
objEmail.From = sender
objEmail.To = recipient
objEmail.Subject = subject
objEmail.Textbody = body
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = server
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = port
objEmail.Configuration.Fields.Update
objEmail.Send
End Sub

'***************** fGenerateID() **********************
Function fGenerateID()
Randomize
b = 0
ID = ""
Do while b <= 40
ID = ID & Int(10 * Rnd)
b = b + 1
Loop
fGenerateID = ID
End Function



'***************** fReadPOPMsgs() **********************
Function fReadPOPMsgs(identifier, strPOPServer, intPOPPort, strExpectedGreeting, strPOPUser, strPOPPass)
Dim oSocket, iErr, sSocketText
sSocketText = ""
a = 1
strStat = ""
Set oSocket = CreateObject("Socket.TCP")
oSocket.DoTelnetEmulation = True
oSocket.TelnetEmulation = "TTY"
oSocket.Host = strPOPServer & ":" & intPOPPort
On Error Resume Next
oSocket.Open
iErr = Err.Number
If iErr <> 0 Then
fReadPOPMsgs = 0
Exit Function
End If
sSocketText = oSocket.GetLine
If InStr(sSocketText, strExpectedGreeting) = 0 Then WScript.Echo sSocketText

oSocket.SendLine "user " & strPOPUser
sSocketText = oSocket.GetLine
If InStr(sSocketText,"OK") = 0 Then WScript.Echo sSocketText

oSocket.SendLine "pass " & strPOPPass
sSocketText = oSocket.GetLine
If InStr(sSocketText,"User successfully logged on") = 0 Then WScript.Echo sSocketText

oSocket.SendLine "stat"
sSocketText = oSocket.GetLine
strStat = sSocketText
arrStat = Split(strStat, " ")

Do while Int(arrStat(1)) >= a
sSocketText = ""
oSocket.SendLine "retr " & a
Do while sSocketText <> "."
sSocketText = oSocket.GetLine
If InStr(sSocketText, identifier) <> 0 Then fReadPOPMsgs = 1
'WScript.Echo sSocketText
Loop
a = a + 1
Loop
oSocket.SendLine "quit"



oSocket.Close
On Error GoTo 0
'fReadPOPMsgs = 0

End Function

'***************** fDelPOPMsgs() **********************
Function fDelPOPMsgs(strPOPServer, intPOPPort, strExpectedGreeting, strPOPUser, strPOPPass)
Dim oSocket, iErr, sSocketText
sSocketText = ""
a = 1
strStat = ""
Set oSocket = CreateObject("Socket.TCP")
oSocket.DoTelnetEmulation = True
oSocket.TelnetEmulation = "TTY"
oSocket.Host = strPOPServer & ":" & intPOPPort
On Error Resume Next
oSocket.Open
iErr = Err.Number
If iErr <> 0 Then
fReadPOPMsgs = 0
Exit Function
End If
sSocketText = oSocket.GetLine
If InStr(sSocketText, strExpectedGreeting) = 0 Then WScript.Echo sSocketText

oSocket.SendLine "user " & strPOPUser
sSocketText = oSocket.GetLine
If InStr(sSocketText,"OK") = 0 Then WScript.Echo sSocketText

oSocket.SendLine "pass " & strPOPPass
sSocketText = oSocket.GetLine
If InStr(sSocketText,"User successfully logged on") = 0 Then WScript.Echo sSocketText

oSocket.SendLine "stat"
sSocketText = oSocket.GetLine
strStat = sSocketText
arrStat = Split(strStat, " ")
a=1
Do while Int(arrStat(1)) >= a
sSocketText = ""
oSocket.SendLine "dele " & a
sSocketText = oSocket.GetLine
' wscript.echo sSocketText
a = a + 1
Loop
oSocket.SendLine "quit"



oSocket.Close
On Error GoTo 0
fDelPOPMsgs = 0

End Function]]> General http://jar.yosephine.com/index.php?itemid=18 Thu, 10 Sep 2009 07:02:44 -0400 http://jar.yosephine.com/index.php?itemid=16
With 6000+ spams I figured it was best to just bulk-erase them all. Sorry for removing all nice comments as well.

For the time being the comment-section is closed :(]]> General http://jar.yosephine.com/index.php?itemid=16 Sun, 26 Jul 2009 18:13:51 -0400 http://jar.yosephine.com/index.php?itemid=14 here.

I've created a small and simple helpdesk application for our users in just a couple of hours. The hta does some basic diagnostics (Checking if the computer is on the network, checking that e-mail servers are available, checking CPU load, etc.), shows basic computer information (Computer name, make, model, memory, hard drive, serial number etc), and allows the user to send support requests to the support team. The nice thing with this method of sending support requests is that the hta can automatically add some relevant information to the support request (such as computer name and IP address), that the user doesn't necessarily understand to add themselves.

I may be posting the hta here if someone requests it, and more importantly, if I have the time to tidy it up a bit. For now the application is in English only, but I just might add different languages (Swedish, Finnish, German). ]]> General http://jar.yosephine.com/index.php?itemid=14 Fri, 29 May 2009 09:47:13 -0400 http://jar.yosephine.com/index.php?itemid=12
Well, anyway I should probably start investigating how I can get some publicity for my fine blog. The only thing is that I don't find that very interesting.

A quick search on one of the leading web search engines led me to some kind of link exchange program, which can be found here:
SubmitLinksFree.com - the high quality Links Directory for webmasters.

Add Your Link - Web Directory. Add your link today.

-Sorry, I had to include those links to be allowed to submit my link to the site. Let's see if it helps. I'm expecting to get numerous hits within the next 24 hours ;)]]> General http://jar.yosephine.com/index.php?itemid=12 Thu, 28 May 2009 15:00:31 -0400 http://jar.yosephine.com/index.php?itemid=10
The script works as follows:
First you need to make a file containing a list of old queues and their corresponding new queues. Let the file be named filename.txt in this example. Here's what filename.txt could look like:

\\OldServer\OldPrinterQueueName,\\NewServer\NewPrinterQueueName
\\OldServer\AnotherOldQueue,\\NewServer\AnotherNewQueue
\\AnotherOldServer\AThirdQueue,\\AnotherNewServer\AThirdQueue

As you probably can see, each line comprises an old queue and a new queue, separated by a comma. That's all. You may make the list as long as you want as long as each line contains just this comma-separated pair of printer queues. No comments, no other text is allowed, just the comma-separated pairs of queues, one pair per line.

Then you need to edit the script and insert the full UNC path of the file you just created. If you named the file "filename.txt", saved it on a share called "ShareName" on a server, named "Server", then you would enter "\\Server\ShareName\FileName.txt" as the value of the strFile variable in the script.

Finally you should make sure this script runs for each user in your environment. This can be done e.g. by calling it from the logon script. As the script might take some time to run you might want to make sure it runs only once for each user. This, in turn, may be accomplished e.g. by adding a few lines in your users' logon script(s), checking if a certain file exists in the user's profile. If the file exists, the logon script will skip calling the printer change script. If the file doesn't exist the logon script should call the printer change script and create this certain file in the user's profile to avoid that the printer change script is run the next time the user logs on.

Ok, that's probably all you need to know about the script. Here's the script code. You may use it free of charge as long as I'm given the appropriate credit. You may also change it as you wish, but you may not remove my name from it.


' Script that changes the user's printer(s) to other(s) printer(s) according to a csv list of printers.
' The list of printers should contain comma separated printer pairs, one pair at each line, like this:
' \\server1\printer1,\\server2\printer2
' where \\server1\printer1 is the printer that shall be replaced,
' and \\server2\printer2 is the printer that shall replace the beforementioned printer.
' The script can be called from a e.g. the logon script and the script can replace several different printers.
' Just add more lines to the list of printers and the script will go through them all.
' The script also notes which printer is the default printer and sets the replacing printer as default printer.
' Created by Dennis Nyholm 23.7.2008

'Fill in the filename of the list of printers here:
set strFile = "\\servername\sharename\filename.txt"

Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile(strFile, ForReading)
Do Until objTextFile.AtEndOfStream
strLine = objTextFile.Readline
arrprt = Split(strLine, ",")
Sourceprt = arrprt(0)
Destprt = arrprt(1)
'Wscript.Echo Sourceprt & " => " & Destprt
strComputer = "."
'Set error handling on:
'On Error Resume Next
Set objNetwork = CreateObject("Wscript.Network")

Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colInstalledPrinters = objWMIService.ExecQuery _
("SELECT * FROM Win32_Printer")
For Each objPrinter in colInstalledPrinters
'Wscript.Echo "Printer Name: " & objPrinter.Name
If LCase(objPrinter.Name) = LCase(Sourceprt) Then
Wscript.Echo objPrinter.Name & " will be replaced by " & Destprt
'Install replacing printer:
objNetwork.AddWindowsPrinterConnection Destprt

'Check default printer:
Set WshShell = WScript.CreateObject("WScript.Shell")
strDefaultPrinter = WshShell.RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows\Device")
arrDefaultPrinter = Split(strDefaultPrinter, ",")

'Check if this is the default printer:
If LCase(arrDefaultPrinter(0)) = LCase(objPrinter.Name) Then
'Wscript.Echo "Is default printer"
'Set the printer as default:
objNetwork.SetDefaultPrinter Destprt
End If

'Remove old printer:
objNetwork.RemovePrinterConnection Sourceprt
End If

Next
Loop

]]> General http://jar.yosephine.com/index.php?itemid=10 Tue, 26 May 2009 05:49:48 -0400 http://jar.yosephine.com/index.php?itemid=8 Oh, and the password for the VNC session is "secret" (without the quotes). You can (and probably should) change it by editing the instantVNC.vbs script.

How to use:

1) Download this file.
2) Extract the content of the file to any desired folder on your PC.
3) Run the RUNME.BAT file

The script will ask for some details, such as the name or IP address of the computer you wish to remotely control. After this it will install the VNC service onto the target computer and launch the VNC client that will allow you to view and control the remote computer. This should work on Windows XP. Haven't tested in Vista, but probably won't work there.]]> General http://jar.yosephine.com/index.php?itemid=8 Mon, 25 May 2009 11:24:47 -0400 http://jar.yosephine.com/index.php?itemid=5
There are a number of things that could have been done better in this script. Now you can e.g. only search by exact file name, including extension (e.g. filename.exe) or substitute the file name or extension with wildcards (e.g. filename.* or *.exe). You're welcome to improve the script. If you decide to do so, please post the improved version here for everyone (including me) to enjoy.

Oh, and all scripts on this site (including this one) may be used by anyone for free, as long as you include the credits in the script code.

Well, enough babbling. Click on Read More to see the script.'ADFileFind.vbs by Dennis Nyholm (jar@yosephine.com) 16.7.2006

On Error Resume Next

Set strDomainName = "yourdomain"
Set strDomainExt = "net"

If Wscript.Arguments.Count < 1 Then
Wscript.Echo "Too few arguments!"& Chr(10) & Chr(13) & "Usage: cscript ADfilefind.vbs "
Wscript.Quit
End If

Set ArgObj = Wscript.Arguments
ArrFilename = split(ArgObj(0), ".")

Wscript.Echo "Filename=" & ArrFilename(0)
Wscript.Echo "Extension=" & ArrFilename(1)

Const ADS_SCOPE_SUBTREE = 2
Const MBCONVERSION= 1048576
Const ForReading = 1
Const ForWriting = 2

Set objConnection = CreateObject("ADODB.Connection")
Set objCommand = CreateObject("ADODB.Command")
objConnection.Provider = "ADsDSOObject"
objConnection.Open "Active Directory Provider"

Set objCOmmand.ActiveConnection = objConnection
objCommand.CommandText = "Select Name, Location from 'LDAP://DC=" & strDomainName & ",DC=" & strDomainExt & "' Where objectClass='computer'"
objCommand.Properties("Page Size") = 2000
objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE
Set objRecordSet = objCommand.Execute
objRecordSet.MoveFirst
Err.Clear

Set FSO = CreateObject("Scripting.FileSystemObject")
Set objFile = FSO.CreateTextFile("Workfile.txt", True)
objFile.Close
Set objFile = FSO.OpenTextFile("Workfile.txt", ForWriting)


Do Until objRecordSet.EOF

objFile.WriteLine objRecordSet.Fields("Name").Value
objRecordSet.MoveNext
Loop
objFile.Close

Do
strCompsLeft = 0
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("Workfile.txt", ForReading)

Set objFSO2 = CreateObject("Scripting.FileSystemObject")
Set objTextFile2 = objFSO2.CreateTextFile("Workfile2.txt", True)
objTextFile2.Close

Do Until objTextFile.AtEndOfStream
strComputer = objTextFile.Readline
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
If Err.Number = 0 Then
Wscript.Echo Chr(10) & Chr(13) & strComputer & ": "
If ArrFilename(0) = "*" Then
Set colFiles = objWMIService.ExecQuery ("Select * From CIM_DataFile Where Extension = '" & ArrFilename(1) & "'")
ElseIf ArrFilename(1) = "*" Then
Set colFiles = objWMIService.ExecQuery ("Select * From CIM_DataFile Where FileName = '" & ArrFilename(0) & "'")
Else
Set colFiles = objWMIService.ExecQuery ("Select * From CIM_DataFile Where FileName = '" & ArrFilename(0) & "' and Extension = '" & ArrFilename(1) & "'")
End If
For Each objFile in colFiles
Wscript.Echo objFile.Name
Next
Else
Set objTextFile2 = objFSO2.OpenTextFile("Workfile2.txt", ForWriting)
objTextFile2.WriteLine strComputer
obj.TextFile2.Close
Err.Clear
strCompsLeft = strCompsLeft + 1
End If
Loop
objTextFile.Close

objFSO.DeleteFile("Workfile.txt")

Set objFile = FSO.CreateTextFile("Workfile.txt", True)
objFile.Close
Set objFile = FSO.OpenTextFile("Workfile.txt", ForWriting)
Set objTextFile2 = objFSO2.OpenTextFile("Workfile2.txt", ForReading)
Do Until objTextFile2.AtEndOfStream
strTextLine = objTextFile2.Readline
objFile.WriteLine strTextLine
Loop
objFile.Close
objTextFile2.Close
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFile("Workfile2.txt")
Wscript.Echo "Computers left: " & strCompsLeft
Loop]]> General http://jar.yosephine.com/index.php?itemid=5 Mon, 25 May 2009 10:20:02 -0400 http://jar.yosephine.com/index.php?itemid=3 General http://jar.yosephine.com/index.php?itemid=3 Mon, 25 May 2009 09:55:56 -0400 http://jar.yosephine.com/index.php?itemid=1
We've loaded this first entry with links and information to get you started. Though you can delete this entry, it will eventually scroll off the main page as you add content to your site. Add your comments while you learn to work with Nucleus CMS, or bookmark this page so you can come back to it when you need to.Home - nucleuscms.org
Welcome to the world of Nucleus CMS. In 2001 a set of PHP scripts were let loose on the open Internet. Those scripts, which took user-generated data and used it to dynamically create html pages, contained the ideas and the algorithms that are the core of today’s Nucleus CMS. Though Nucleus CMS 3.3 is far more flexible and powerful than the scripts from which it emerged, it still expresses the values that guided its birth: flexibility, security, and computational elegance.

Thanks to an international community of sophisticated developers and designers, Nucleus CMS remains simple enough for anyone to learn, and expandable enough to allow you to build almost any website you can imagine. Nucleus CMS lets you integrate text, images, and user comments in a seamless package that will make your web presence as serious, professional, personal, or fun as you want it to be. We hope you enjoy its power.

Documentation - docs.nucleuscms.org
The install process places a user and a developer documentation on your web server. Pop-up help is available throughout the administration area to assist you in maintaining and customizing your site. When in the Nucleus CMS admin area, click on this symbol for context-sensitive help. You can also read this documentation online under docs.nucleuscms.org.

Frequently Asked Questions - faq.nucleuscms.org
If you need more information about managing, extending or troubleshooting your Nucleus CMS the Nucleus FAQ is the first place to search information. Over 170 frequently asked questions are answered from experienced Nucleus users.

Support - forum.nucleuscms.org
Should you require assistance, please don't hesitate to join the 6,800+ registered users on our forums. With its built-in search capability of the 73,000+ posted articles, your answers are just a few clicks away. Remember: almost any question you think of has already been asked on the forums, and almost anything you want to do with Nucleus has been tried and explained there. Be sure to check them out.

Demonstration - demo.nucleuscms.org
Want to play around, test changes or tell a friend or relative about Nucleus CMS? Visit our live demo site.

Skins - skins.nucleuscms.org
The combination of multi-weblogs and skins/templates make for a powerful duo in personalizing your site or designing one for a friend, relative or business client. Import new skins to change the look of your website, or create your own skins and share them with the Nucleus community! Help designing or modifying skins is only a few clicks away in the Nucleus forums.

Plugins - plugins.nucleuscms.org
Looking to add some extra functionality to the base Nucleus CMS package? Our plugin repository gives you plenty of ways to extend and expand what Nucleus CMS can do; your imagination and creativity are the only limit on how Nucleus CMS can work for you.

Development - dev.nucleuscms.org
If you need more information about the Nucleus development you can find Informations in the developer documents at dev.nucleuscms.org or in the Support Forum. Sourceforge.net graciously hosts our Open Source project page which contains our software downloads and CVS repository.

Donators
We would like to thank these nice people for their support. Thanks all!

Vote for Nucleus CMS
Like Nucleus CMS? Vote for us at HotScripts and opensourceCMS.

License
When we speak of free software, we are referring to freedom, not price. Our General Public Licenses are designed to make sure that you have the freedom to distribute copies of free software (and charge for this service if you wish), that you receive source code or can get it if you want it, that you can change the software or use pieces of it in new free programs; and that you know you can do these things.]]> General http://jar.yosephine.com/index.php?itemid=1 Mon, 25 May 2009 09:51:51 -0400