Technology All The Way

File Renaming

2006-01-16T23:50:58Z

If you ever need to rename a large number of files, for instance you have finally decided to organize your digital photos, check out Bulk Rename Utility - Downloads.

This program seems complex at first, but that is simply because it can do almost any sort of bulk renaming you can imagine. As a computer geek, I know I could write this program. Lucky for me, I don't have to as it has already been written.

Network Mapping made easy

2005-06-05T06:54:14Z

While trying to map my local network, I was pointed to this program:

Network management, network discovery, SNMP, MIB and WMI browsers, NetBIOS and port scanner

Seems to work very well and the price is very right.

Webcam Software

2005-02-23T17:18:27Z

I like the looks of this program: TinCam WebCam Software

I guess I will have to try it out.

Recording LP Albums

2004-01-28T15:26:10Z

The Recording LP Albums On Your Computer - Tutorials might be very useful if I ever get around to helping my father convert his many LPs to digital recordings.

CDOSYS.dll missing

2003-10-21T21:01:52Z

As I worked to convert the c# info in my post about saving a web page as an mht file, I ran into a problem with the reference to cdosys.dll.

A little research brought me to this page:

318823 - CDO for Windows 2000 Library Reference Is Unavailable in Visual Basic Project

There I learned:

If you try to create or modify a project that references the Microsoft Collaboration Data Objects for Windows 2000 (CDOSYS) Library, the reference is not available. The reference for the Microsoft Collaboration Data Objects (CDO) for Exchange 2000 Library is present instead.

So the quest continues.

Saveas MTH file

2003-10-21T20:44:18Z

I want to download and programatically save web pages as mht files. I was having a hard time until I went to IE SaveAS MHTML in C#, where I found the following code:

Make a reference to these two COM objects:
C:\WINDOWS\SYSTEM32\cdosys.dll
C:\Program Files\Common Files\System\ado\msado15.dll

I don't think neither of these have PIAs (Primary Interop Assembly) so this will generate two typelibs for your project.

The Source:

CDO.MessageClass message = new CDO.MessageClass();
message.CreateMHTMLBody("http://www.fanms.com/", CDO.CdoMHTMLFlags.cdoSuppressNone, "", "");

ADODB.Stream stream = message.GetStream();
stream.SaveToFile("fanms.mht", ADODB.SaveOptionsEnum.adSaveCreateOverWrite);

Now I just have to change it to VB.

Update: Here is my version of this code in VB:

Dim message As New CDO.MessageClass()
message.CreateMHTMLBody("http://www.iodid.com", CDO.CdoMHTMLFlags.cdoSuppressNone, "", "")

Dim Outstream As ADODB.Stream
Outstream = message.GetStream
Outstream.SaveToFile("c:\test.mht", ADODB.SaveOptionsEnum.adSaveCreateOverWrite)

Very Useful Moveable Type Plug-in

2003-08-24T03:59:07Z

I used the plugin that I found at Movable Type Plugins: Supplemental Calendar Tags plugin documentation to add a 3 month calendar to my index page.

TreeNode Level

2003-06-22T21:55:10Z

If you spend any time working with Treeviews, I can't imagine not needing this or having to invent it yourself:

Windows Forms FAQ - Windows Forms TreeView

[VB.NET]

Public Sub NodateLevel(ByVal node as TreeNode) As Integer

Dim level as Integer = 0

While Not node Is Nothing

node = node.Parent

level = level 1

End While

End Sub

I edited into this:

Private Function NodeLevel(ByVal node As TreeNode) As Integer
Dim level As Integer = 0
While Not node Is Nothing
node = node.Parent
level = level + 1
End While
End Function

Hide Datagrid Expanders

2003-06-21T23:12:49Z

In the program I am developing, I wanted to show data from a table in a datagrid. This table is related to another table. As a result, this datagrid would show an expander and the name of that other table. I wanted this hidden. So I asked myself, "How do I hide the expander?" I didn't know so I searched and found the following:

Microsoft Support WebCasts

One DataGrid is designated to be the master grid and the second is designated to be the details grid. When you select an entry in the master list, all of the related child entries are shown in the details list. As you can see, there are no expanders shown on the master DataGrid. This is done by setting the AllowNavigation property of the DataGrid controls to false.

So there you have it set AllowNavigation to False. If you happen to find this useful, please link to this post as there is nothing that says to do this to hide them. I think this would be very helpful to others.

Version Number

2003-06-09T20:29:55Z

I used information from Versioning an Assembly to be able to control the version numbers of my current project.

Specifically:

imports system
imports system.reflection
Imports System.Runtime.InteropServices

'The following GUID is for the ID of the typelib if this project is exposed to COM

' Version information for an assembly consists of the following four values:
'
' Major Version
' Minor Version
' Build Number
' Revision
'
' You can specify all the values or you can default the Build and Revision Numbers
' by using the '*' as shown below:

Long List of How To's

2003-06-07T23:04:19Z

I stumbled across this list. I think it may be very helpful in the future:
Microsoft QuickStart Tutorials

Bringing a specific window to the top yet again

2003-06-07T22:49:22Z

I was still having problems so I found this page:
Create a Form that Cannot Be Activated

From It I found this that seems to work better:

Private Declare Function BringWindowToTop _
Lib "user32" (ByVal hwnd As Long) As Long

Manipulating Word and Its SpellChecker pt. 1

2003-06-07T19:33:36Z

Now that I have the handle for Word I need to make use of the Topmost function to raise it above the others. I found this page to be helpful:

VB TopMost Function

The most useful parts are:

Public Const HWND_TOPMOST = -1
Public Const HWND_NOTOPMOST = -2
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOSIZE = &H1
Public Const SWP_NOACTIVATE = &H10
Public Const SWP_SHOWWINDOW = &H40
Public Const TOPMOST_FLAGS = SWP_NOMOVE Or SWP_NOSIZE
Public Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, y, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Public Sub MakeTopMost(Handle As Long)
SetWindowPos Handle, HWND_TOPMOST, 0, 0, 0, 0, TOPMOST_FLAGS
End Sub

Public Sub MakeNormal(Handle As Long)
SetWindowPos Handle, HWND_NOTOPMOST, 0, 0, 0, 0, TOPMOST_FLAGS
End Sub

Word's Classname

2003-06-07T19:20:39Z

Particle Software :: Recall Application

Method to cause an application to show a dialog box

2003-06-07T19:18:22Z

Show Method

Here is how I used it:
x = WordApp.Dialogs.Item(WdWordDialog.wdDialogToolsSpellingAndGrammar).Show