We have an Outlook form that once completed as well as sending the email message inserts certain data from feilds in the form into an excel workbook.
The form was written while we were on a NT4 platform running Office 97.
Now the users have been moved to Citrix network, Win2000 server running Office 2000, the form still sends the email but does not update the file. No file or directory names were changed in the change of platform, and those few of us still on NT/Office 97 can still have the form work.
Are there any known problems that would cause this problem?
I have included the code incase an error can be spotted there, but as I say it has been working fine.
Any assitance (even ideas on where to start looking) wiil be much appreciated
Andrew M
Dim myXl
Dim myWb
Dim myWs
Dim myCtrls
Sub Item_Send
Set myCtrls = Item.GetInspector.ModifiedFormPages(“Message”).Controls
Set myXl = Application.CreateObject(“Excel.Application”)
Set myWb = myXl.Workbooks.Open (“g:DBdataUnderwriting Review.xls”)
Set myWs = myWb.ActiveSheet
myWs.Unprotect
startRow = myWs.Cells.SpecialCells(11).Row + 1
myWs.Cells(startRow, 1) = myCtrls(“ClaimNumber”).Value
myWs.Cells(startRow, 2) = myCtrls(“PolicyNumber”).Value
myWs.Cells(startRow, 3) = myCtrls(“ClientName”).Value
myWs.Cells(startRow, 4) = myCtrls(“PolicyType”).Value
myWs.Cells(startRow, 5) = myCtrls(“Happening”).Value
myWs.Protect
myWb.Save
myWb.Close
myXl.Quit
Set myWs = Nothing
Set myWb = Nothing
Set myXl = Nothing
Set myCtrls = Nothing
End Sub
