Hi Again i have tried the above solution but now i get the error message-- "Object doesn't not support this property or method." This is the bit of script i have:-
Dim Buso As busobj.Application
Dim DP As busobj.DataProvider
Dim HT As busobj.Report
Dim HP As busobj.Document
Dim I As Integer
Application.Interactive = False
Application.DisplayAlerts = False
Set Buso = CreateObject("BusinessObjects.Application"

Buso.Interactive = True
Buso.Visible = True
AppActivate "BusinessObjects"
DefVal1 = InputBox("start Date"
Buso.Documents.Open ("C:\Accruals\BOMO085_INV1.rep"

Buso.ActiveDocument.Variables("1.Start Date"

.Value=DefVal1
Buso.ActiveDocument.Refresh
Is it me or am i being an bit stupid and cann't see the wood for the code?
Cheers to anyone
Funkmaster