I have the following code in a cmd button. I want the user to preview the report, optionally print it, and then have the option to delete the records involved.
dim delXcpt
DoCmd.OpenReport "rptMONRExcept", acViewPreview
delXcpt = MsgBox("OK to delete ?", vbQuestion +...
I have a form whose job is to display matching results in two subforms (three tables, the form holds a master table, when I move from record to record, the subforms show matching results from the other two tables.)
Everything works fine when I use the nav buttons or record selector. WEhen I use...
After working with some recordsets and SQL queries, my mouse cursor disappears, and will not return until I exit Access 2000. I do virtually identical recordset and SQL operations in many other places in this app without problems, and am not changing Echo, Hourglass or any Visible properties...
I am transferring data from an Access 2000 table to Excel 2000. The numbers export fine, but I need one column to be formatted in Accounting format with $. The code looks like:
Public Function XferXL() As Boolean
Dim xlapp As Excel.Application
Dim xlbook As Excel.workbook
Dim xlsheet As...
How can I get the results of a TRANSFORM query into a pre-existing table? (Access 2000)
I have tried this:
DoCmd.RunSQL "DELETE * FROM tblServRpt"
strSQL = "INSERT INTO tblServRpt TRANSFORM Sum([tblBySsn].[cost]) AS SumOfcost SELECT [tblBySsn].[serv_code]...
I have a TRANSFORM that must be run monthly to generate a YTD report. Every fiscal year will begin with July, and July's report will contain data only in one column, each month adds an additional column of valid numbers.
I create a table of current "serv_date" values (like 200207...
I have a routine in Access 2000 that has worked fine for months, like the following:
[code]
Select Case theForm
Case theForm = "FrmAddTrans"
Set rst = Form_frmAddTrans.RecordsetClone
obal = rst("orig_bal")
Case theForm = "FrmRecalcAll"...
When I add a child record to an existing parent, I use a separate form which I prepare by creating a series of globals that hold the data to be transferred into the child. Some of this goes against good data normalization, but it's necessary for this app.
When I open the child edit form...
I'm running tests on some complex updates, and trying to trace the progress is very cumbersome. I'd like to have the immediate window display the order the subs and functions execute. To do this, I've added this at the top of each procedure:
If isTesting Then
Debug.Print...
I'm writing an archive function. Records to be archived are copied into a temporary holding table to verify. When I select the 'Archive' command button, I want to do the following:
Lock all records scheduled for archive (could be 1 or 100, but not 1000)
if ALL records lock
copy the...
I'm going to try to avoid details on this one, all I'm looking for is help figuring out how to troubleshoot the problem-a full explanation would take all week!
I'm trying to create a form to handle 'exception' records which contain insufficient info to be automatically matched to the primary...
I have a set of standard criteria I'd like to set for new tables as they are being created (Access 2000):
Text fields-AllowZeroLength True
Numbers - Fixed, 0 decimals
Currency - Format field set to Fixed, decimals=2
Dates - Short Date, mask set as 99/99/0000;0;_ (Short Date)
I don't see any...
I have a table which holds transaction records-many records per claim, many claims. primary key is combination of cnum plus seq, both Longs.
I would like to create an SQL query to display all the fields in the table, but only the most recent transaction (highest seq for each cnum).
It seems to...
I'm performing a repetitive number of INSERT INTO's which case the status bar to flicker, display 'Updating...'/Ready
I've tried DoCmd.Echo False, "Updating", but it doesnot work.
Any ideas?
David 'Dasher' Kempton
The Soundsmith
http://www.thesoundsmith.com
I have a function for importing a text file. The file is to be received as a line by line import into a table "tblImport", two fields, ID as AutoNumber field and F1 for te actual text in the file line by line.
Public Function xferFile() As Boolean
Dim xferName As String
Dim fullnam...
I need to regularly import several text files which will vary in overall width from month to month. They are fixed width files (data all lined up in columns, no delimiters but CRLF at end of line) but each file, each time, may be different width.
I created tblImport1 with 2 fields, F1, text 255...
I'm running VFP 6.0 on a Win2000 platform. I have a report which gets Primary Language data from a table. The client needs totals and percentages at three levels, Unit, Division and Grand total.
I compute the Unit levels as values in the table, with an additional field for row totals. Then the...
Nothing I could find in the FAQs or forums quite describe this:
I receive a cd monthly which contains 240 fixed width, comma-and-quote delimited text files. The first row holds the field names, and the data structure may change from month-to-month.
I want to read the filenames into an array or...
My questions ALWAYS show up with the subject in a thin font, not the bold type the vast majority of posts display. What am I doing wrong? I've tried the bold TGML codes, but then the subject just displays "Subject Heading"
I'm using IE5 for my browser. David 'Dasher' Kempton
The...
I have a form supporting a query which is a simple "SELECT * from tblCodes". The primary key, code, is a comboBox, and I also have navigatioon buttons. I can code it so selecting a code via the combo box changes the display to show that row, but if I try to use the nav buttons, the...
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.