I am trying to get information from webpage. [URL] ....
I am using the code:
Set ie = CreateObject("internetexplorer.application")
ie.Visible = True
ie.Navigate "http://benwerd.com/lab/geo.php"
While ie.Busy
DoEvents
Wend
Here is the info I can't get from the page. Can't find the id or element that hold the information, latitude, longitude ... that is listed in the website.
I have a text field that I would like to have some information automatically populated when the form is open. I know the basics but the trouble I am having is having the date and time populated before the default text.
Here is what I tried but no luck on it
Code: Private Sub Form_Load() Dim strQuery As String 'Dim js As Integer Dim currDateTime As Date currDateTime = Now() Me.Description = " & currDateTime & " & " " & "J.Adams 41066 CLT SMB - AM : " & " " & "" End Sub
I have 4 fields that are unbound on a form. img1 img2 img3 img4..When these are entered they are all combined and autofill another unbound textbox = imagename.. what i would like to do is from this unbound textbox 'imagename' ..i would like to populate a textbox that IS bound called FileName
[Event Procedure] Private Sub imagename_Click() Me.imagename = Me.FileName End Sub
We need to move rich text from an Access memo field to a Word text box. So far the best Ive been able to come up with is in the code below. In this code pprs!What is a record set field of a table memo field that is bound to a text box enabled for rich text. The rich text seems to be stored as html as so I can get word to convert it by enclosing it in html tags.
Dim What As Word.Shape Set What = doc.Shapes.AddTextbox(msoTextOrientationHorizontal , doc.PageSetup.LeftMargin, 225, 534, 0) Dim sPath As String sPath = "G:Temp.html" Open sPath For Output As 1 Print #1, "<HTML>" & pprs!What & " </HTML>" Close #1 What.TextFrame.TextRange.InsertFile (sPath)
I have a single field in a table called "Client Contact", where users enter a semicolon between the name, address, and city state & zip. My reason for this was so we could copy client info with a single copy and paste (like from an email). But, on the final report, it needs to have these three parts split up into different lines, or even different textboxes. I can't find a way to do that.
I have a Form Display Data in my Access Database, which is working really well. However, users was asking if there is a way we can make Font Color Could/would change if The text in A field or Any field in my display form contained the word "SAD or MAD". Is there code for such thing in display form?..
I'm trying to pull a date from a table into a text box on a form tab control using DLookup and I just can't figure out what is wrong with my DLookup expression:
=DLookUp("DateOrdered","tDateOrdered","PrNumber=" & [PrNumber]) ----- (DateOrdered is short date, PrNumber is text, db is split Access 2013)
Whats missing in this expression? I've tried every criteria variant I could find but to no avail.
Ok, nobody chew me out... I know there's over 500 posts regarding calendars on here because I've read just about every single one and haven't found any answers yet. All of the posts that vaguely resembled what I'm looking for had no replies.
Here's what I'm trying to do:
First I've got 4 tables, each has different data including a start date, start time, end date, end time and description. Each table pertains to a completely different subject. The tables are already populated (imported from excel).
I've got a form with a calendar control (Ms Cal 7) in it... and that's about has far as I have gotten.
I would like to be able to open the form and have the calendar show all events for the current date (i found how to make the calendar show the current date, it's just populating the text boxes that I'm having a problem with).
So, here's how I would like it to work...
When the form is opened, you can click on a specific date (or don't click anything and it shows the current date). Then the textboxes show the info for that date.
Example:
Calendar = 4/20/2005 (Calendar control here)
Textbox1 = select from table A where subject="codereds" and start date = calendar control date
Textbox2 = select from table B where subject ="codeblues" and start date = calendar control date
Textbox3 = select from table C where subject="codegreens" and start date = calendar control date
Ok, anybody got a clue on how I can do this because I've had no luck finding it anywhere.
Looking for an automation solution currently I have a database for client progress and prescriptions. when the file is opened it is set for data entry so that a clean note form is opened. I have a button that pulls up past notes for their review. it has been requested that there be a way to pull the last narative field forward to the new record for editing as a number of the features of the narative remain the same. Currently the only way is for them to open the last seen note hightlight the field and past into the new note. to high level for some of them. Need to make this an automated feature where they would just click on a button and the process would all occur behind the scean and the note would apper in the new note narative box. I know that I could tell the form to not be for data entry but then they write over the last note. this needs to be a new record. Any suggestions greatly appreciated J
Haya all, I’m new to access and I’m trying to create a database for my boss, but am a bit stuck, it’s a Bundy clock system in access, I have the tables set up (I think), and what I’m stuck on is building a form where, when I put in the employs ID and press enter there name appears underneath, can anyone point me in the right direction of a tute that would show me how to do this?
Thanks so much
The way I have the table set up is 3 fields, staff ID, first name, last name. All within one table
I think I’m in over my head… but you have to learn somehow :confused:
I have a linked *.txt file and a qwery that returns the top 1 record from it. (The ideea is to check a value from one column of the file).Both the linked file/table and the query run corectly,I have a vba code on the on open of a form that is checking the query above mentioned (the form is on the Startup option of the database) and when I need to use the Dcount of the Query "
Code:
DCnt = DCount("Den_Fis", "Data_R_Mod_U$G9707014")
I get the "Runtime error 3625: the text file specification..." doesn't exist etc.I pres debug and test the query, I get the "Unknown Jet Error".I press Stop in the VBA and open the Qry - it shows what is was ment to show.I know the workaround is to make a maketable with the needed info and the Dcount on the local table, but it would add one query and one table to the database.
I want to filter a database based on the info typed into the text box, after this, clicking on the button search and filter the database..I have an issue in my code, because I know just how to filter it based on a field but not for all..The fields I have are: Batchnumber, ModelnumberID, OperadorID, Datet, TestResults, Units and Status
I working with Access 2010 and a form with criteria controls, a requery button and a subform that displays the query. I wanted to add a text box that would display some aggregate information about the query results. Like how many results were returned or what the average is in a column of numbers stuff like that.
If at all possible I was hoping to have the text box display aggregate information of the whole query but when a specific entry in the table is clicked I was hoping to have it show aggregate detailed information about that entry opposed to the whole table. So I am not sure if that changes the solution but I wanted to put it out there.In my searches it looks like Dlookup is the way to go but I have seen a lot of people use Dlookup in very different ways so I might be wrong.
I have done this before and can't remember how I did it and I can't fogure out how to do it. I have a form with textboxes that are for displaying info to the users. I want to lock them so that users can not click on them or high light the fields. So basically the user can only click on fields I want them to.
I am wondering if there is a way to automate the pasting function of text from one field into several others in a table without losing the data that is already in the field.
As an example: in 20 fields I have "I love potatoes" and I want to paste the text string, "And I love tomatoes too" in every field without overwriting the original text.
I am trying to delete some text from a text field. There are almost 8000 records and almost all of them are like this.
Example: johnsmith-2.network.home.com
I want to delete everything after the dot and including the dot, to end up with "johnsmith-2". How do I do that? I think I can do it in a query, but don't remember how.
I have a Contact table and imported data into it from another Access Contact table. All but one field inserted correctly - the "Notes" field from the table I was importing FROM was inserted into the WebPage field of my current table. So now I am trying to update my Notes field in the Contact table from the WebPage field in the Contact table - or move the data over rather. I created an update query but when I try to run it it is asking for the Notes and WebPage parameters.
In my form's text box I have noticed that I can;t write paragraphs ie use the TAB key to start a new line. If I use rich text I assume this will be possible. But are there any disadvantages to using rich text?
I am using Access 2007 to update a page on an external website (amongst other things) from an Access form using VBA, but that page has recently changed. I have dealt with most of the issues around this, but there is still a problem that I cannot see how to resolve. Previously all the fields on the page were uniquely named, and so I was able to assign values from my form to them using
Code: .document.all.item(fieldname).value=...
But now there appear to be identically named fields on the webpage and I cannot see how to differentiate between them in my code. I have attached a text file with the two relevant sections, containing the HTML for the two relevant sections on that page only (the code for the whole page runs to 8000+ lines and I can add the lot if really necessary) and as you will see the names for things like runs (name="result[][runs]") and wickets ("result[][wickets]") are the same in both sections. So how do I tell one from the other in my code?
Currently I have the following:
With objIE .Visible = True .... '1st innings - new HTML field names but duplicated on the webpage .Document.all.Item("result[][runs]").value = nz(Me![runs_for#]) .Document.all.Item("result[][wickets]").value = nz(Me![wickets_for#])
[Code] .....
How can I differentiate between the HTML field names in the attached file as simply as possible in my code above?
My database has Main form and a Sub form. On main form i place one unbound text box named investigations. In subform of which datasheet there is a column named TestCode. I want unbound text box (Investigations) to display row values which selected in a column (TestCode) of subform.for example:Investigation field should display "CBC,HB,ALP".
I have a column which contains "text digit text" as "AAA 222 BBB". The numbers of letters or digits can vary.
I need to SELECT the column which contains digits in a specific interval. For Example I have "DFS 673 JKK" "A 3454 LJLJ" "SD 854 JKLJD"
I need to SELECT the column which contains 600 < Digit < 700 the result of the query in this case would be "DFS 673 JKK" because 673 is between 600 and 700.
I have a form on which there is a series of text box controls relating to different frequencies. At the moment I enter a value in to each of these manually.
However, I would like to have an unbound text box where I can paste in all the values (6 or 8 of them) from excel and then press a button and they would be copied in to the individual boxes.
So far I have my design:
I'm not sure where to start with regard to the code as I don't know how to handle delimited text - is it column delimited in excel?
I imagine some sort of loop, such as a do until will be required but again not sure.
