I am attempting to create a report and pass on the information from the current form to it. It is supposed to create a student ID and I am unable to get the information into the appropriate fields.I can get all the info from OpenArgs into one box but it wont parse it all out. The Form is within a navigation form. I know the below option is not the best way to do it, but other options I have found it has issues with sending when the form is within a navigation form and I prefer not to redo the entire thing at this point to remove the Navigation form.
I need to create a query that will parse a word and separate it into a list of letters. I have had a go myself but am unable to do it... does anyone else know what to do?
I am tring to seperate a field using a query that has data like this: 02 04 08 18 20 25 31 32 35 39 41 45.... (10 sets of numbers) into there own fields... I cant seem to find something along those lines!
I am a novice here so your patience and help is very much appreciated. I am trying to parse text from a field. Here's an example of the source data (all in "field1"):
Example 1 ***** Regular ***** Time..08:19 DATE..03/27/2008 Request NO...20081306101
...and this is how I would like it" New Field 1: Regular New Field 2: 08:19 New Field 3: 03/27/2008 New Field 4: 20081306101
Because the values change substantially, I would like to be able to select the data in between two known text strings as opposed to using the MID function, an example of which I have successfully used to return "Regular" is:
MID([field1],InStr9[field1],"*****")+6,7)
But because the values change (e.g. "Emergency") I would rather have the end point based on the string "*****" rather than a count of characters (e.g."7") Any suggestions?
Can someone get me started in the right direction?
I have an unbound field on a form "txtScan". This field is populated by a barcode scanner.
The data looks like this ~Field1~Field2~Field3~Field4~Field5~Field6~Field7~ Field8~Field9 I am using ~ as a delimiter. Since I am encrypting the barcode, I can pretty much do anything to the barcode.
I need to parse ~Field1~ into txtFirstName ~Field2~ into txtLastName ~Field3~ into txtCompany etc. A key point is that one of the fields may be blank so, if field 2 in the string is blank, "Field2" does not get populated.
I've never tackled anything like this before and don't know where to start.
I have a User Defined Type which stores an array..I have 2 instances of this UDT, one storing matched data, the other storing exception data..I was to parse these arrays to an Excel output routine. However, the parameter variable contains no data when accessing it..
Here is my code:
Code: Private Type TOutputRow RACFID As String FullName As String Access As String LastLoggedIn As Date End Type
I am having trouble parsing the month from a date like 05/12/2007 and I want to return the leading zero with the month. Example of 05/12/2007 and I want to display 05 only.
Here is what I need to do: I have 1 table that contains groups responsibilities, there is a field Code-group that the initiator uses to track the groups & their % of impact to the overall project hours. Sadly enough he enters the data as such (EX: PROJECT1 GROUP1-25%, GROUP2-50%, GROUP3-25%.
The problem is that he has varied instances of groups listed in each record & wants me to be able to parse the data out regardless of how many groups are listed. I know how to parse data when there are a specific number of groups what I can't figure out is how to parse data regardless of how many groups is in the field.
If I have an XML file, I can load it into an XML document and parse it.
For an HTML file, I have been unable to find similar parsing methods - that is, using DOM and not involving a browser (other than simply treating the file as text). I'd prefer to avoid the browser control because it is different for a number of different Access versions, so the only option remaining that I see is to run Internet Explorer with visibility off.
Can one parse HTML using the DOM without a browser?
I have a Date Field and I would like to complete another field depending upon the contents of that date field.
In this way: if the Date is, say, 4/27/12 I want the other field to read: April 2012 and so on. Reading the month, putting it into words, reading the year, writing it out. This second field is NOT a date field.
In a query, I have the following data. If a number has more than six digits, I need to parse past the fifth digit and that becomes a new field. If it has five or fewer digits, no record is entered into Column2. For example:
I have a process which imports a txt file into a memo field of my TBLORIGINAL table Each file may have one record or it may have multiple records Every record begins (exactly) with
Quote:
FRE Order Order RAD ShipDate Customer City State Postal Code
For each record in the memo field, I need to create a new record into my TBLPROCESSED table
This can probably be done while it is importing but I need to keep the original file intact
I suppose I could copy and paste but there must a vba way of doing this
I've got a Table with a string of data delimited by an "*". The first part of the string before the "*" can be variable in length, so if I use a LEFT expression to break apart the 2 parts of the string on each side of the "*", my results are incorrect. In MS Excel, I can use the following formula to solve the problem:
=LEFT(B6,(FIND("*",B6)))
You are just substituting the number of positions with a Find command that looks for the "*", and returns anything left of the "*". Unfortunately, the brilliant programmers at Microsoft, once again, don't have an Excel function in Access. how to recreate that functionality in a table in Access?
I have a spread sheet which on a per line basis contains columns whose cells contain the path to a file. It looks as if many of the files are tif, pdf, word and excel etc, so multiple file types.
Writing a routine which would take each row and then for each line of file paths turn them into one multi-page document - pdf or something?
I've built an HTML web form that sends an email to me upon submission with all the field inputs. I have previously found success using VBA in Outlook to parse out these emails and feed the substrings into an Excel Sheet (hooray!), but now am looking to feed the substrings into Access, specifically into a table in an existing .mdb file. I figure the way Outlook will "talk to" Access will likely be a bit different from the way it does for Excel.
The way my previous script engaged with Excel was through a rule; every time a new email was received, the following script would run if the message had the subject line generated by my web form. The script would check whether Excel and the target workbook/sheet was open, act accordingly, and then input the substrings (I've excluded that part below), then return Excel and the wb/ws to their initial state. I imagine though, that with Access I might be able to feed the substrings into the .mdb without having to open it proper, the way a front-end talks to a back-end. But perhaps I'm mistaken on that front.
Code: Option Explicit Option Compare Text Public Const xlUp As Integer = -4162 'I genuinely do not know what this is _ about. It came with the initial _ borrowed code. Public Const wbPath As String = "C:...Workbook.xlsx" 'Workbook path
I need to identify and parse (substring) a number of digits from a barcode. The barcode digit count will vary, based on the number of details included in the barcode.
For example: the barcode for GS1 DataBar begins with a 4 digit code of 8110 identifying the code as GS1. The 5th digit then identifies the number of digits directly following which constitute the manufacturers code, which can range anywhere from 6 digits to 12 digits. I need to pull the number of digits out of the barcode based on the value of the 5th digit placeholder and pull only that many digits from the string and replace them into another field. There are potentially 70 total digits in the barcode. I have only provided the first section, which I am asking the question on.
Simply put: I need to tell the substring to identify the number to parse from digit 5, (which will have a min of 6 digits and a max of 12)
How do I pull the information out of a string to create a substring in another field by first defining the number of digits to pull out (Digits 6 to 17 min of 6 digits and a max of 12 digits) based on a value within the string (digit 5= value)
So if Digit 5 is 6 the returned value would be: Digits: 6 7 8 9 10 11 (6 6 6 6 6 6 )
If Digit 6 is 9 the returned value would be: Digits: 6 7 8 9 10 11 12 13 14 (9 9 9 9 9 9 9 9 9)
The first portion of the barcode is below: There are other pieces necessary to be pulled the same way, but from other sections, and based on yet another X desinator field (the next with a min of 1 and max of 5) I assume the pull would be similarly completed.
I don't know how to write code, I have used formulas but not this detailed or specific.
Ex: I know = Min (barcode, 5, 6) would pull the 6 digits after the 5 spot, but how do I vary the 6 (count) number in the formula?
Example below: No additional spaces, dashes, letters etc. (A's = 1-4, X = 5, M's = 6-17)
I have a form with a subform in it - the forum is a search forum and the subform is the output from my search. I would like to run a report on the search result and do not know what is the best process for this???
Should I create a temp table with search results?? if so how do I go about this?
Private Sub btnSearch_Click()
' Update the record source Me.frmsubClients.Form.RecordSource = "SELECT * FROM qryClientData " & BuildFilter
' Requery the subform Me.frmsubClients.Requery
End Sub
I tired this, but it does not work, thus I think I need to create a temp table or something?
Private Function BuildFilter() As Variant Dim varWhere As Variant Dim varColor As Variant Dim varItem As Variant Dim intIndex As Integer
varWhere = Null ' Main filter
' Check for LIKE Reference If Me.txtReference > "" Then varWhere = varWhere & "[Reference] LIKE """ & Me.txtReference & "*"" AND " End If
' Check for LIKE Orig If Me.txtOrig > "" Then varWhere = varWhere & "[Orig] LIKE """ & Me.txtOrig & "*"" AND " End If
' Check for min Uniq If Me.txtUniq > "" Then varWhere = varWhere & "[Uniq] LIKE " & Me.txtUniq & " AND " End If
' Check for max PaymentDate If Me.txtPaymentDate > "" Then varWhere = varWhere & "[PaymentDate] LIKE " & Me.txtPaymentDate & " AND " End If
' Check for max VoucherNumber If Me.txtVoucherNumber > "" Then varWhere = varWhere & "[VoucherNumber] LIKE " & Me.txtVoucherNumber & " AND " End If
' Check for max Name If Me.txtName > "" Then varWhere = varWhere & "[Name] LIKE " & Me.txtName & " AND " End If
' Check for max Address1 If Me.txtAddress1 > "" Then varWhere = varWhere & "[Address1] LIKE " & Me.txtAddress1 & " AND " End If
' Check for max Address2 If Me.txtAddress2 > "" Then varWhere = varWhere & "[Address2] LIKE " & Me.txtAddress2 & " AND " End If
' Check for max Address3 If Me.txtAddress3 > "" Then varWhere = varWhere & "[Address3] LIKE " & Me.txtAddress3 & " AND " End If
' Check for max Postcode If Me.txtPostcode > "" Then varWhere = varWhere & "[Postcode] LIKE " & Me.txtPostcode & " AND " End If
' Check for max SC If Me.txtSC > "" Then varWhere = varWhere & "[SC] LIKE " & Me.txtSC & " AND " End If
' Check for max PaymentMethod If Me.txtPaymentMethod > "" Then varWhere = varWhere & "[PaymentMethod] LIKE " & Me.txtPaymentMethod & " AND " End If
' Check for max Factor If Me.txtFactor > "" Then varWhere = varWhere & "[Factor] LIKE " & Me.txtFactor & " AND " End If
' Check for max Type If Me.txtType > "" Then varWhere = varWhere & "[Type] LIKE " & Me.txtType & " AND " End If
' Check for max InvoiceReference If Me.txtInvoiceReference > "" Then varWhere = varWhere & "[InvoiceReference] LIKE " & Me.txtInvoiceReference & " AND " End If
' Check for max InvoiceDate If Me.txtInvoiceDate > "" Then varWhere = varWhere & "[InvoiceDate] LIKE " & Me.txtInvoiceDate & " AND " End If
' Check for max InvoiceAmount If Me.txtInvoiceAmount > "" Then varWhere = varWhere & "[InvoiceAmount] LIKE " & Me.txtInvoiceAmount & " AND " End If
' Check for max Dept If Me.txtDept > "" Then varWhere = varWhere & "[Dept] LIKE " & Me.txtDept & " AND " End If
' Check if there is a filter to return... If IsNull(varWhere) Then varWhere = "" Else varWhere = "WHERE " & varWhere
' strip off last "AND" in the filter If Right(varWhere, 5) = " AND " Then varWhere = Left(varWhere, Len(varWhere) - 5) End If End If
Hi all, I have a small problem at the moment i have a subform which details get enteredt into and then a report which prints out details in the subform but the order they are in the subform and the order they are in the report are different so if there were items like tea, coffee, latte, on the report will come out like latte tea coffe is there a way of having the report print out exactually the way it is in the subform and what is affecting this can it be the subform or report?? thanks guys.
I am having trouble previewing a report using a command button located within a subform.
Each record in the subform contains a command button. When this button is clicked, I would like to generate the report preview containing the main form data for the current record AND only the subform data for the current subform record (i.e. the subform record for which the command button is clicked).
Additional info: -The form (frmA) and subform (sfrmB) are linked by [ID] -Data are referenced directly from their tables -Following is the Command button OnClick event code that is currently being used to obtain data for the current main form record (needs to be modified to only retrieve subform data for the current subform record):
I am using Access 2007..I have created a main form and have inserted a subform. When I open the main form, the subform displays correctly. However, when I go to create a Report from the main form, the subform information is not displaying.
My problem is that I keep getting a type mismatch error. I know that it is because CLassID is a number and it is getting passed as a string i just can't figure out the syntax to the highlighted code.
I have a subform that displays results based on selections from cascading boxes on the form. I am trying to print them to a report. I think my procedure is correct for the print button and Im afraid my problem is that the form is not based on a seperate query. Is that they only way to be able to print? It is based on procedures defined in the cascading boxes. How can correct it so it will print the results to a report? Thanx.
I have a form with a subform in it and I would like to print the contents of that form to a report. I am able to print now, using a "print" command button, but it only prints one record, just the one that is being displayed. I want to be able to print a report with all the records that are in the filtered result.
Also, when the press the "print" button I would like to give them an option "Print this record?" "Print All records?". depending on the input, it would print the report.
Can someone please help me with this? Much appreicated. Thanks.
