How to export the notesdata to already existed excel file

HCL Domino Domino Forum
1

how to export the notes data to already excel file.first i need to check if that file is existed or not for that i did like this Dim stream As NotesStream

Dim pathName As String, fileName As String

filenum=Freefile()

pathName$ = "c:\temp\*.*"

fileName$ = Dir$(pathName$, 0)

and then open the file like this

If Not stream.Open(filename) Then

	'Msgbox "this file" & filename & "not opened"

	Open fileName$ As filenum

but I got this error “unable to open the file” error and no resume error

I have checked like this also

Do While fileName$ <> “”

	If  fileName$=exporttoexcel.xls Then

		'if Isexist fileName$ then

		

		

		Open fileName$ As filenum

		'Excel code here

		

	End If

fileName$ = Dir$()

Loop

can any one help in this

with hope

thanks

2

Subject: how to export the notesdata to already existed excel file

Start with this search, maybe modify it a bit, maybe look in the 4/5 forum also using a similar set of searches - you should find something helpful.

http://www-10.lotus.com/ldd/nd6forum.nsf/Search?SearchView&Query=append%20and%20existing%20and%20file&SearchOrder=0&Start=1&Count=100

Doug