Any documentation on how to install this inet_weblist.zip ?

The excell webquery pdf only state how to use it from excell but did not say how to install or set it up.Thanks.

Can this be used on stand alone or network without the web?

Any other way or whats the best way to send data out of oi to excell?

You can use DDE. That is simple to set up and is documented in help.

William,

Unzip and from the System Monitor run RDKINSTALL.

Sean

After unzip and run rdkinstall, then what?

I thought rdkinstall only install things into oi itself.

Will it put the sample .iqy into the excell queries directory?Or there is no sample included?

Where will it put the inet_weblist to be reference with in the eg http://localhost/cgi_bin/oicgi.exe/int_weblist?

Can i reference it locally like c:\something\int_weblist ?

Can i install it locally without a web server?If not can i setup an intranet to make it work? Anywhere to get more info on this?

Sorry for asking something that might be simple to u but i am new in this web server area and still got a lot to learn.

Thanks.I will reference the help file on DDE but i still have some question and hope u will help me out here.

1)If i am not mistaken, the DDE require an edit line control in a form to setup the link to an excell file.Can it be done without the form and control?I actually would prefer to add an option on my menu for my user to select and my routine will just select the data and write it into the specified cell in the excell file without showing a window and control.

2)What about report, can a report be exported to excell?I know it can to pdf.

3)Another thing, for dde, must the excell file exist before i link it? Can it create a new one for me everytime? If can please provide detail or sample or point me to any documentation.

]

Yes. Must have control as - I understand - this is the conduit for passing the data

]

Well you could have a hidden form BUt much better to have form and display target path, progress etc with opportunity to go / cancel. In some of my implimentations I have a wizard that manages the process.

]

We are talking about DDE not OIPI

It is possible to create a new excell file or populate an existing one. The main purpose is to insert data into an existing spreadsheet, modify the data or extract specific data into an OI data file.

I think I am out of gas tonight. First look at the Help documentation and work out if this is what you want to do.

William

If you upgrade to OI 7.2, you can control Excel nicely using OLE.

For example, save a blank spreadsheet as c:\temp\test.xls then

Try the following code behind behind a button:

err=0

xl3dLine=-4101

vbRd= 255

xlSheetVisible= -1

xlApp=OleCreateInstance("excel.Application")

OlePutProperty(XlApp, 'Visible', xlSheetVisible)

GoSub Catch

xlWorkBooks =OleGetProperty(xlApp, "Workbooks")

GoSub Catch; If err then GoTo HadError

xlWkb=OleCallMethod(xlWorkbooks,"Open","c:\temp\test.xls")

GoSub Catch; If err then GoTo HadError

xlSht=OleGetProperty(xlWkb, "Worksheets",1)

GoSub Catch; If err then GoTo HadError

charts=OleGetProperty(xlSht, 'ChartObjects')

GoSub Catch; If err then GoTo HadError

* Add(Left As Double, Top As Double, Width As Double, Height As Double)

xlChartObject=OleCallMethod(Charts, 'Add', 100, 100, 400, 200)

GoSub Catch; If err then GoTo HadError

xlChart=OleGetProperty(xlChartObject, 'Chart')

OlePutProperty(xlChart, 'ChartType', xl3DLine )

GoSub Catch; If err then GoTo HadError

initrnd time()-3,3

for i=1 to 4

• Label

	range=OleGetProperty( xlSht, 'Range',"A":i)

	GoSub  Catch; If err then GoTo HadError

	OlePutProperty(range, 'Value', Rnd(100))

	GoSub  Catch; If err then GoTo HadError

• Value

	val=Rnd(100)

	range=OleGetProperty( xlSht, 'Range',"B":i)

	GoSub  Catch; If err then GoTo HadError

	OlePutProperty(range, 'Value', val)

	GoSub  Catch; If err then GoTo HadError

Next

range=OleGetProperty( xlSht, 'Range',"A1","B4")

GoSub Catch; If err then GoTo HadError

x=OleCallMethod(xlChart, 'SetSourceData', range)

GoSub Catch; If err then GoTo HadError

RETURN 0

hadError:

xlChart='

Charts='

range='

xlSht='

xlWkb='

xlWorkBooks='

x=OleCallMethod(xlApp, 'Quit')

return 0

catch:

err=OleStatus()

return

Thanks. Will try it out.

Thanks. I will do more research on dde.

View this thread on the Works forum...