Error 430 sudenly in VB program

  • Thread starter Thread starter BioColor
  • Start date Start date
B

BioColor

Hi,

I have a VB6SP5 program that runs FrontPage2000 inside. It has been
working fine for a couple years.

Suddenly, when I made an inconsequential change to an unrelated string
constant and recompiled and ran it I got a "Run-time Error 430 Class
does not support automation or does not support expected interface."

From the program:

Dim oFP As frontpage.Application
....
Set oFP = CreateObject("Frontpage.Application")

The error happens at the execution of the second line.

Microsoft Frontpage 4.0 PageObject and WebObject Reference Libraries
are selected in the project references.

Unselecting them and re-selecting them again had no effect.


Relevant history:

I recently "Repaired" my XPSP2 Windows version using the Windows CD. I
subsequently got all the high priority updates from MS. I assume this
got me back to my up-to-date system. I've looked at the low priority
updates and didn't see any for Visual Studio or VB. There were some
for XP, but they didn't look relevant.

I was using FP2000 manually earlier in the day to re-make the target
site. Changes were mostly re-naming subwebs, and were done through
FP2000 Tools menu.

Does anyone have any suggestions on finding what's broke?

TIA
DuncanC
 
Might the lower case f in the dim statement be the problem?

Dim oFP As frontpage.Application

Set oFP = CreateObject("Frontpage.Application")

note the difference?
 
Have you tried it on a different PC to see if it might be an issue with a
patch or update that you're missing, or a newer update you have that has
caused it to stop working?
 
Have you tried it on a different PC to see if it might be an issue with a
patch or update that you're missing, or a newer update you have that has
caused it to stop working?
Click to expand...

Unfortunately I have only one computer available.

I have made some diagnostic progress though. The code fails at the
statement where I'm trying to add a child node to the web after
uploading a file:


Call oFPweb.HomeNavigationNode.children.Add _
(PgName, "Home", _
fpStructLeftmostChild)

Again, this code worked fine a month ago, and the undisturbed
executable no longer works.

It seems like one of the two FP library files with web objects (like
oFPweb.HomeNavigationNode) must have become out of synch during my
repair. Does anyone know where thode 2 library files come from?

Thanks for you siggestions.

Cheers,
DuncanC
 
In the VBE menu
Tools References
- add the FP reference

--

_____________________________________________
SBR @ ENJOY (-: [ Microsoft MVP - FrontPage ]
"Warning - Using the F1 Key will not break anything!" (-;
_____________________________________________


| On Mon, 2 Jul 2007 20:00:58 -0400, "David Berry" <[email protected]>
| wrote:
|
| >Have you tried it on a different PC to see if it might be an issue with a
| >patch or update that you're missing, or a newer update you have that has
| >caused it to stop working?
|
| Unfortunately I have only one computer available.
|
| I have made some diagnostic progress though. The code fails at the
| statement where I'm trying to add a child node to the web after
| uploading a file:
|
|
| Call oFPweb.HomeNavigationNode.children.Add _
| (PgName, "Home", _
| fpStructLeftmostChild)
|
| Again, this code worked fine a month ago, and the undisturbed
| executable no longer works.
|
| It seems like one of the two FP library files with web objects (like
| oFPweb.HomeNavigationNode) must have become out of synch during my
| repair. Does anyone know where thode 2 library files come from?
|
| Thanks for you siggestions.
|
| Cheers,
| DuncanC
|
|
 
In the VBE menu
Tools References
- add the FP reference
Click to expand...

Yes I have them checked in the References. I was more curious about
how to restore the possibly corrupted versions of the libraries from
CD. Which CD? Office2000? VB6? MSDN Libraries? WindowsXP? WIndows
Update?

Thanks for your reply.

Cheers,
DuncanC
 
Should be from the FP CD

--

_____________________________________________
SBR @ ENJOY (-: [ Microsoft MVP - FrontPage ]
"Warning - Using the F1 Key will not break anything!" (-;
_____________________________________________


| On Tue, 3 Jul 2007 04:18:29 -0400, "Stefan B Rusynko"
|
| >In the VBE menu
| >Tools References
| >- add the FP reference
|
| Yes I have them checked in the References. I was more curious about
| how to restore the possibly corrupted versions of the libraries from
| CD. Which CD? Office2000? VB6? MSDN Libraries? WindowsXP? WIndows
| Update?
|
| Thanks for your reply.
|
| Cheers,
| DuncanC
 
I have a VB6SP5 program that runs FrontPage2000 inside. It has been
working fine for a couple years.

Suddenly, when I made an inconsequential change to an unrelated string
constant and recompiled and ran it I got a "Run-time Error 430 Class
does not support automation or does not support expected interface."
[Snip]


I recently "Repaired" my XPSP2 Windows version using the Windows CD. I
subsequently got all the high priority updates from MS. I assume this
got me back to my up-to-date system. I've looked at the low priority
updates and didn't see any for Visual Studio or VB. There were some
for XP, but they didn't look relevant.

I was using FP2000 manually earlier in the day to re-make the target
site. Changes were mostly re-naming subwebs, and were done through
FP2000 Tools menu.
Click to expand...

As usual, this was hard to diagnose because of a CoC (confluence of
crap).

At one point I realized that other VB6 programs I have written also
failed.

Using MS Update to install all critical and all optional updates
solved this. It did not solve the original problem, however.
Re-installing Offfice2000 and FP2000 also did not help.

I narrowed the VB program's problem to a line involvng the creation of
the first child navigation node. I thought this might have something
to do with the default web file name. This recently changed from
default.htm at my old host to index.html at my new host. I had not run
the failing part of the VB program since changing hosts.

Updating my VB code to use index.html, manually deleting the relevant
subwebs with FP and recreating them with the VB program fixed the 430
Error.

Thanks to all for taking the time to read and reply to my request for
help.

Cheers,
DuncanC
 
Back
Top