Error 1310. Error writing to file: Policy.12.0.Microsoft.Office.Interop.Access.Dao.dll. Verify that you havce access to that directory Error 1712. One or more of the files required to restored your computer to its previous state could not be found. Restoration will not be possible.

The error is referring to rights. If you are the owner of the PC you should always be an Administrator. Verify in Users under Control Panel.

The program could have installed under another user or without admin rights.

However most likely it just the folder. You can right click to check, but re-installing software might take care of and be the easiest fix.

read this: http://support.microsoft.com/kb/296175

the issue is caused by a Microsoft Jet update. in c:\icwin310\backup directory you will find the files needed by icverify. Make a backup of the following files in c:\windows\system32 msjet35.dll
msjint35.dll
msjter35.dll
msrd2x35.dll
msxbse35.dll
msexcl35.dll
msltus35.dll
vbajet32.dll
vbar332.dll

Copy the files listed from the c:\icwin310\backup directory to c:\windows\system32 and your error should be no more.

Rename and Reinstall the Vbe6.dll File

NOTE: You need your Office CD-ROM to complete this task.

1. Quit all currently open programs.
2. Start an MS-DOS prompt in a window by doing one of the following:
   • Microsoft Windows 95 or Windows 98: Click Start, point to Programs, and then click MS-DOS Prompt.
   • Microsoft Windows Millennium Edition (Me): Click Start, point to Programs, point to Accessories, and then click MS-DOS Prompt.
   • Microsoft Windows NT 4.0: Click Start, point to Programs, and then click Command Prompt.
   • Microsoft Windows 2000 or Microsoft Windows XP: Click Start, point to Programs, point to Accessories, and then click Command Prompt.
3. To change the directory to the location of the Vbe6.dll file, type one of the following (including the quotation marks), and then press ENTER: CD "C:\Program Files\Common Files\Microsoft Shared\Vba\Vba6"-or- CD progra~1\Common~1\Micros~1\Vba\Vba6NOTE: This is the default directory for the Vbe6.dll file. If you installed Microsoft Office into another drive or directory, you must type its path.
4. To unregister the Vbe6.dll file, type the following.
   
   In Windows 95, Windows 98, or Windows Me, type: C:\Windows\System\REGSVR32 /U VBE6.DLLIn Windows NT 4.0, Windows 2000, or Windows XP, type: REGSVR32 /U VBE6.DLL-or- C:\Winnt\System32\REGSVR32 /U VBE6.DLLNOTE: This is the default directory for the Windows System directory. If you installed Windows into another directory, you must type its path.
5. In the MS-DOS prompt window, rename Vbe.dll to Vbe.old by typing the following and then pressing ENTER: rename vbe6.dll vbe6.old
6. Quit the MS-DOS prompt window. To do this, do one of the following:
   • Type Exit at the command prompt, and then press ENTER. -or-
     
     
   • Click Close (the X in the upper-right corner of the window).
7. Start Microsoft Word.
8. On the Tools menu, point to Macro, and then click Macros.
   
   The Windows Installer detects that the Vbe6.dll file is missing on the system, installs the file from the Office CD, and registers it again.

You're missing the MicroSoft Office INTernationaLization library. Either uninstall/reinstall Office, or try a Repair installation, or try exiting Office (and OSA Toolbar also), and download this file

http://www.dlldump.com/download-dll-files_new.php/dllfiles/M/MSOINTL.DLL/11.0.5516/download.html

to put it into C:\WINDOWS\SYSTEM directory. See if it helps. Some more files might be missing and you'll only discover that after msointl.dll loads and complains in turn.

cause : This issue can occur when DAO dynamic-link library (DLL) files are mismatched or when there are incorrect registry entries. This issue can also occur when there is a missing DAO design-time licensing key. This key is required by Microsoft Excel, but is not required by applications created with Visual Basic

Method 1 loadTOCNode(2, 'resolution');

1. Click Start, and then click Run.
2. In the Open box, type regsvr.exe.
3. Re-register DAO350.dll.
   
   NOTE: You can obtain a copy of DAO350.dll at the following FTP address: ftp://ftp.microsoft.com/softlib/mslfiles/ To register DAO350.dll, follow these steps:
   
   
   1. Click Start, and then click Run.
   2. In the Open box, type Regsvr32.exe C:\progra~1\common~1\micros~1\dao\dao350.dll
   3. Click OK.
