Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Excel times out
Message
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Title:
Environment versions
Visual FoxPro:
VFP 9
OS:
Windows XP
Network:
Windows 2000 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
00975101
Message ID:
00975133
Views:
15
I solved my problem. In terminal services I see all printer sessions and I had set teh correct peinter but the wrong session as default printer. Once I changed that all problems are gone (at least as thay pertain to this issue <s>)
Thanks all

Peter


>This might be unorthodox but it seems to work this way (The orientation is required to be set outside of the WITH/ENDWITH.
>
Public oSheet
>oExcel=Createobject("excel.application")
>oExcel.DisplayAlerts=.F.
>Set Step On
>oWorkBook=oExcel.workbooks.Add()
>oSheet=oWorkBook.Worksheets(1)
>oSheet.PageSetup.Orientation= 1
>With oSheet.PageSetup
>	.FitToPagesTall=1
>	.FitToPagesWide=1
>	.CenterHorizontally=.T.
>	.CenterVertically=.F.
>	.TopMargin=1*72
>	.LeftMargin=.75*72
>	.RightMargin=.5*72
>	.RightHeader="Page &P of &N"
>	.LeftHeader="&F"
>	.RightFooter="Printed on &D"
>	.FooterMargin=.5*72
>	.HeaderMargin=.5*72
>Endwith
>
>>the following code stops:
>>
>>oExcel=CREATEOBJECT("excel.application")
>>oExcel.DisplayAlerts=.F.
>>oWorkBook=oExcel.workbooks.ADD()
>>oSheet=oWorkBook.Worksheets(1)
>>WITH oSheet.PageSetup
>>.Orientation=1      <----------------------------HERE !!!!!!!!
>>.FitToPagesTall=1
>>.FitToPagesWide=1
>>.CenterHorizontally=.T.
>>.CenterVertically=.F.
>>.TopMargin=1*72
>>.LeftMargin=.75*72
>>.RightMargin=.5*72
>>.RightHeader="Page &P of &N"
>>.LeftHeader="&F"
>>.RightFooter="Printed on &D"
>>.FooterMargin=.5*72
>>.HeaderMargin=.5*72
>>
>>
>>ENDWITH
>>
>>I assume it times out somehow( running on Terminal Server 2000 )
>>Can I change the timout when talking to EXCEL?
>>
>>Peter
Peter Cortiel
Previous
Reply
Map
View

Click here to load this message in the networking platform