Search results for query: *

...If rtItem.Type = RICHTEXT Then 'Create the notes object as the attchment Set NotesObject = rtItem.GetEmbeddedObject("*.xls") 'Loop through the objects detatching them as it loops through For Each NotesObject In rtItem.EmbeddedObjects...

Hi, I am a real Newbie to developing with Notes an would really love someones help. I have been doing some VBA script in Access to access a Notes Mail Databaseloop through them and check to see if they have an attachments and then detatch them. I have got as far as to open the database, loop...

Automated Detacthments From Notes via VBA Hi, I am a real Newbie to developing with Notes an would really love someones help. I have been doing some VBA script in Access to access a Notes Mail Databaseloop through them and check to see if they have an attachments and then detatch them. I...

Hi, thanks for the advice I managed to solve the problem with the following two lines of code... Set doc = vw.GetDocumentByKey(strNotesID) doc.Remove (True) Cheers, Hayden

...Dim SQL As String 'Clear out temporary table of items to be deleted DoCmd.SetWarnings False DoCmd.RunSQL "Delete tbl_Notes_Published_Remove.* FROM tbl_Notes_Published_Remove;" DoCmd.SetWarnings True Dim cnnAccess As ADODB.Connection Set cnnAccess = Application.CurrentProject.Connection...

...Dim SQL As String 'Clear out temporary table of items to be deleted DoCmd.SetWarnings False DoCmd.RunSQL "Delete tbl_Notes_Published_Remove.* FROM tbl_Notes_Published_Remove;" DoCmd.SetWarnings True Dim cnnAccess As ADODB.Connection Set cnnAccess = Application.CurrentProject.Connection...

...a valid file!", , conAppName Exit Sub End If 'CLEAR PREVIOUS DATA FROM TEMPORARY IMPORT TABLES DoCmd.RunSQL "DELETE tbl_Temp_Import_EAN_Header.* FROM tbl_Temp_Import_EAN_Header;" DoCmd.RunSQL "DELETE tbl_Temp_Import_EAN_Parts.* FROM tbl_Temp_Import_EAN_Parts;" 'CREATE DATABASE AND...

Thanx soooooo much, you are a God!!!! cheers, Hayden

...fix it. Many Thanks Hayden Public Sub Export_Reports() On Error GoTo errConfig 'DELETE OLD DATA DoCmd.RunSQL "DELETE tbl_Cost_Per_Car.* FROM tbl_Cost_Per_Car;" DoCmd.RunSQL "DELETE tbl_Cost_Per_Country.* FROM tbl_Cost_Per_Country;" DoCmd.RunSQL "DELETE...

...fix it. Many Thanks Hayden Public Sub Export_Reports() On Error GoTo errConfig 'DELETE OLD DATA DoCmd.RunSQL "DELETE tbl_Cost_Per_Car.* FROM tbl_Cost_Per_Car;" DoCmd.RunSQL "DELETE tbl_Cost_Per_Country.* FROM tbl_Cost_Per_Country;" DoCmd.RunSQL "DELETE...

Hi, I have written some code that takes a template spreadsheet, populates it with required data and then automatically emails it to the Supplier. The problem I have is that if the user has another excel spreadsheet open it always uses this as the template and not the file. What I would like...

Hi, I have a database that exports a recordset into a spreadsheet and I need to lock the cells that I have copied the recordset into. I can lock the cells but I don't know how I select the range of the copied recordset to lock the cells. The number of records that is pasted into the...

Hi, I have written some code that opend up a template spreadsheet file and then sends data to the spreadsheet for every consignment within a recordset. I intend to send this spreadsheet/advice note out to the relevant suppliers (This has not been added to the code example below) for them to...

Thanks Cheerio, that worked great Hayden

Hi, I have some code written that creates an excel application, formats the page and copies in a recordset from my db which works fine. But now I want to add additional recordset at the bottom of the spreadsheet but I do not know how to do the xlDown function in Access VBA. As the recorsets I...

Hi, I am trying to create a new routine that creates a new excel workbook and then copies three tables into three different worksheets in the same workbook. The only problem is that I cannot change to other worksheets. I have created the code to open and create the workbook and copy the data...

Hi, i am trying to set up some rules for incoming mails on my lotus notes (Release 5.08) but I cannot find the Rules Folder that the Notes Help describes. I am using a company specific template for Notes which has changes some of the options, views and menus. Does anybody have any idea how I...

Hi, i am trying to set up some rules for incoming mails on my lotus notes (Release 5.08) but I cannot find the Rules Folder that the Notes Help describes. I am using a company specific template for Notes which has changes some of the options, views and menus. Does anybody have any idea how I...

Hi, I have some code that creates emails with attachments via lotus notes but I cannot get it to confirm a delivery reciept. does anybody have any help on how I can get this to work? Here is the code i am using... Public Sub SendNotesMail(Subject As String, Attachment As String, Recipient...

Hi, thanks for the code, but it is giving me a compile error "Method or data member not found" on the .CreateField("Item") part. Is there anyththing I can change in the references. Many Thanks, Hayden