Error As Variable Not Define

[mukeshsrivastav]

Dear sir,

I want to create a query at runtime and assigning value to them through a sql query.what is the error here. error is shown over variable qdf declaration

[B]
Dim QDF As QUERYDEF[/B]
'On Error Resume Next
DoCmd.DeleteObject acQuery, "databaseQuery"
'On Error GoTo 0
Set QDF = CurrentDb.CreateQueryDef("databaseQuery", ssqltext)
'
'Export it to Excel
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "databaseQuery", "C:\MyExcelData.xls"

'Export it to Text
'DoCmd.TransferText acExportDelim, , "databaseQuery", "C:\MyData.txt"

[ADezii]

Dear sir,

I want to create a query at runtime and assigning value to them through a sql query.what is the error here. error is shown over variable qdf declaration

Dim QDF As QUERYDEF
'On Error Resume Next
DoCmd.DeleteObj ect acQuery, "databaseQu ery"
'On Error GoTo 0
Set QDF = CurrentDb.Creat eQueryDef("data baseQuery", ssqltext)
'
'Export it to Excel
DoCmd.TransferS preadsheet acExport, acSpreadsheetTy peExcel9, "databaseQuery" , "C:\MyExcelData .xls"

'Export it to Text
'DoCmd.Transfer Text acExportDelim, , "databaseQuery" , "C:\MyData. txt"

This is the simplest Syntax for creating a Query. Your problem nust reside in the SQL Parameter, namely, ssqltext since the Error occurs on the SET QDF.. line. Please post it for our preview.

Dim MySQL As String, MyQDF As QueryDef, MyDB As DAO.Database

MySQL = "SELECT * FROM tblEmployee"

Set MyDB = CurrentDb()

Set MyQDF = MyDB.CreateQueryDef("Database Query", MySQL)

[MMcCarthy]

Where have you declared and set the value of the variable 'ssqltext'?

Mary

[mukeshsrivastav]

Where have you declared and set the value of the variable 'ssqltext'?

Mary

Thankx for ur response error has been detected it was dao connection library was not defined which has been defined my using tool menu -reference-dao3.6

Thankx and regards
mukesh