Group:  Microsoft Access ยป microsoft.public.access.modulesdaovba.ado

DotNetBag
.NET Development Newsgroups

HTVi
TV Discussion Newsgroups

Our Hot Pick: Rising Antivirus 2006 - Certified by TUV & Checkmark! Get 10% discount by entering this coupon code: ONDISCOUNT10
Rising Antivirus 2006

Threads Replies Last Post
13 Pages: 1  2  3  4  5  6  7  8  9  10  11  12  13  
Issue with 'F8' Step tthrough after 2k conversion
If you have the "Use Access Special keys" (in Start up) unchecked in 97, you will not be able to step through code in 2k until you check this box, even though you could step through code in 97 without the box being checked. Thanks for the assistance Dave Patrick ...
2 14.08.2006 15:27:40
Access2k - Steping thru code (F8)
I have just converted several Access97 DB's. Now that they are converted I can no longer use the 'F8' to step through the code when I am in the visual basic window. I cannot seemed to figure out why...
2 13.08.2006 00:58:08
finding out if a table already has a record in it
I am writing a function that tests if a record has been created in a table; it is used before creating a record: Dim cvdb As Database Dim cvjoinrst As DAO.Recordset Dim cvjoinspec As String Dim mytest As Integer ' specify the database Set cvdb = currentdb() ' open the join table Set cvjoinrst = cvdb.OpenRecordset("joins_group_person") cvjoinspec = "[index_groups]=2 A...
2 11.08.2006 00:37:53
'Inherited' property reference ?
Hi all, I have the following code in a module "Sub exeProperties() Dim db As Database Dim tbl As TableDef Dim prp As Property Dim str As String Set db = CurrentDb Set tbl = db!Books str = "" For Each prp In tbl.Properties str = str & prp.Name str = str & " = " & prp.Value str = str & " (" & prp.Type & ") " str = str & prp.Inherited & vbCrLf Next prp MsgB...
3 08.08.2006 18:28:01
How To Extract MetaData From Word Docs, Excel, PPT, PDF Files, etc
Hi, Anyone have any code to extract MetaData from Word Docs, Excel files, Powerpoint files, PDF Files, etc? Thanks in advance....
2 08.08.2006 16:33:07
QueryDefs
Hi. I have an append query to call from within a vba module. I'm new to this so please excuse the basic nature of the question. The code I have looks like: sub AppendTemp() dim db as dao.Database Set db = DBEngine(0) (0) db.QueryDefs("appendQueryName").execute End Sub When I try to run this, I get "Run-Time error '3265' Item not found in this collection." The query is a ...
2 08.08.2006 13:27:47
Add Double Primary Key Using DAO
Hi, I'm looking to add a double field primary key using DAO - the same thing as highlighting 2 fields before clicking the PK button. The code I have is below, and it keeps erroring out when I try to append the second index to the TableDef. Please help! Thanks! '-----------------------Code Start--------------------------- Sub AppendKey() Dim db As DAO.Database Dim tdf ...
3 07.08.2006 21:30:01
How do I have user look up file address and...
add it into script to run sync? The script used to sync data requires fullname of file, including drive letter. Some users map the network folder to differing drive letters. I want to write a script to allow the user to browse to the location of the network data file and then drop the file name ("P:\networkfoldername\appname\data\data.mdb") into the script below to sync to the local...
2 07.08.2006 19:03:22
Retrieving data from a changing field using ADO
Hi, Subject is extremely vague, let me explain: Have a table with the following fields: ItemID (Pkey) Price1 Price2 .... Price 10 I have some code which is used to retrieve a specific price for a specific item. The price returned is dependent on user input. ie: The user will request "Price1", or "Price7" etc Is it possible in VBA to retrieve the requested field using code simila...
3 07.08.2006 12:15:02
Accessing Excel file in Access
Hi, I am unable to connect to an excel file stored on the c: drive of my computer in an access module using the CreateObject method. I have also tried ADODB connection however, in this case the recordset does not connect to the sheet1. Please advise. Thanks, Roger...
2 04.08.2006 01:41:59
Many tables to one table copying
I have an Access 2000 database that contains six tables. They all contain the same fields (Object, Name, Desc, CodeNo). I want to copy all the data from each table into one big table in another database file (mdb). Is that possible? Thanks, Mark ...
2 03.08.2006 17:14:39
run-time error '-2147467259 (80004005)': could not find file
Win2003, XP Pro, Access 2003 Creating an Access app for a client. Installed a prototype of 1st module on client's machine about two to three weeks ago. Every thing is fine. Was adding some additional functionality today and when I try to open the database I get the error that says it cannot find the file. Nothing has changed, same path, same file name. Happens on new code as well a...
4 03.08.2006 16:08:08
Filter Issue
Hey All, This one is weird. I have a disconnected ADO recordset. I can filter on the first column no problem. gRSet.Filter = "ID= '" & UCase(txt1.Value) & "'" But if I change it to this I get an error saying Arguments are of the wrong type...etc. gRSet.Filter = "DOOR STYLE = '" & UCase(txt2.Value) & "'" Both underlying values are of string type and my arguments are of string type. ...
2 03.08.2006 15:43:01
Problem with DAO (Import from Excel to Access)! :(
Hi, I am novice and I have problem. I need import some data with Excel file to Access. Problem introduces as follows: In Excel(first sheet) i have data: "TYTUL" - column "A" "NAZWISKO" - column "B" "IMIE" - column "C" "PRZEDMIOT" - column "D". Excel file name is AND.xls In Access i have table - AS_PRZEDMIOT. Table "AS_PRZEDMIOT" contains fields: ID_PRZEDMIOT (Auto), P_AKTYWNY (Numb...
2 03.08.2006 08:13:42
Use variable in sql
If I use the code below, records are deleted from my table if I replace tblModel with the name of a real table. However, I need to use a table variable instead. I've set it with tblModel, which gives the correct table name, but it doesn't work within my RunSQL. Any ideas how I can use a table variable? Thanks much. Private Sub Command4_Click tblModel = "Export" & [Forms]![Exp...
3 31.07.2006 11:32:29
Clear Database and Reset the AutoNumber
Good Morning Everyone, I'm making a database and I'm playing with it using test data. When I want to put the actual data in, how do I reset the autonumber back to 1? How do I tell the database to completely delete the fake records so the autonumber doesn't start at, o, 50? Thanks! Jillian ...
3 31.07.2006 10:25:04
insert record in foxpro table
hi I always use DAO e don't konw well other methods like ADO. This is the code I wrote: table 'tblFOXPRO' connect by odbc Dim DS As DAO.Recordset Set DS = CurrentDb.OpenRecordset("SELECT tblFOxPRO* FROM tblFOxPRO";") With DS .AddNew !ID = 1 !CAMPO1 = A !CAMPO2 = B .Update End With This is the error I read: ERRORE RUN-TIME 3146 ODBC: C...
3 31.07.2006 10:02:38
add record to foxpro free table with ADO
Hi, I'm trying to add new record to a foxpro free table connect to the database by odbc. After all tests with DAO (the method don't accept '.update ') I tried with this that I found on this site but always I get : Run-time error '-2147217900 (80040e14)' the code is (the ole db driver has been installed): Dim cnn As ADODB.Connection Dim cmd As ADODB.Command Dim fox As ADODB.Rec...
3 31.07.2006 08:03:01
Inherited module - to exclude bank holidays
Hi All Please forgive cross-posting, also posted in 'microsoft.public.access.modulescoding'. I have 'inherited' a part complete Access 2000 database which has in it the module shown below. The idea is, I think, to take a number of days and a start date then give the finish date excluding weekends and bank holidays. The problem is that while it is excluding weekends it does not appear ...
2 29.07.2006 13:00:14
Command button problem
i have the following code: Private Sub Payments_Click() Dim stDocName As String Dim stLinkCriteria As String stDocName = "Payments" stLinkCriteria = "[EnrollmentID]=" & Me![EnrollmentID] DoCmd.OpenForm stDocName, , , stLinkCriteria The button, called Payments, exists on a form called Enrollment and once clicked opens a form (payments) that show all payments...
1 28.07.2006 20:31:01
Command buttons in forms
I have used an Access database for 6 years to collect and manage faculty data and just recently my data entry forms have started malfunctioning--Command buttons for adding records, searching records, etc. now give the following error message: "The expression On Click you entered as the event property setting produced the following error: Object or class does not support the set of event...
1 28.07.2006 17:04:02
How to automatically update text boxes (NEED IMMEDIATE HELP!!)
I have three text boxes. When a user manually inputs data in one text box, I want the other two boxes updated automatically. In other words, everytime Textbox 1 is updated, Textbox 2 and Textbox 3 automatically are updated. For example, TextBox 1 Textbox 2 (automatically fills in 100 x .5) ..5 is a rate User enters 100 ...
2 27.07.2006 19:35:52
DoEvents and SendKeys
I am running a utiltity (CutePDF) that allows me to output my report as a PDF. Works great ... most of the time. When the dialog comes up, the user must insert the report name and CutePDF saves it as a PDF file. Love it. Here's the problem: I have a SendKeys that fills in the name of the report and this works 90% of the time. The problem is I need to slow things down so that the wh...
6 27.07.2006 18:31:50
deleting files based on a list
I want to delete files from a list that i have in ms access database how can i do that? i have a list of files that have to bo deleted,all files are in same folder. thx rene deleting files based on a list ...
2 24.07.2006 13:32:36
Help with This Code
Hi, I am traying to build a criteria string from a table that contain selected ID (eg [ID]=1 or [ID]= 58 or [ID] =74 and so on). I have code below that seem never work Dim Stg As String Dim dbs As DAO.Database Dim rst As DAO.Recordset Dim I As Long Set dbs = CurrentDb Set rst = dbs.OpenRecordset("tmpSelected", dbOpenDynaset) With rst Do While Not .EOF Stg = "[ID...
3 21.07.2006 04:54:08
13 Pages: 1  2  3  4  5  6  7  8  9  10  11  12  13  

Home | Search | Terms | Imprint | Contact
Newsgroups Reader - provided by WiredBox.Net