4. Click Start, point to Settings, and then click Control Panel.
5. Click Add/Remove Programs.
6. Insert your Microsoft Office 97 CD, and then click Uninstall.
7. Delete the DAO folder from the hard drive.
8. Click Start, point to Settings, and then click Control Panel.
9. Click Add/Remove Programs.
10. Insert your Office 97 CD, and then click Install.
11. Repeat steps 4 through 6 to uninstall Office 97.
12. Click Start, and then click Run.
13. In the Open box, type eraser97.exe. (This file is also available at ftp://ftp.microsoft.com/softlib/mslfiles/.)
14. Repeat steps 4 through 6.
15. Repeat steps 8 through 10 to reinstall Office 97.

Please Rate Solution!

Hi,

http://support.microsoft.com/kb/933347

Here is what you need. Just click the Link Above. Please Rate My Response! Thanks! 
PREM

no problem...

se HERE...

folow the instructions, and you will be ok :)

When i first figured out how to pull data from SQL and put the results in an excel file i referenced these two articles....
Reading and writing excel file using VB.NET (http://www.codeproject.com/KB/vb/Work_with_Excel__VBNET_.aspx)
Get the Values From DataBase and Stored into excell Sheet (http://www.codeproject.com/KB/vb/Getvaluesfromdatabase.aspx)

This is the code i ended up using.... (check out those links to see how you need to import the ms office excel reference file with visual basic)

Const stcon As String = "Provider=SQLNCLI;server=xxxxx;database=xxxxx;uid=xxxxx;pwd=xxxxx;DataTypeCompatibility=80"
Dim stSQL As String = "select * from scs_rate_class_money where irate_book = 124 and snew_used = 'U' and sclass = '2' and splan = 'T4' and sopt_code = 'F1'"
Dim cnt As New ADODB.Connection
Dim rst As New ADODB.Recordset
Dim fld As ADODB.Field
'Open the connection.
cnt.Open(stcon)

'Open the recordset.
With rst
.CursorLocation = ADODB.CursorLocationEnum.adUseClient
.Open(stSQL, cnt, ADODB.CursorTypeEnum.adOpenForwardOnly, _
ADODB.LockTypeEnum.adLockReadOnly , _
ADODB.CommandTypeEnum.adCmdText)
.ActiveConnection = Nothing 'Disconnect the Recordset.
End With
'Close the connection
cnt.Close ()
Dim exp As Export = New Export()
Dim xlApp As New Microsoft.Office.Interop.Excel.Application
Dim xlWBook As Microsoft.Office.Interop.Excel.Workbook = xlApp.Workbooks.Add(Microsoft.Office.Interop.Excel.XlWBATemplate.xlWBATWorksheet )
Dim xlWSheet As Microsoft.Office.Interop.Excel.Worksheet = CType(xlWBook.Worksheets(1), Microsoft.Office.Interop.Excel.Worksheet)
Dim xlRange As Microsoft.Office.Interop.Excel.Range = CType(xlWSheet, Microsoft.Office.Interop.Excel.Worksheet).Range("A2")
Dim xlCalc As Microsoft.Office.Interop.Excel.XlCalculation
Dim i As Short

'Turn off Excel's calculation.
With xlApp
xlCalc = .Calculation
.Calculation = Microsoft.Office.Interop.Excel.XlCalculation.xlCalculationManual
End With
'Write the fieldnames.
For Each fld In rst.Fields
xlRange.Offset(0, i).Value = fld.Name
i = i + 1
Next
'Populate the range.
xlRange.Offset(1, 0).CopyFromRecordset(rst)
'Close the recordset.
rst.Close()
'Make Excel available to the user.
With xlApp
.Visible = True
.UserControl = True
'Restore the calculation mode.
.Calculation = xlCalc
End With
'Release variables from memory.
fld = Nothing
rst = Nothing
cnt = Nothing
xlRange = Nothing
xlWSheet = Nothing
xlWBook = Nothing
xlApp = Nothing