Error Con Word 2
Publicado por Dario (321 intervenciones) el 24/04/2009 20:36:27
A pedido de Plinio al tener mas informacion y al repetirse el error reitero mi pregunta.
Tengo el siguiente codigo de ejecuto desde la barra de menu de una aplicacion.
local oForm
oForm = Createobject("form1")
DEFINE CLASS form1 AS form
Height = 250
Width = 375
ShowWindow = 2
AutoCenter = .T.
BorderStyle = 2
Caption = ""
MaxButton = .F.
Name = "Form1"
proc init
loWord = CREATEOBJECT("Word.Application")
loDocument = loWord.Documents.Add()
loWord.height=300
loword.left=5
loword.top=2
loword.width=400
loword.visible=.t.
loword.windowstate=0
loword.activate
release oform
endproc
enddefine
De manera aleatoria da el siguiente error
Error 1429
Codigo de excepcion Ole Idispacht 0 Microsoft Word - "La ventana esta maximizada"
espero puedan guiarme gracias...
Tengo el siguiente codigo de ejecuto desde la barra de menu de una aplicacion.
local oForm
oForm = Createobject("form1")
DEFINE CLASS form1 AS form
Height = 250
Width = 375
ShowWindow = 2
AutoCenter = .T.
BorderStyle = 2
Caption = ""
MaxButton = .F.
Name = "Form1"
proc init
loWord = CREATEOBJECT("Word.Application")
loDocument = loWord.Documents.Add()
loWord.height=300
loword.left=5
loword.top=2
loword.width=400
loword.visible=.t.
loword.windowstate=0
loword.activate
release oform
endproc
enddefine
De manera aleatoria da el siguiente error
Error 1429
Codigo de excepcion Ole Idispacht 0 Microsoft Word - "La ventana esta maximizada"
espero puedan guiarme gracias...
Valora esta pregunta
0