Thanks PHV... Sorry that is took so long to get back to you... I had an emergancy and have been out of town for awhile... I am going to try this now.
Darkhat01
I am having a problem with setting the Data Source when it is set to CurrentDB. If I set the path to c:\test\mydatabase.mdb it works fine. Why will this not work, does anyone have an idea?
Set objConnection = CreateObject("ADODB.Connection")
Set objRecordSet =...
I need to have a Select Query show up in a textbox and return everything back in the text box from the query. I tried to put the select Query in the Control Source of the textbox, but this did not work.
Here is the Query
SELECT qManagerQuery.Q8
FROM qManagerQuery;
Q8 is a memo field; it will...
That helped alot by doing a DCount for everything, but what would I do if I only wanted to count it if Q1 equals 1?
Works if I want to count everything.
=DCount("Manager","qEnterpriseQuery")
I tried =DSum(Abs("Q1","qEnterpriseQuery")) and I Get a error that tells me "The expression you...
How do I make a call to another query to do a Sum of all the Q1's that equals 1? Currently the Record source for the report is one query qManagers and this gives me 90% of the data that I need and I also need results from another query called qEnterpriseQuery.
Here is what I was thinking, but...
I am trying to do percentages on my report in the expression builder, here is what I did:
=Round((([text67]/[text60])*100),0) & "%"
It does work, but does not look pretty. Is there a better way to do percentages?
Thanks,
Darkhat01
One more question, say I did a
Set objConnection = CreatObject("ADODB.Connection")
If I wanted to open a database in an other location to store it in objConnection I would do a:
objConnection.Open _
"Provider = Microsoft.Jet.OLEDB.4.0; " & _
"Data Source = c:\test.mdb"
But...
Geoff,
Can you explain to me how the ADODB.Connection works. I really don't understand it.
What is the difference between: New ADODB.Connection
and CreatObject("ADODB.Connection") don't they both create new objects?
thanks,
Darkhat
Sorry the new code is:
Private Sub ImportData_Click()
Dim intID As Integer 'ID from manager record
Dim dbFile As String 'Location of our Access database file
Dim sSQL As String 'Our SQL query
Dim db_Data As ADODB.Connection
dbFile = Me!txtFileLocation
intID = Me!ID
MsgBox "The ID being...
I made the changes that both of you suggested. But I am getting an error that still highlights New Connection. I also Made the DIM change.
Why would this be....
Maybe I should use a FileSystemObject... Any ideas on this? Does anyone know of a tutorial for using FileSystemObject and doing...
I am getting a Run-Time Error '13': Type Mismatch. The Set db_data = NewConnection is what is highlighted in yellow. Would anyone know why this is happening? I got the code from: http://www.tek-tips.com/faqs.cfm?fid=5250 I am trying to learn how to import a csv file into a access table...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.