What's wrong with this?

[drvortex]

Sub saveweb()
'
' saveweb Macro
' Macro recorded 10/31/2004 by NORENJ
'

'
Dim strFname As String
strFname = InputBox("Enter Filename:")
ActiveWorkbook.PublishObjects.Add(xlSourceSheet, _
"C:\Documents and Settings\Drvortex\Desktop\" & strFname
".html", "Jan04_Charts", "" _
, xlHtmlStatic, "2004_ChartsA_4129", "Jan04_Charts").Publis
(True)
End Sub

I identified strFname through the Inputbox...but I'm getting an erro
when entered into the next class. How do I reference the strFname i
the following class