473,671 Members | 2,601 Online
Bytes | Software Development & Data Engineering Community
+ Post

Home Posts Topics Members FAQ

VBA reference problem

Gox
Hi,
I got a problem with VBE6.DLL (VBA reference)
On my machine everything work well.(access 2k, vesion dll 6.0.84.35)
First machine NO PROBLEM (access 2003, vesion dll 6.4.99.72)
Second machine problem (access xp, vesion dll 6.4.99.69)

I used pivot query and function Format([FIELD_NAME], "mmm") for Column
Heading

This is error:
Error No. 3075 Function is not available in expression in query
expression 'Format([PERIOD],"mmm")'

Function Format is part of VBA reference, and I think this dll
(VBE6.DLL) is problem.

Similar problem I got with CDate function.

Any hint??
Mar 8 '06 #1
8 9154
Disable Sandbox mode:
http://support.microsoft.com/kb/239482/en-us

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"Gox" <go************ *@gmail.com> wrote in message
news:du******** **@ss405.t-com.hr...
Hi,
I got a problem with VBE6.DLL (VBA reference)
On my machine everything work well.(access 2k, vesion dll 6.0.84.35)
First machine NO PROBLEM (access 2003, vesion dll 6.4.99.72)
Second machine problem (access xp, vesion dll 6.4.99.69)

I used pivot query and function Format([FIELD_NAME], "mmm") for Column
Heading

This is error:
Error No. 3075 Function is not available in expression in query expression
'Format([PERIOD],"mmm")'

Function Format is part of VBA reference, and I think this dll (VBE6.DLL)
is problem.

Similar problem I got with CDate function.

Any hint??

Mar 8 '06 #2
Gox
Allen, thanks for reply.

How determine which SP for office I have?
Allen Browne wrote:
Disable Sandbox mode:
http://support.microsoft.com/kb/239482/en-us

Mar 8 '06 #3
Help | About lets you know your Office service pack.

To know your JET 4 service, pack, locate msjet40.dll (typically in
windows\system3 2), right-click and choose Properties. On the Version tab,
you should see:
4.0.8xxx.0
The xxx digits don't matter, but if you don't see at least the 8, you need
to download the JET 4 SP8 service pack from:
http://support.microsoft.com/kb/239114

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"Gox" <go************ *@gmail.com> wrote in message
news:du******** **@ss405.t-com.hr...
Allen, thanks for reply.

How determine which SP for office I have?
Allen Browne wrote:
Disable Sandbox mode:
http://support.microsoft.com/kb/239482/en-us

Mar 8 '06 #4
Gox
Allen Browne wrote:
Help | About lets you know your Office service pack.

To know your JET 4 service, pack, locate msjet40.dll (typically in
windows\system3 2), right-click and choose Properties. On the Version tab,
you should see:
4.0.8xxx.0
The xxx digits don't matter, but if you don't see at least the 8, you need
to download the JET 4 SP8 service pack from:
http://support.microsoft.com/kb/239114


My version is 4.0.8618.0 and others clients too.
Still I have not a solution of my problem.

Any others suggestions?
Mar 23 '06 #5
Let's try re-registering the VBA library.

On the machine that is playing up, open the Immediate Window (Ctrl+G), and
enter:
? References("VBA ").FullPath

It should return the path such as:
C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6 \VBE6.DLL

Close Access.
Open a command prompt.
Unregister the library. Use your actual path, but it will be something like
this:
regsvr32 /u "C:\Program Files\Common Files\Microsoft
Shared\VBA\VBA6 \VBE6.DLL"

Then re-register the library again:
regsvr32 "C:\Program Files\Common Files\Microsoft
Shared\VBA\VBA6 \VBE6.DLL"

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"Gox" <go************ *@gmail.com> wrote in message
news:dv******** **@ss405.t-com.hr...
Allen Browne wrote:
Help | About lets you know your Office service pack.

To know your JET 4 service, pack, locate msjet40.dll (typically in
windows\system3 2), right-click and choose Properties. On the Version tab,
you should see:
4.0.8xxx.0
The xxx digits don't matter, but if you don't see at least the 8, you
need to download the JET 4 SP8 service pack from:
http://support.microsoft.com/kb/239114


