My following sql statement is wrong. "Scenairovalues Step02" is the table name. How should I write this one with the empty space in the name?
vtSql = "Select * from Scenairovalues Step02"
Thanks a lot in advance!
Is it possible to use recordsets inside an sql-statement how described in following example. the error message: access can't find the table or querydef.
Code:
public function useRS (RS_ext_1 as DAO.Recordset, RS_ext_2 as DAO.Recordset) as DAO.Recordset
dim sql_RS_int as string
dim RS_int as DAO.Recordset
sql_RS_int = "SELECT * FROM RS_ext_1, RS_ext_2 WHERE col1_ext1 = 1 and col1_ext2 = 5"
set RS_int = CurrentDB().OpenRecordset(sql_RS_int)
set useRS = RS_int.Clone
end function
Code:
Sub ClearDeck()
Dim i As Integer
Dim ToStay As Variant
'Because Access will not allow a Frame and all it's contents to set Visible = False
'Remove all Frame Controls except those to keep outside our Frame
[Code] ...
I'm getting RunTime Error 424 Object Missing on the line inside the if statement. Although it is getting .Controls(i).Name correctly and I would have thought Me is an Object? I also tried the complete Form name but still got the error.
Code:
strSQL = ("INSERT INTO " & strTable & " Select c.OrderNumber, c.Item, c.RepId, p.ProductNbr, p.Name, [tbl_LBP_Sales Location Num].[Rep Region Code] FROM CalculateTotal c, dbo_PartNew p, [tbl_LBP_Sales Location Num] WHERE ([Structure] like '*" & u & "*') AND ([ProductNbr] = '" & txtPartNumber & "')")
CurrentDb.Execute strSQL
It keeps giving me this error and I don't know why?...
I tried replacing the brackets around Rep Region Code with quotation marks as well as these things `` but kept getting the same error...
I'm having a problem with the syntax of a recordset of a Datasheet inside a subform which is also inside a Main Form.
Main Form - frm_1_0_LMS
Subform - frm_1_4_0_TeamApprovals
Subform(Datasheet) - frm_1_4_1_TeamApprovalsList
Here is my code:
Code:
Dim rs As DAO.Recordset
Set rs = Forms!frm_1_0_LMS.frm_1_4_0_TeamApprovals.frm_1_4_1_TeamApprovalsList.Form.Recordset
If Not (rs.EOF And rs.BOF) Then
Forms!frm_1_4_2_ApproveDeclineUserLeave.Controls("lblFiledDateLeave").Caption = rs!Leave_Date
End If
I am getting this error: Object doesn't support this property or method
is it possible? if so, how?
thanks
I've been trying unsuccessfully, but i'd like to put a tab control on the page of another tab control. is this possible? i don't see why it wouldn't be.
Thanks
I have the following Select Statement:
SELECTTenant.ID, Tenant.[First Name], Tenant.[Last Name], Tenant.Address, Tenant.City, Tenant.State, Tenant.Zip, Tenant.[Home Phone], Tenant.[Cell Phone], Tenant.[Work Phone], Tenant.[Rented Unit],
Tenant.[Security Deposit], Tenant.[Move In], Tenant.[Move Out], Tenant.TenantID, Tenant.UnitID, Tenant.PropertyID, Tenant.OwnerID, Owner.Company, Owner.ID AS Expr1, Property.[Property Address],
[code]....
Now, I know that something in the UPDATE statement does not match my select statement.What should my Update Statement be, in order to update all the columns in the joined tables?
i add a tab control, but i want to insert a table inside my tab how can i do that?..cant find any tables in my design tab when i work on my tab control
View 1 Replies View RelatedI have a query that pulls information from two different columns in a linked table, and places them together in a single column in a new table. The expression that i use in the query is: Expr1: [ARTINAME]+[ TITLE]. I need to put a space between the two. Is there a way to put a space in between these two when written to the new table?
View 3 Replies View RelatedI have a table with the following fields:
Record_No <--- This is an autonumber field
Est_COE --Date Field Type
DATE_DOCR
DATE_Followup
Progress
I then have used multiple querries that just count records based off of Status:
Example of one of the querry's:
SELECT Count(borrower.Record_Number) AS Close_Of_Escrow
FROM borrower
WHERE (((borrower.Est_COE) Between Date() And (Date()+7)) AND ((borrower.Progress)="active"));
Another Example of one other querry:
SELECT Count(Borrower_Journal_Notes.ID) AS Followups_Not_Done
FROM Borrower_Journal_Notes
WHERE (((Borrower_Journal_Notes.Follow_Up_date)>Date()) AND ((Borrower_Journal_Notes.Followed_Up_Complete) Not Like -1));
Then I put both these querry's into a another querry so i can get the data put into a single form using one record source. (The master querry)
here's my problem...
i have a crosstab query where in one field (value) has a range of 1 to 19.
I used the min and max for two separate row headings....
the min and max works only on values (1 to 9) or (11 to 19)
example... the 2 columns have values 8 and 4
the min returns 4 and the max returns 8
however, when the values became a mix of single and double digit (e.g. 11 and 8)
the min returns 11 and the max returns 8
does the min function on compares the values with only the same digits?
pls help.
I've been trying to figure out but can't come up with the proper expression or code to do what i want to.
basically when I focus on a field I want it to first check if there is any data/value in it and onyl do a DCount if there is and otherwise not (IE if the field is null skip the DCount)
I figured it would be similar to IF [Host] = 'NULL' THEN (Nothing here) ELSE (DCOUNT here)
But each time I try i get a syntax error, could anyone shed light on what is the proper code for such a thing?
I have a checkbox that has a grayed out box inside of it. What causes this/ what is it? I looked up the record and there should be a checkmark in the box. In the table it is set to have one.
I know that if the prefeances of Enables is set to No then all of the check box and the text label box is all grayed out, But in my case it is only the inner part of the box…. (And it is a Checkbox…)
The box name is ABC1 and it just reads the record, that’s it... It is used for reports later down the road. So there is not any code set to this check box.
Anyone have any ideas?
Thanks,
Darkhat01
Hello everyone, its been a while since i asked for advice.
This is probably a silly question, so if it can't be done, please let me know. you would save me time in trying to makeup code to perform the action.
Is it possible to have a Report embedded into a Form. [i was guessing that the sub report/form] is where to start.
If that can be done, i would then have to find a way to get the embeded report to link to a primary key. And also size the report view to around 50%
.......... now ive wrote this, i'm more sure it can't be done, so what the heck, i'll check with you geniuses anyway
Best Regards
Aaron
I am looking to subtract number inside the same field. and then return the difference to a new field (column). This data is used to generate a graph and the this is currently done by hand. I know there has to be an
easier way to do this.
Below is an example of what I am looking for.
I have a table called Numbers, and fields or columns called...
Value(s) Result(s)
-70 0
-70 1.02
-68.98 1.09
-67.89 3.11
-71 .71
-69.29 1.52
-67.77
So what I am doing is subtracting row two from row one. The difference is then put in another field(column) in row one. The process repeats, row three from two, four from three, five from four, etc, etc. This occurs for hundreds of rows.
Is there a SQL statement that can do this? Your help is much appreciated!!!
Thanks for your help.
Hi everybody,
Amongst many other things i would like to be able to see which teams in our company have access to which database. We currently use up to seven!!! different Databases which makes for tremendous fun...just kidding.
Since every Team has access to more than one Database andevery Database obviously gets used by a multitude of Teams, i thought the best way to go would be a Junction Table. Whilst building this, however, it occured to me that i could have just created fields for each Database in the Team Table which then can be ticked.
So here's my question, is it more space consuming to create a junction table, it certainly appears to be more work right now...
Thank you very much,
Dan
Hi!
Is it possible for me to alias the fldGroup to Function Group?
How do you alias a field name to a name that contain a space?
Please advise.
Aijun.
I have an enormous Post Code Table 1.7 million records, which I must update every month into usable sectors for our carrier cross refs, the UK postcode is in the format CB6 3HQ, CB6 3HR, CB6 3HS, CB6 3HT, CB6 3HW etc I need to be able to remove the space then only use the first 4 chrs ie CB63, in the above examples I know I could do a search and replace " " with "" but I need this to be run automaticly where would be the best place to do this and if coded how?
Any help or alternative suggetions appriciated
Hi there
I would like to know how to find out how much space a table uses within an MDB. is there a analyser of some kind available that you know of?
Thanks
I need an expression which finds the first space from the right and returns the text (variable length) to the right of it.
Ex.
AMINOPH, THEOPHY. INJ
expression should return INJ
I created a help file in access that lets you have text mesasge up to 1024 chars. Just press F1 key on any control that you have setup to bring up help message.
Does any one see any problems with the way I did this?
Form
Help File: = ""
Help Context ID: = 0
For each control on the form where you would like to have a help message do the following.
Form
Control
Help Context ID: = Set to one of the help index numbers in the help table.
Add KeyDown Event to the control
Private Sub Text0_KeyDown(KeyCode As Integer, Shift As Integer)
'Add this line
KeyCode = DisplayHelp(KeyCode, Me.ActiveControl.HelpContextId)
End Sub
module
Function DisplayHelp(KeyCode As Integer, HelpContextId As Integer) As Integer
Dim dbs As DAO.Database
Dim rstRecords As DAO.Recordset
If KeyCode = VBKeyF1 Then ' 112 = F1
Set dbs = CurrentDb
Set rstRecords = dbs.OpenRecordset("SELECT tlbHelp.Index, tlbHelp.HelpMessage " & _
"FROM tlbHelp WHERE (((tlbHelp.Index)=" & HelpContextId & "));")
With rstRecords
If .RecordCount > 0 Then
Call MsgBox(!HelpMessage, vbInformation, "Help")
End If
End With
DisplayHelp = 0 ' Clear KeyCode
rstRecords.Close
Set dbs = Nothing
Else
DisplayHelp = KeyCode
End If
End Function
Create Table and Fields
Table Name: tlbHelp
Field Name: Index as Number
Field Name: HelpMessage as Memo
Field Name: FieldName as Text
Field Name: FormName as Text
How type in custom number and message for each help message.
hi everyone..
can the text in the listbox be printed?? not the entire form.
I wonder if you can help me. In my query, for this calculated field, i get an error message about a syntax error missing operator in query expression.
what did i do wrong? thanks
FormulaID is a text field.
UnitRM Combined: nz(DLookUp("UnitRM Combined","QryFormulaSummed","[QryFormulaSummed].[FormulaID]='" & tblCostJunction.FormulaID & "'"))
I've been testing my scripts so my database has a whole bunch of bogus records in it. I'd like to simply delete everything out of my orders table (there aren't any legit ones in there yet) so that I can start over when I go live and not have all that crap in there.
Is there an easy way to do this without re-creating a blank database and copying/pasting table only over?
Not sure where to start here, I have a subform which spits out query results. Next to the SERIAL field in each record I have a button (ADDSN). On my main form I have a listbox (SNLIST). I want to be able to click the button and have the associated SERIAL field be added to the listbox. I know how to add data to a listbox but I do not know how to add the data from a certain field selected records. How do I access this information?
Thanks.