Error 430 sudenly in VB program

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
 
S

Steve Easton

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?
 
D

David Berry

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?
 
B

BioColor

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
 
S

Stefan B Rusynko

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
|
|
 
B

BioColor

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
 
S

Stefan B Rusynko

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
 
B

BioColor

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.

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
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top