Problem is the OS under QBasic is NOT DOS. And windows may behave differently than the original did. I would try tracing it, either by placing STOP at places to see if you get there, or I thinkg theres a QBasic debugger... But there is NOT a compile. To compile, you need QuickBasic (up to 4.5)...
Examine the tables & query below. The query can be used in a form and is completely updatable except for the Paid field.
---
Table: Companies
Company (Text)
Paid (Yes/No)
Table: Invoices
InvID (Autonumber - Primary Key)
Company (Text)
Amt (Currancy)
Query:
SELECT Invoices.InvID...
The folloging is placed on the GotFocus Event of a Combo Named SubClass. Is simply changes its own Rowsource based on the value of another Combo Box named Class. The table Fassets is the table attached to the form, and the values are a limited set coming from the same table.
---
Private Sub...
The email you refer to IS an attachment. Unfortunately Access does nt have an easy to send out external files as objects (that I know of, I should say). But you can accomplish this by using MAPI. Remember, Access VBA is Visual Basic with all (almost) the abilities including using external...
Assuming you have 2 completely independent forms, you can reference the forms by their names Forms!FirstForm and Forms!SecondForm. This can be done inside the other form or inside independent code. No need to use 'Me'. Me is used for the current item only. For example Me.Name is the name of the...
Shamefully, I just glanced over the 'answers' given you. But I think the problem is 2 fold.
1. Dates need to be done like this [SomeDate] > #02/19/2001# with the Date inside #'s.
2. Quotes inside quotes must be "" for a single " or """ for a single " and...
My I suggest 2 possible solutions.
1. When you establish the LINK, there is an option to save your user & password for ODBC sources. That MAY work. Some sources (ODBC Drivers) will still require a User/PW.
2. Connect to your Table using VBA. Means you don't even need the Link. But this...
With that type of growth, I think you are deleting & inserting into the smaller tables more frequently than expected. It the small tables are just temporary tables, try creating 2 Access Databases, one w/ the perminant files & the other w/ the ever changing, temporary files. Then, simply compact...
You can 'seed' an autonumber field by writting a query that Adds one record and sets the value.
Example:
Table: MyTable
Fields: ID Autonumber (Primary key)
Name Text
Do the following Query:
INSERT INTO MyTable ( ID ) SELECT 12 AS NStart;
---
NStart is just the name I gave the 12...
Considering the name of the thread, I assume you want to do good old QBasic or (PC Basic) or whatever other name it goes under these days. If so, try looking for a 6-10 year old product called QuickBasic. It compiles! Probably can be had at some 2nd hand software shop for $20 US. FYI, QBasic is...
I know of 2 problems w/ a Debug Window:
Focus & timing.
Focus:
If you have a DW open, the form looses focus. Some system objects like Screen.ActiveForm change. This can cause unexpected odd results. Also, stepping thru, you trigger GotFocus events multiple times.
Timing:
Events happen...
You are right. As is it does have problems...
I didn't bother to place the DIM statement &
I didn't bother to insert a statement skipping system tables.
Cut the following code & try it...
Your tables WILL vanish!
---
Sub Test()
Dim tbl As TableDef
For Each tbl In CurrentDb.TableDefs
If...
In the following, tbl.name is the name of the table. Use it to decide if you really want to delete the table.
As is, this will delete ALL the tables. Quick & deadly!
for each tbl in currentdb.TableDefs
DoCmd.DeleteObject acTable,tbl.name
next
7ony
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.