Hi all
I have a Row source string which I use quite often. Currently, I declare it in each procedure and copy and paste it in. The problem is when it needs changing, I need to change it in a billion places.
can I declare the string as public and set it as public too so that I can just make a reference to it rather than copy and paste entire slabs of code into each event??
perhaps I need to place it into a module?
Suggestions are much appreciated.
Hello
I have two tables with names of people in different forms.
table1 : [name] can be either in the form of :
- firstname & firstname surname
- surname, firstname
table2: [surname]
I'm trying to select all the records in table1 where [table2]![surname] is part of [table1]![name]
I've tried using
Like "*"&[surname]&"*"
This returns everything rather than the similar names.
I think this should be simple but can't work it out.
I am using Brinkster to do some ASP/MS ACCESS programming.
I need to add a field which increments automatically with every insert into the table.
I tried the following statement:
ALTER TABLE Jobs ADD jobid AutoNumber(4)
What is the exact syntax?
Thanks
I know that a public constant is available to all subs and modules. I also know that you can only declare these in a module, you can't for example declare these in the form.
So how what is the best way of declaring them?
At the moment I just have a module that has nothing else except for the 3-4 constants that I use throughout all my forms. Is that ok?
why my access always go over the loop that I am declaring..Here is a sample of my code:
Code:
Dim rs As New ADODB.Recordset
rs.ActiveConnection = conn
rs.Open mySQL, conn, adOpenDynamic, adLockOptimistic
For lngProd = 1 To 5
[code]...
I get the error of access cannot find the tbl_data6. Where in the declaration I wrote 6??
I would like to declare a User Type in order to return to values from a function.
The declaration is made in a module as follows
Public Type Document
DocumentID As Long
IncidentID As Long
End Type
The variable Document itself will accept a value
Document=1
But when I try and read the value of an element in the Immediate Window,
? Document().DocumentID
I get Subscript Out of Range
Hi,
I have 2 strings:
str1 = SELECT Field1, Field2, Field3, Field4 WHERE (Criteria1)
str2 = SELECT Field1, Field2, Field3, Field5 WHERE (Criteria2)
I want to show in listbox only "Field1" from str1 and str2.
How unit 2 strings?
Thank You in advance.
Hi all.
I have 2 strings:
strSQL1 = SELECT FieldA FROM table WHERE FieldA = xxx
strSQL2 = SELECT FieldB FROM table WHERE FieldB = xxx
I need unit this two strings to third string strSQL3.
I must have result StrSQL3 = SELECT FieldA, FieldB FROM table WHERE FieldA = xxx and FieldB = xxx
Is it possibly unit strings (not Select Query)?
So I need to know this. How do I:
*Add 2 text fields together with a space between?
*Truncating field 1 to the first character and field 2 to the two first characters?
Sorry for my noob questions :D
Hi. I am trying to compare 2 string values.
5:00
5:45
9:54
10:15
Lets say those are my values. Well in the formula >"5". 10 Will not show up correctly. Does anybody have a piece of code or something that will correctly display 10 as >"5". Any help greatly appreciated. Thanks
Seems like a simple question but I am stuck.
I need to join two strings from different records in a table
table eg
ID Desc
1 blah blah
1 more blah
2 blahring
2 blah
3 and last one
I want to join all the "Desc" strings that have the same ID to get
1 blah blah more blah
2 blahring blah
3 and last one
Can anyone help?? :o
Thanks
Paul
I am normalizing data from a spreadsheet of just over 4000 records. The spreadsheet has a "Model" field that contains both the model number and a model description, separated by a space. I would like to split this field into two different fields: "Model_Number" and "Model_Description". The model number is one word of varying lenths.
Any ideas?
Hello,
I am having trouble with a query. I have a number of blanks for a field and I tried using the expression from the help:
=IIf(IsNull([fieldname]),"Unknown",Format([fieldname],"@;LS"))
But my result set is still a lot of blanks.
This is the expression I was trying to use:
IIf(IsNull([tblMainpersondata]![MailingAddrLine2]),[tblMainpersondata]![MailingAddrLine1],[tblMainpersondata]![MailingAddrLine2])
On most of these, the result was a blank, instead of MailingAddrLine1. If there was visible data for MailingAddrLine2, it appeared.
Any help or suggestions would be greatly appreciated!
Hey Guys,
Just wondering how I would go about comparing two strings, and spitting the results out a similarity percentage?
E.G. (String 1) Postal Address: "11 John St"
(String 2) Street Address: "11 John Street"
(Output): 80%?
Cheers
Hello,
I would like to put a restriction on the SQL statement such that if one particular field contains the character "MO", then we take in the record, else we ignore them. May I know how could this be done in the "WHERE" part of the SQL statement? I do not think SQL would read things like Instr(). Thanks!
Regards,
Anyi
Hi all,
Please can someone help. I am trying to pass a query to the database from vba but can't seem to get the string concatenation of fields correct.
Clinical area and title of audit are database fields. Any ideas please? Thanks!
Here is what I have:
StLc = "[Clinical Area] = """ & Me![Combo309] & """ & """ And """ & [Title of Audit] = """ & Me![Combo309] & """"
Hoi,
I have a loop where i use a string (strCount). The first time I run the loop strCount has de value A. The second time strCount must become B, the third time C, etc
I already tried to strCount = strCount + 1 but it did not work
does someone know how to do this?
greets
Koen
sorry formy wad english
This is a database that was handed off to me for upgrading.
The person who initially created it made the Name field in the table contain the entire name... So a single entry in the field looks like
CHRIS R LOUNSBURY
The table is in the attached table. This is merely a sampling. The main table has over 3,000 names in it. Is there an easy (or maybe not so easy) way to automatically parse that data and split the names into their own fields.
An example would be the string CHRIS R LOUNSBURY. Run code which takes the string left to right to the first blank space, and splits it off into First Name field. Take the last part of the string (right to left) to the first white space and put it in the Last Name field.
Is this possible? Or do I need to find myself a temp employee to data entry all this over again
Access does not have an option to sort alphanumeric strings properly with the result that sorting a column with the following (sort of) data is almost impossible.
Flat A1
Flat A10
Room A13
Room A2
Room A21
B5
Flat 5b
10k1
10 k3
10 k12
10 k20
10 k2
etc
I need to be able to get addresses sorted correctly and they always have a mixture of alphabetic and numeric characters.
The steps I have followed to try and achieve this are as follows:
Create a matchfield containing the data for sorting (typically the street number followed by the flat number/name)
Split the matchfield into separate fields where there are spaces. "Room A13" becomes "Room", "A13"
Then split the fields/columns by separating the alphabetic and numeric portions - i.e. "Room A13" becomes "Room", "A", "13". This I have not been able to achieve successfully.
(Thinking about it the first step of separating by spaces is probably not necessary. All that is needed is to separate the numeric and alphabetic data)).
Once you have separated the data into alaphbetic and numeric content a sort is straightforward.
Why can't Access cope with what I would regard as a fairly basic requirement (i.e. to be able to sort alphanumeric strings correctly).
Does anyone have a suggestion how I can solve this problem until Access is improved?
hi guys,
i am importing a tab seperated file into a table, and one of the fields is a user comment.
all is well -- until a record is imported that contains comment with a carriage return followed by some more text. the text after the carriage return is imported as the next record.
if the file is tab seperated, why is the carriage return causing the import to act in this way?
thanks
rik.
Im relatively new using queries.
I'm confused. I developed a subset of data in the same general format as our main database. When running select and update queries on this subset, I am able to use Left, Right and Len expressions such as "Right([Year],2)" and "Right([Latitude],Len([Latitude])-3) to update and generate new fields of edited data. However when I use the same expressions on the same tables and fields in the main database, I get a reply such as Function is not available in expressions in query expression 'Right([Year],2)'. A coworker says he has encountered the same problem. Has anyone else encountered this and found an interpretation/solution????
I have a two tables with about 44.000 words that I need to search.
I need to find words that are exactly 10 characters AND where each letter is only represented once ...
Anyone that has an idea how to write that query?
Any help would be highly appreciated.
Thanks from cold Denmark,
Steff
I'm trying to parse text strings by certain spaces and characters within the string. For Example, if my text string is RAST 2006-A1 B1 mtge, how can I 1) create a new field with just the RAST 2006-A1, 2) Create a field with just the RAST 2006-A1 B1?
I appreciate any help I can get. Thanks!
I posted this before, but didnt get any answers
In A2007, has anyone had a problem with checking whether a text field is equal to "" in a query
ie - select * from whatever where targetfield = ""
-----------
this generated a type mismatch (I actually had <is null or ""> in the query definition, but it was the "" it didnt like.
Does anyone know how to create a query object using a string that contains SQL code?
The reason I ask is that I want to be able to run an ad hoc query, but I can't use a RecordSet because there's no way (that I know of) to take the results of a recordset and create a query display out of it (meaning, make it look like a query was executed)
So what I really want to do is to create a query, and then execute it with "DoCmd.OpenQuery()" If that's possible. Any ideas?
hi... I have a form containing 120 subforms...
the form will be loaded depending on the user...
i name my subforms in sequence that is: loadA1, loadA2, loadA3,....
to load a form I just use the code: me.loadA3.sourceobject = "FormName"
and then I make a counter to keep track of which forms are loaded and which one to load next.. as they load in sequence..
the question is if its possible to write the above code in a string type or other way to make the code shorter...
For example my code is as follows: If ACount = 0 Then
Me.LoadA1.SourceObject = "TEMPCableName"
ElseIf ACount = 1 Then
Me.LoadA2.SourceObject = "TEMPCableName"
ElseIf ACount = 2 Then
Me.LoadA3.SourceObject = "TEMPCableName"
ElseIf ACount = 3 Then
Me.LoadA4.SourceObject = "TEMPCableName"
ElseIf ACount = 4 Then
Me.LoadA5.SourceObject = "TEMPCableName"
ElseIf ACount = 5 Then
Me.LoadA6.SourceObject = "TEMPCableName"
ElseIf ACount = 6 Then
Me.LoadA7.SourceObject = "TEMPCableName"
ElseIf ACount = 7 Then
Me.LoadA8.SourceObject = "TEMPCableName"
ElseIf ACount = 8 Then
Me.LoadA9.SourceObject = "TEMPCableName"
ElseIf ACount = 9 Then
Me.LoadA10.SourceObject = "TEMPCableName"
ElseIf ACount = 10 Then
Me.LoadA11.SourceObject = "TEMPCableName"
ElseIf ACount = 11 Then
Me.LoadA12.SourceObject = "TEMPCableName"
ElseIf ACount = 12 Then
Me.LoadA13.SourceObject = "TEMPCableName"
ElseIf ACount = 13 Then
Me.LoadA14.SourceObject = "TEMPCableName"
ElseIf ACount = 14 Then
Me.LoadA15.SourceObject = "TEMPCableName"
ElseIf ACount = 15 Then
Me.LoadA16.SourceObject = "TEMPCableName"
ElseIf ACount = 16 Then
Me.LoadA17.SourceObject = "TEMPCableName"
ElseIf ACount = 17 Then
Me.LoadA18.SourceObject = "TEMPCableName"
ElseIf ACount = 18 Then
Me.LoadA19.SourceObject = "TEMPCableName"
ElseIf ACount = 19 Then
Me.LoadA20.SourceObject = "TEMPCableName"
End If
If ACount < 19 Then
ACount = ACount + 1
ElseIf ACount < 0 Then
ACount = 0
Else
ACount = 20
End If
anyway to make it something like:
"me.loadA" & Acount & ".SourceObject = "TEMPCableName"
??
Thanks in advance
help is much appreciated