Printing--Think I'm Using The Wrong Code

[flame_211]

I Am having trouble with this code:

Dim Response, xpos
If Text1 = "" Then
MsgBox "You Need To Have A Recipe In The Text Box."
Else
Response = MsgBox("Are You Sure You Wanna Print?", vbYesNo, "Print...")
If Response = vbYes Then
Timer1.Enabled = True
xpos = 10
Printer.ScaleLeft = xpos
Printer.Print Text1
cancelprint.Enabled = True
End If
End If

Can Anyone see anything wrong with the code, i try
to print and then the printer keeps reading spooling.
And when i press stop on the play stop thing at the top, it starts printing.

any help will be greatly appreciated,

Flame

[Edited by flame_211 on 10-09-2000 at 10:23 PM]