|
Here is a script for mapping a printer with vbscript
Option Explicit
' 1: Maps Printer
Main
Sub Main()
Call MapPrinter("\\UNC\Path", true)
End Sub
Sub MapPrinter(sPrinter, bDefault)
Dim objNet
' *** Map the printer for the user *** '
Set objNet = CreateObject("WScript.Network")
objNet.AddWindowsPrinterConnection sPrinter
If bDefault Then
objNet.SetDefaultPrinter sPrinter
End If
Set objNet = Nothing
End Sub
Common sense is admitting there is cause and effect and that you can exert some control over what you understand.
|
|
|
|
|
Here's another script that's no longer used. Again, posting it for someone else to use
Option Explicit
Call Main()
Sub Main()
Dim sPath, sSelect, dDate, sResults, dFileDate
Dim objWMIService, objChild, objFile
Dim objFSO
sPath = GetIniValue("Path")
if (Len(sPath)) < 1 Then
iCounter = 0
Exit Sub
End if
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
dDate = DatePart("yyyy", DateAdd("d", GetIniValue("NumDays"), Date))
If DatePart("m", DateAdd("d", GetIniValue("NumDays"), Date)) < 10 Then
dDate = dDate & "0" & DatePart("m", DateAdd("d", GetIniValue("NumDays"), Date))
Else
dDate = dDate & DatePart("m", DateAdd("d", GetIniValue("NumDays"), Date))
End If
If DatePart("d", DateAdd("d", GetIniValue("NumDays"), Date)) < 10 Then
dDate = dDate & "0" & DatePart("d", DateAdd("d", GetIniValue("NumDays"), Date))
Else
dDate = dDate & DatePart("d", DateAdd("d", GetIniValue("NumDays"), Date))
End If
dDate = dDate & "000000.000000+000"
sSelect = "Select * from CIM_DataFile where Path= '" & sPath & "' and CreationDate <= '" & dDate & "'"
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objChild = objWMIService.ExecQuery(sSelect)
if not IsNull(objChild) then
For Each objFile in objChild
Call objFSO.Delete(objFile.Name, true)
Next
End If
Set objFSO = Nothing
Set objChild = Nothing
Set objWMIService = Nothing
Set objFile = Nothing
If Err.Number <> 0 Then
End If
End Sub
Function GetIniValue(sID)
On Error Resume Next
Dim objFSO
Dim objTextFile
Dim sValue
Dim sKey, sFileName
Set objFSO = CreateObject("Scripting.FileSystemObject")
sFileName = GetScriptName(".ini")
If (objFSO.FileExists(sFileName) = False) Then
msgbox "No configuration file defined!"
GetIniValue = vbNullString
set objFSO = Nothing
Exit Function
End If
Set objTextFile = objFSO.OpenTextFile(sFileName)
Do While Not objTextFile.AtEndOfStream
sValue = objTextFile.ReadLine()
If InStr(sValue, "=") Then
sKey = Split(sValue, "=")
If sKey(0) = sID Then
GetIniValue = sKey(1)
End If
End If
Loop
objTextFile.Close
Set objTextFile = Nothing
set objFSO = Nothing
If Err.Number <> 0 Then
End If
End Function
Function GetScriptName(sExt)
On Error Resume Next
GetScriptName = Replace(Wscript.ScriptName, ".vbs", sExt)
If Err.Number <> 0 Then
End If
End Function
Common sense is admitting there is cause and effect and that you can exert some control over what you understand.
|
|
|
|
|
Okay, so here's another one of those one off scripts I've written. Its no longer used so might as well post it here on the off chance someone else needs it.
Option Explicit
'**************************************************************'
'*** Dist.List.V2 by Stephan Douglas ***'
'*** Contact stephan@sentinalsoftware.com ***'
'*** No warranties express or implied use at your own risk ***'
'*** You are free to use as you see fit ***'
'**************************************************************'
' Requirements as defined by Rhonda 03.02.2008
' 1. Get from Exchange Global Address list the Distribution Lists
' specified in a config file.
' 2. Output the results to an Excel spreadsheet
' 3. Values to obtain, Dist List Name, Members List and Manager
' there of.
'*** Excel Var ***'
Dim objExcel
Set objExcel = Nothing
'*** File System Constants ***'
Const ForReading = 1
Const ForWriting = 2
Const ForAppending =8
'***************************************************************************'
'*** Sub Main, all work starts from main *** SFD 05/08/2008
'***************************************************************************'
Call Main()
Sub Main()
Dim i, iCount
'Create the excel spreadsheet
If (objExcel is Nothing )Then
Set objExcel = CreateObject("Excel.Application")
iCount = objExcel.SheetsInNewWorkbook
If iCount > 1 Then
For i = 0 To iCount Step - 1
objExcel.Sheets(i).Delete
Next
End If
objExcel.SheetsInNewWorkbook = 1
objExcel.Workbooks.Add
End if
'Start The reading process
Call DeSerializeUser()
End Sub
'***************************************************************************'
'*** SerializeUser, Write Param to file *** SFD 05/08/2008
'***************************************************************************'
Function DeSerializeUser()
'On Error Resume Next
Dim objTextFile, objFSO
Dim sValue
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile(GetScriptName(".ini"), ForReading, True)
'*** Parse the ini file ***'
Do While Not objTextFile.AtEndOfStream
sValue = objTextFile.ReadLine()
If Not InStr(sValue, "'") Then
Call GetUsers(sValue)
End If
Loop
objTextFile.Close
Set objTextFile = Nothing
Set objFSO = Nothing
'*** Error Handling ***'
If Err.Number <> 0 Then
Msgbox "Error- DeSerialize User - " & Err.Number & " " & Err.Description
End If
End Function
'***************************************************************************'
'*** Return Script Name with user selected File Extension *** SFD 03/02/2008
'***************************************************************************'
Function GetScriptName(sExt)
On Error Resume Next
GetScriptName = Replace(Wscript.ScriptName, ".vbs", sExt)
'*** Error Handling ***'
If Err.Number <> 0 Then
Msgbox "Error- Get Script Name - " & Err.Number & " " & Err.Description
End If
End Function
'***************************************************************************'
'*** Read the Distribution List from AD and present it in Excel to user *** SFD 03/02/2008
'***************************************************************************'
Function GetUsers(sUser)
On Error Resume Next
Dim objGroup, iRow, strUser
Dim objUser, iCount
Set objGroup = GetObject(sUser)
With objExcel
.SheetsInNewWorkbook = .SheetsInNewWorkbook + 1
.Worksheets.Add
.Visible = True
.Worksheets.Item(1).Name = mid(objGroup.Name, instr(1,objGroup.Name,"=") + 1 ) 'set Worksheet name to that of the DL
objUser = Filter(Split(objGroup.ManagedBy, ","), "CN=")
strUser = Replace(objUser(0), "CN=", "")
.Cells(1,1) = "Manager"
.Cells(2,2) = CStr(strUser)
irow = 4
.Cells(3,1) = "Members"
For Each strUser in objGroup.Member
Set objUser = GetObject("LDAP:
.Cells(iRow,2) = objUser.CN
irow=irow + 1
Next
.Columns(1).entirecolumn.autofit
End With
Set objGroup = Nothing
'*** Error Handling ***'
If Err.Number <> 0 And Err.Number <> 451 Then
Msgbox "Error- Get Users - " & Err.Number & " " & Err.Description
End If
End Function
Common sense is admitting there is cause and effect and that you can exert some control over what you understand.
|
|
|
|
|
I recently accepted a new job as a Data Analyst, I get to build Cubes using SQL Server Analysis Services. This is an opportunity of a life time for me. I have no training in SQL server, and quite frankly dont know to much about data cubes. The director I report to fully accepts this and is willing to help me get the training I need to make my new position successful. I am replacing a contractor who is spending the next two months training me in on what I will need to know.
The only down side is, my co-workers aren't very well versed in the environment either. The difference is my co-worker was hired with the understanding he knew the environment. So it looks like I'm on my own once my training is complete.
No matter what, Im excited about this opportunity and will make the best of it.
Who knows, maybe I will have more time now to visit CP a little more often.
![Jig | [Dance]](https://codeproject.freetls.fastly.net/script/Forums/Images/jig.gif)
Common sense is admitting there is cause and effect and that you can exert some control over what you understand.
|
|
|
|
|
I've been doing a little scripting lately, really some simple automation stuff like mapping an IP printer to a user’s machine. Below is an error message that through me off for quite some time.
<br />
---------------------------<br />
Windows Script Host<br />
---------------------------<br />
Script: Add.Printer.vbs<br />
Error: Generic failure <br />
Code: 80041001<br />
Source: SWbemObjectEx<br />
<br />
---------------------------<br />
OK <br />
---------------------------<br />
What is a very generic error is really a simple problem. The root of the problem is that I created the port with one name and tried to add the printer with a second name. Understandably it errored out, but a slightly more meaningful error would have been helpful. Here is the script or most of it. The buisiness stuff has been stripped but it should be functional for those who want to know how to create printer ports, load printer device drivers, and add printers.
Option Explicit
'**************************************************************'
'*** Printer Script by S Douglas ***'
'*** Contact add a message to the board ***'
'*** No warranties express or implied use at your own risk ***'
'*** You are free to use as you see fit ***'
'**************************************************************'
' Requirements as defined by Ricky 06/20/2008
' 1: Install the "Brother PCL5e Driver" Printer driver
' 2. Create a port for a network based printer, "IP_xxxx"
' 3. Add the printer to the local machine "Store- Store Num Brother Printer
Call Main()
'**************************************************************************'
'*** Start script ***' SFD 06.25.2008
'**************************************************************************'
Sub Main()
On Error Resume Next
Dim sIP, sNum
'sIP = CalcIP(sNum) // Function Removed, set sIP to the ip you want to use
'sNum = reference number
if Len(sIP) > 0 Then
if Not InstallDriver("Brother PCL5e Driver", "BHPCL5E.INF") Then
Call CreatePort("IP_" & sNum, sIP)
Call AddPrinter("Brother PCL5e Driver", "IP_" & sNum, "Store-" & sNum & " Brother Laser Printer" )
MsgBox "Finished! Printer Name: " & vbNewLine & "Store-" & sNum & " Brother Laser Printer"
Else
MsgBox "Error! Unable to Install the print driver"
End If
Else
MsgBox "Error! Unable to calculate the Printers IP Address"
End If
'*** Error Handling ***'
If Err.Number <> 0 Then
Call ErrorHandling("Unresolved Error in script ", Err.Number, Err.Description)
End If
End Sub
'***************************************************************************************'
'*** Create the network port to mapp the printer to when adding the printer *** ' SFD 06.25.2008
'***************************************************************************************'
Sub CreatePort (name, ip)
On Error Resume Next
Dim objWMIService, objNewPort
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set objNewPort = objWMIService.Get("Win32_TCPIPPrinterPort").SpawnInstance_
objNewPort.Name = name
objNewPort.Protocol = 1
objNewPort.HostAddress = ip
objNewPort.SNMPEnabled = False
objNewPort.Put_
Set objNewPort = Nothing
Set objWMIService = Nothing
'*** Error Handling ***'
If Err.Number <> 0 Then
Call ErrorHandling("Creating the network port ", Err.Number, Err.Description)
End If
end sub
'***************************************************************************************'
'*** Add the printer, based on the information provided thus far *** ' SFD 06.25.2008
'***************************************************************************************'
Function AddPrinter (sDriver, sPort, sName)
On Error Resume Next
Dim objWMIService, objPrinter
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
objWMIService.Security_.Privileges.AddAsString "SeLoadDriverPrivilege", True
Set objPrinter = objWMIService.Get("Win32_Printer").SpawnInstance_
objPrinter.DriverName = sDriver
objPrinter.PortName = sPort
objPrinter.DeviceID = sName
objPrinter.Location = ""
objPrinter.Network = True
objPrinter.Put_
Set objWMIService = Nothing
Set objPrinter = Nothing
'*** Error Handling ***'
If Err.Number <> 0 Then
Call ErrorHandling("Adding the Printer ", Err.Number, Err.Description)
End If
End Function
'***************************************************************************************'
'*** Install the printer driver *** ' SFD 06.25.2008
'***************************************************************************************'
Function InstallDriver(sName, sINF)
On Error Resume Next
Dim objWMIService, objDriver, intResult
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
objWMIService.Security_.Privileges.AddAsString "SeLoadDriverPrivilege", True
set objDriver = objWMIService.Get("Win32_PrinterDriver")
objDriver.Name = sName
objDriver.SupportedPlatform = "Windows NT x86"
objDriver.FilePath = ".\\"
objDriver.Infname = ".\\" & sINF
intResult = objDriver.AddPrinterDriver(objDriver)
InstallDriver = intResult
Set objWMIService = Nothing
Set objDriver = Nothing
'*** Error Handling ***'
If Err.Number <> 0 Then
Call ErrorHandling("Installing Printer Driver ", Err.Number, Err.Description)
End If
End Function
'***************************************************************************************'
'*** Central error notification *** ' SFD 06.25.2008
'***************************************************************************************'
Sub ErrorHandling(sSub, sNum, sDes)
Dim sSupport
sSupport = vbNewLine & vbNewLine & " Please contact support the following error message" & vbNewLine & vbNewLine
Msgbox "Error - " & sSub _
& sSupport _
& " Error Number: " & sNum & vbNewLine _
& " Error Description: " & sDes & vbNewLine
End Sub
Common sense is admitting there is cause and effect and that you can exert some control over what you understand.
|
|
|
|
|
I'm going to start collecting all of the MS SDK links I can find here. Trying to remember where / what they all are is to much of a pain
Volume Shadow Copy Service SDK 7.2
Volume Shadow Copy Service SDK 7.2[^]
Common sense is admitting there is cause and effect and that you can exert some control over what you understand.
|
|
|
|
|
I just stopped in to take a look at the lounge. WOW, I haven't laughed this hard in a while, read this thread -> WinDev[^]
Common sense is admitting there is cause and effect and that you can exert some control over what you understand.
|
|
|
|
|
Now who would have thought that the error below was something as simple as the IIS website needing the version of .NET changed from .NET 1 to .NET 2. Sigh, there was a couple of hours wasted. There has to be a better way for IIS to handle errors like this!
Configuration Error <br />
Description: An error occurred during the processing of a configuration file required to service this request. Please review the specific error details below and modify your configuration file appropriately. <br />
<br />
Parser Error Message: Unrecognized attribute 'type'.<br />
<br />
Source Error: <br />
<br />
<br />
Line 2: <configuration><br />
Line 3: <configSections><br />
Line 4: <sectionGroup name="system.web.extensions" type="System.Web.Configuration.SystemWebExtensionsSectionGroup, System.Web.Extensions, Version=1.0.61025.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35"><br />
Line 5: <sectionGroup name="scripting" type="System.Web.Configuration.ScriptingSectionGroup, System.Web.Extensions, Version=1.0.61025.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35"><br />
Line 6: <section name="scriptResourceHandler" type="System.Web.Configuration.ScriptingScriptResourceHandlerSection, System.Web.Extensions, Version=1.0.61025.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35" requirePermission="false" allowDefinition="MachineToApplication"/><br />
<br />
<br />
Source File: D:\Share\inetpub\wwwroot\KB\web.config Line: 4
  
I need a ![Beer | [beer]](https://codeproject.freetls.fastly.net/script/Forums/Images/beer.gif)
With respect, I must disagree. A quick look at middle management in just about any corporation shows that the dodo not only survived, it's reproducing in record numbers. Christopher Duncan
|
|
|
|
|
Always remember when re-installing subversion the santax is
Copy the svrService.exe to the directory with your subversion setup in it.
cd [to the subversion directory]
svrService.exe -install -d -r [absolute path]
Just makes life so much easier...
With respect, I must disagree. A quick look at middle management in just about any corporation shows that the dodo not only survived, it's reproducing in record numbers. Christopher Duncan
|
|
|
|
|
Just sitting here playing around with VS2005 and C#. Wow there are some really cool features in .NET Take this little snippit for example.
<FONT color=Blue>private</FONT> <FONT color=Blue>void</FONT> GetRunningProcs<FONT color=DarkBlue>(</FONT><FONT color=DarkBlue>)</FONT>
<FONT color=DarkBlue>{</FONT>
<FONT color=Blue>string</FONT> strMsg <FONT color=DarkBlue>=</FONT> <FONT color=Maroon>""</FONT><FONT color=DarkBlue>;</FONT>
<FONT color=DarkGreen>
<FONT color=Blue>try</FONT>
<FONT color=DarkBlue>{</FONT>
<FONT color=Blue>foreach</FONT> <FONT color=DarkBlue>(</FONT><FONT color=Teal>Process</FONT> proc <FONT color=Blue>in</FONT> <FONT color=Teal>Process</FONT><FONT color=DarkBlue>.</FONT>GetProcesses<FONT color=DarkBlue>(</FONT><FONT color=DarkBlue>)</FONT><FONT color=DarkBlue>)</FONT>
<FONT color=DarkBlue>{</FONT>
<FONT color=DarkGreen>
<FONT color=DarkGreen>
<FONT color=Blue>if</FONT> <FONT color=DarkBlue>(</FONT>proc<FONT color=DarkBlue>.</FONT>MainWindowTitle<FONT color=DarkBlue>.</FONT>Length <FONT color=DarkBlue>></FONT> <FONT color=Red>0</FONT><FONT color=DarkBlue>)</FONT>
<FONT color=DarkBlue>{</FONT>
strMsg <FONT color=DarkBlue>+=</FONT> proc<FONT color=DarkBlue>.</FONT>MainWindowTitle<FONT color=DarkBlue>.</FONT>ToString<FONT color=DarkBlue>(</FONT><FONT color=DarkBlue>)</FONT> <FONT color=DarkBlue>+</FONT> <FONT color=Maroon>"\n"</FONT><FONT color=DarkBlue>;</FONT>
<FONT color=DarkBlue>}</FONT>
<FONT color=DarkBlue>}</FONT>
<FONT color=Teal>MessageBox</FONT><FONT color=DarkBlue>.</FONT>Show<FONT color=DarkBlue>(</FONT>strMsg<FONT color=DarkBlue>)</FONT><FONT color=DarkBlue>;</FONT>
<FONT color=DarkBlue>}</FONT>
<FONT color=Blue>catch</FONT> <FONT color=DarkBlue>(</FONT><FONT color=Teal>Exception</FONT> Exc<FONT color=DarkBlue>)</FONT>
<FONT color=DarkBlue>{</FONT>
<FONT color=Teal>MessageBox</FONT><FONT color=DarkBlue>.</FONT>Show<FONT color=DarkBlue>(</FONT>Exc<FONT color=DarkBlue>.</FONT>ToString<FONT color=DarkBlue>(</FONT><FONT color=DarkBlue>)</FONT><FONT color=DarkBlue>)</FONT><FONT color=DarkBlue>;</FONT>
<FONT color=DarkBlue>}</FONT>
<FONT color=DarkBlue>}</FONT>
That just makes it so easy to loop through all running process on the local computer. Doing the equivliant in C++ & MFC would require a lot more work.
Maybe this .NET thing isn't all tht bad...
Oh and the formatting from that little snippet was created using leppies C# IDE xacc[^]
With respect, I must disagree. A quick look at middle management in just about any corporation shows that the dodo not only survived, it's reproducing in record numbers. Christopher Duncan
|
|
|
|
|
ugg, I just spent an hour, an hour figuring out how to link a dll into an app I found here at CP. I just don't get a chance to write any code any more and this is the result. Wasting time trying to remember something just because I haven't done it in a very long time. I no longer work in an area that values innovation and simplification of the work load. Actually they seem to enjoy making every task five times more difficult than it need be.
Enough complaining, so as a result of this I'm starting to think about finding a project out on source forge that needs help. I have looked in the past but really never found anything that suits my interests. Not to mention a project that has source available for evaluation, who wants to get involved in someone else's rats nest? Well I will forge ahead and continue my search for something to work on. We will see how that goes.
Oh and the app I was working on that got me started on this mini rant. Oddly enough it was a covert project for work, to convert PDFs into text. It worked quite well while testing, but when faced with the 30 / 40 meg PDFs I have to deal with, it didn't do much of anything. sigh None the less still an interesting project check it out extract plain text from a PDF file[^]
hmmm maybe I should figure out why that app failed fix it so no one has to put up with PDFs.
Just in case you (well okay, really I mean me  ) ever forget when trying to link zlib[^](zipping lib) into your app. It's realy simple 
- Include the headers for the dll in your app
- Open app properties, navigate to linker
- From the Category combo box select "input"
- Add the lib file to the "object/library modules"
- Lastly, the dll will need to be in the build directory
|
|
|
|
|
So a friend of mine has always wanted to create a networking based website (http://e-grafix.com/comm/[^]) to help others with their networking issues. After a bit of trolling around the net I suggested either looking at Community Server (CS) or Dot Net Nuke (DNN). DNN doesn’t natively have user forums as part of its package, and well is really more of CMS. So he ended up going with Community Server, now I didn’t spend a huge amount of time looking for forum packages out there. But all I have to say is WOW; CS is very, very cool.
Some of the features that make CS cool are, out of the box it supports two separate views, the default view is similar to a PHPBB2 board, eh which is nice enough, but the second view is very close to the way the forums here at Code Project render.
The paid for version supports NNTP access, and here I thought NNTP was dead. I can’t say how much I loved the old news groups; it’s just too bad you have to pay for access to news groups now.
While administration of the site isn’t always entirely clear, it’s mostly fairly intuitive enough.
I would continue on with a features list I like, but alas I just don’t have the time at this point. Take a look at it for your self. http://e-grafix.com/comm/[^] Community Server Site[^]
I'd love to help, but unfortunatley I have prior commitments monitoring the length of my grass. :Andrew Bleakley:
|
|
|
|
|
I just had a conversation with a friend of mine about the newish Fisher Price UIs in operating systems the other day. I think I hit the nail on the head or at least close enough so that his girlfriend (who is slightly techno phobic) understood. Let’s see if I can summarize the same thought process here.
The Fisher Price UIs are really an extension of the graphic user interface, a just a “continued refinement” there of. The less intimidating the UI is, the more it will appeal to people who are not only not techno savvy but those who don’t want to be technology savvy. Do they really help the end user accomplish what they seek out to do? They certainly feel less intimidating than using a command shell. I know this for sure as I use both green screen applications at work and windows apps and I find even Windows 95 a be a vast improvement over the green screens any day.
But do the Fisher Price UI’s really help at all? Working in a corporate environment one of the biggest challenges I see and experience on a daily basis is information management. Man what a pain it is to constantly flip through 50 or so excel / word documents on a daily basis to make notes or what ever for others to see and don’t get me started about trying to track information in Lotus Notes. What a segway I know; it seems that instead of making the UI simpler the same efforts could be put to better use on general information management; or conveying to customers (end users) better utilization of current information management systems.
One thing that is absolutely clear is that both end users and corporations are drowning in a vast ocean of information and there is no real way of keeping track of it all.
I'd love to help, but unfortunatley I have prior commitments monitoring the length of my grass. :Andrew Bleakley:
|
|
|
|
|
Well for the first time in a number of years I’ve had to invest some time / thought into my website. My old hosting provider has decided to call it quits, not that I blame him he has enough on his plate already. So I’ve ventured out onto the wild web and found a place to host my site, which in all honesty is used more for email than anything else.
It didn’t take me to long to find a hosting site, and as it turns out there wasn’t any cost difference between Windows or Linux. So I jumped the Linux ship and got a Windows box with the thought that just maybe I might spend a few minutes here and there adding content / developing stuff for the site (hey it’s a worth a shot ).
Now that I have everything set up, which was rather confusing as the hosting site is where I have my domain registered through. I have to say that there web based email interface is actually pretty nice. Domain management is rather a pain, but they do offer a bunch of free add-ons for the site which is cool. One of the add-ons was Dot Net Nuke, which seams to have a lot of very cool features & downloads just for it. Heck I’m half thinking about ditching the static pages I have now and converting everything over to the DNN side of the site.
First and foremost I have to figure out what all I want for content on the site. Which is proving to be rather difficult, I use the CP blog for whatever ramblings I have so that’s not really needed. Working with DNN isn’t too bad once you get the hang of it. If you’re looking for a CMS system then give it a shot.
That's all for now...
I'd love to help, but unfortunatley I have prior commitments monitoring the length of my grass. :Andrew Bleakley:
|
|
|
|
|
Where did you get the smiley banging his head against the wall? 
|
|
|
|
|
Paul Conrad wrote: Where did you get the smiley banging his head against the wall?
Found it years ago, don't remember where any more. I should probably take that down, I'm sure Chris wouldn't be to happy seeing it there (not suppose to show pics in the forums yea know). link[^]
|
|
|
|
|
S Douglas wrote: I'm sure Chris wouldn't be to happy seeing it there
He should include one similar. It would be great for homework problem posters and cross posters 
|
|
|
|
|
Last Thursday (12/22/2006) I got a newer truck a White 2001 Chevy Silverado 1500 it’s a nice truck, but sure is different compared to my old 1997 Ford F150. It’s going to take some getting used to. 
I'd love to help, but unfortunatley I have prior commitments monitoring the length of my grass. :Andrew Bleakley:
|
|
|
|
|
Just looking over my little blog here and turns out I haven’t been posting much at all over the last few months. Soooooo here is what’s going on in my little world.
For the last two or three weeks my truck, a Ford F150 has been running rough. Thinking it was a maintenance issue I replaced the plugs and wires. Which actually solved the problem for about a day. Over the course of the next few days after that its performance continued back down hill. Then on Sunday as I was attempting to leave for work the truck just wouldn’t start. The starter tried to turn the motor over twice, but only ever made it a couple of revolutions. The second time it made a loud banking noise, thinking nothing of it as the noise sound more like the starter disengaging I continued a few more times trying to get it to start. The starter just wouldn’t turn the motor at all after that.
So I call it a night and had some come pick me up and drop me off at work. The following day during the daylight hours it was plain to see that my truck had developed a serious issue; the motor oil was no longer in the motor. I’m not entirely positive but it looks like the oil leaked out the side of the motor.
A very long story short its time to go hunting for a new truck as the cost of repairing a ten year old truck just doesn’t sound very beneficial. I have looked at new trucks here and there over the last couple of months, and have come to realize the don’t make a real pick up truck any more. They are cars with long cargo spaces on the back.
I'd love to help, but unfortunatley I have prior commitments monitoring the length of my grass. :Andrew Bleakley:
|
|
|
|
|
Well Okay, not my first post, but my first post from my new server. Just finishing downloading updates & drivers for a new server I built, life will be good once its back up and running. It will be nice to be able to have access to my source code repository again.
Specs (absolutly nothing to brag about)
1.7G AMD
512 Ram
Drives
Main drive is only a 10gig, Im going to need to buy new drives looks like the ones I was using have all died
I'd love to help, but unfortunatley I have prior commitments monitoring the length of my grass. :Andrew Bleakley:
|
|
|
|
|
C++ Applications written in VS2005, may error out when starting up with the following error message.
“This application has failed to start because the application configuration is incorrect. Reinstalling the application may fix this problem.”
I have seen this come up a few times in the message boards and experienced this issue myself as well. When distributing C++ applications written in VS2005, you will need to also distribute the updated run time DLLs, CRT which is the C Runtime and MFC Version 8.
If the computer is a Windows XP system, there is a new paradigm for dealing with DLLs. It’s called SXS (side by side) DLL support. In other words it allows the target computer to run multiple versions of the same DLL. This was done to eliminate DLL hell issues. What this means to you is, your app will now need an installer to add the new DLLs to the system.
On earlier systems such as Windows 2000, you will only need to distribute the necessary DLLs with your application.
More information about both the SXS and creating installers can be found below.
Redistributing Visual C++ Files[^]
Deployment Examples[^]
Running C++ application built by VC++ Express on another computer[^]
I'd love to help, but unfortunatley I have prior commitments monitoring the length of my grass. :Andrew Bleakley:
|
|
|
|
|
Lt Col. John McCrae
In Flanders fields the poppies blow
Between the crosses, row on row,
That mark our place; and in the sky
The larks, still bravely singing, fly
Scarce heard amid the guns below.
We are the Dead. Short days ago
We lived, felt dawn, saw sunset glow,
Loved, and were loved, and now we lie
In Flanders fields.
Take up our quarrel with the foe:
To you from failing hands we throw
The torch; be yours to hold it high.
If ye break faith with us who die
We shall not sleep, though poppies grow
In Flanders fields.
In Flanders Fields[^]
I'd love to help, but unfortunatley I have prior commitments monitoring the length of my grass. :Andrew Bleakley:
|
|
|
|
|
|
Today was my second bike ride on the new mountain bike; it’s been two very long years since I have been biking and WOW am I out of shape. It’s going to take a lot of work to get back to where I was about three or four years ago.
Yesterday just to get used to the new bike I only rode for 2 miles, today it was 6. So providing it doesn’t rain tomorrow and I'm still not soar, I'm thinking I should go for 10 miles (I'm not trying to kill my self just get back into physical shape ).
This is my first mountain bike with a front shock; wow does it really change the way a bike handles. I'm not convinced it changes the ride for the better or the worse. It’s just very different. One nice thing about the front shock on the Cannon Dale is I can lock it solid on the fly so the bike responds the way a bike should (well at least for my likings).
Ah it’s great to have three days off a week I tell yea!
Now all I need to do is spend some time in front of the computer, I had decided on learning .NET some time ago, but cant quite seem to muster up the energy do so. I have an old C# book targeting version 1.0 of the frame work, from what I have read thus far there is some pretty cool stuff in .NET. I will save that for another day.
Off to relax now…enough work for the day.
|
|
|
|
|
Well I hunted and hunted around just couldn’t find a mountain bike I liked in my price range. So what did I do? I blew my budget, and ordered a new Cannon Dale F600, in brushed chrome. It should be here April 1st well let’s hope that no one decides to play a prank on me that day. I'm pretty stoked about getting a new bike. Now if only the weather will cooperate and stay above 40 F so I can go out riding…
-- modified at 20:24 Monday 27th March, 2006
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
![Green Alien | [Alien]](https://codeproject.freetls.fastly.net/script/Forums/Images/alien.gif)
![Heart | [heart]](https://codeproject.freetls.fastly.net/script/Forums/Images/love.gif)
![Good Stuff | [The good stuff]](https://codeproject.freetls.fastly.net/script/Forums/Images/vegemite.gif)
![Java | [Coffee]](https://codeproject.freetls.fastly.net/script/Forums/Images/coffee.gif)
![Sheep | [baah]](https://codeproject.freetls.fastly.net/script/Forums/Images/sheep.gif)
![Badger | [badger,badger,badger,badger...]](https://codeproject.freetls.fastly.net/script/Forums/Images/badger.gif)