My version is 4.0.8618.0 and others clients too.
Still I have not a solution of my problem.

Any others suggestions?

Mar 23 '06 #6
Gox
Allen Browne wrote:
Let's try re-registering the VBA library.

Allen sorry, but no result. Same error, same problem.

And another problem with dynamic query.
First of all, I run my function queryIsExist(My QueryName) /true-false
and if query exist delete query and create new query with same name and
different sql statement.
If not exist then skip deleting query.

Function queryIsExist(My QueryName As String) As Boolean
'
' Determines if a Query is exist.
'
Dim db As DAO.Database, dcm As Document, dcms As Documents
Set db = CurrentDb
Set dcms = db.Containers!T ables.Documents

queryIsExist = False
For Each dcm In dcms
If dcm.Name = MyQueryName Then
queryIsExist = True
Exit Function ' Quit function once form has been found.
End If
Next
End Function

This is dynamic part:

If queryIsExist(My QueryName) Then
db.QueryDefs.De lete MyQueryName
End If
Set qdf = db.CreateQueryD ef(MyQueryName, strSQL)
Line: db.QueryDefs.De lete MyQueryName
don't work, because I got a error: 3012. Object <name> already exists.
on line below: Set qdf = db.CreateQueryD ef(MyQueryName, strSQL)

Trying to create a object, before deleting existing object.

This not work on XP machine, 2003 access.
Any hint?

Mar 24 '06 #7
Sorry, the symptoms don't make sense to me.

Perhaps someone else has a suggestion to contribute.

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"Gox" <go************ *@gmail.com> wrote in message
news:e0******** **@ss405.t-com.hr...
Allen Browne wrote:
Let's try re-registering the VBA library.

Allen sorry, but no result. Same error, same problem.

And another problem with dynamic query.
First of all, I run my function queryIsExist(My QueryName) /true-false
and if query exist delete query and create new query with same name and
different sql statement.
If not exist then skip deleting query.

Function queryIsExist(My QueryName As String) As Boolean
'
' Determines if a Query is exist.
'
Dim db As DAO.Database, dcm As Document, dcms As Documents
Set db = CurrentDb
Set dcms = db.Containers!T ables.Documents

queryIsExist = False
For Each dcm In dcms
If dcm.Name = MyQueryName Then
queryIsExist = True
Exit Function ' Quit function once form has been found.
End If
Next
End Function

This is dynamic part:

If queryIsExist(My QueryName) Then
db.QueryDefs.De lete MyQueryName
End If
Set qdf = db.CreateQueryD ef(MyQueryName, strSQL)
Line: db.QueryDefs.De lete MyQueryName
don't work, because I got a error: 3012. Object <name> already exists.
on line below: Set qdf = db.CreateQueryD ef(MyQueryName, strSQL)

Trying to create a object, before deleting existing object.

This not work on XP machine, 2003 access.
Any hint?

Mar 24 '06 #8
Gox schreef:
If queryIsExist(My QueryName) Then
db.QueryDefs.De lete MyQueryName
End If
Set qdf = db.CreateQueryD ef(MyQueryName, strSQL)
Line: db.QueryDefs.De lete MyQueryName
don't work, because I got a error: 3012. Object <name> already exists.
on line below: Set qdf = db.CreateQueryD ef(MyQueryName, strSQL)

Trying to create a object, before deleting existing object.

This not work on XP machine, 2003 access.
Any hint?


Try querydefs.refre sh before (re)creating the query.

--
Paul
Mar 24 '06 #9

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

2
10541
by: Pkpatel | last post by:
Hi, I keep getting this error every time I try to load crystalreportviewer on a webform with a dataset. Here is the error: -------------------------------------------------------- Server Error in '/Cr_Dataset' Application. ----------------------------------------------------------- ---------------------
6
5613
by: trexim | last post by:
Hi, I am trying to create a Web Reference for CSTA using the URL http://www.ecma-international.org/standards/ecma-348/csta-wsdl/csta-wsdl-all-operations.wsdl Visual .Net complains that: " The document was understood, but it could not be processed. - The WSDL document contains links that could not be resolved. - There was an error downloading
2
2578
by: Suzanne | last post by:
Hi all, I'm reposting this message as I'm experiencing this problem more and more frequently : I really hope someone out there can help me as I've been tearing my hair out on this one for a good while and I'm getting really frustrated now! My problem is this - my custom controls periodically disappear from my
2
3048
by: Jake Barnes | last post by:
Using javascript closures to create singletons to ensure the survival of a reference to an HTML block when removeChild() may remove the last reference to the block and thus destory the block is what I'm hoping to achieve. I've never before had to use Javascript closures, but now I do, so I'm making an effort to understand them. I've been giving this essay a re-read: http://jibbering.com/faq/faq_notes/closures.html
3
4397
by: Richard Lewis Haggard | last post by:
We are having a lot of trouble with problems relating to failures relating to 'The located assembly's manifest definition with name 'xxx' does not match the assembly reference" but none of us here really understand how this could be an issue. The assemblies that the system is complaining about are ones that we build here and we're not changing version numbers on anything. The errors come and go with no apparent rhyme or reason. We do not...
5
49807
by: Michael Russell | last post by:
Hi all, Using C#, I've created a simple wrapper class for using Excel. I have Office Pro 2003 installed on my devel machine. The wrapper class works great, reading and writing to/from Excel. To do this, I created a reference to "Microsoft Excel 11.0 Object Library", and have a "using Excel;" directive. I decided to add a method for creating a TextBox using the Shapes.AddTextBox method, which requires a
27
4208
by: David W | last post by:
I'm almost tearing my hair out. A colleague claimed that a null reference can exist, like this: void f( int& p ) { printf( "%d\n", p ); } int main (int argc, char *argv) {
8
2397
by: toton | last post by:
HI, One more small doubt from today's mail. I have certain function which returns a pointer (sometimes a const pointer from a const member function). And certain member function needs reference (or better a const reference). for eg, const PointRange* points = cc.points(ptAligned);
2
2839
by: toton | last post by:
Hi, This is continuation of topic pointer & reference doubt. http://groups.google.com/group/comp.lang.c++/browse_thread/thread/df84ce6b9af561f9/76304d7d77f6ccca?lnk=raot#76304d7d77f6ccca But I think it is better to have a new topic rather than continuing on old one. As now I am sure pointer to reference and reference to pointer are freely convertable, the potential danger lies in the first one. Pointer may be NULL, but reference should...
29
3643
by: shuisheng | last post by:
Dear All, The problem of choosing pointer or reference is always confusing me. Would you please give me some suggestion on it. I appreciate your kind help. For example, I'd like to convert a string to a integer number. bool Convert(const string& str, int* pData); bool Convert(const string& str, int& data);
0
8402
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can effortlessly switch the default language on Windows 10 without reinstalling. I'll walk you through it. First, let's disable language synchronization. With a Microsoft account, language settings sync across devices. To prevent any complications,...
1
8605
by: Hystou | last post by:
Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows Update option using the Control Panel or Settings app; it automatically checks for updates and installs any it finds, whether you like it or not. For most users, this new feature is actually very convenient. If you want to control the update process,...
0
8676
tracyyun
by: tracyyun | last post by:
Dear forum friends, With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each protocol has its own unique characteristics and advantages, but as a user who is planning to build a smart home system, I am a bit confused by the choice of these technologies. I'm particularly interested in Zigbee because I've heard it does some...
0
7445
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then launch it, all on its own.... Now, this would greatly impact the work of software developers. The idea...
1
6237
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules. He will explain when you may want to use classes instead of User Defined Types (UDT). For example, to manage the data in unbound forms. Adolph will...
0
5703
by: conductexam | last post by:
I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and then checking html paragraph one by one. At the time of converting from word file to html my equations which are in the word document file was convert into image. Globals.ThisAddIn.Application.ActiveDocument.Select();...
0
4416
by: adsilva | last post by:
A Windows Forms form does not have the event Unload, like VB6. What one acts like?
1
2819
by: 6302768590 | last post by:
Hai team i want code for transfer the data from one system to another through IP address by using C# our system has to for every 5mins then we have to update the data what the data is updated we have to send another system
2
2062
muto222
by: muto222 | last post by:
How can i add a mobile payment intergratation into php mysql website.

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.