Modules & VBA :: Send Text As Hyperlink
Jul 26, 2014
Since my old DB had hyperlink (web pages) either starting with http:// or not, and the users were complaining that they couldn't easily edit the field, I converted all the fields to text. Then I tried the following code on doubleclick:
Dim WebLink As String
If Me.WebPage2 <> "http//" & "*" Then
WebLink = "Http://" & Me.WebPage2
Else
WebLink = Me.WebPage2
End If
Debug.Print WebLink
Application.FollowHyperlink WebLink, , True
The above works fine if there is no http:// but if there is one already in the text, then I get run time error 5 that it cannot locate the page. On checking what is happening, the code is adding http:// again even if it already there.
View Replies
ADVERTISEMENT
Aug 1, 2013
I have an Access 2010 database which has a table with several fields with the Hyperlink data type. Some of these hyperlinks reference files stored in a SharePoint database. I am relatively new to using hyperlinks. The task is to insert those hyperlinks into an email using VBA so that the recipient can just click on them to view the documents.
I have no problems with using VBA to create emails or to add attachments. My issue is with adding hyperlinks to the body of the email.
View 12 Replies
View Related
May 29, 2014
i have thousands of data records with hyperlinks that are correct. Each data record shows the actual link (google.com, foxnews.com, espn.com, etc.). However, i want to change all of the records to just say "link" instead of saying espn.com, etc. How can i do this automatically without having to manually right click, edit, and changing the text to display?
View 6 Replies
View Related
Apr 11, 2015
I want to create an app that works like Wikipedia. for example any word that have an explain and that's explain available in my database that word become hyperlink text with different color and so if operator click on that word open a new form and show the explain.
View 1 Replies
View Related
Jul 20, 2015
Small piece of code that can send / recieve small text-strings over a network. I finally got it to work, but forgot to think ahead . Right now it only works in a formular but i really need to be a function with input / output.
My problem is that i am using the "Withevents" to call the Ostrosoft Winsock network module and "Withevents" does not work in functions.
How to build this into a function ?
Code:
Option Compare Database
Option Explicit
Dim sBuffer As String
Dim spage As String
Dim WithEvents wsTCP As OSWINSCK.Winsock
[Code] ....
View 2 Replies
View Related
Oct 11, 2004
Hi All,
I have a table with person's name, clubname, cluburl.
In a report I can show the clubname,but when I export to HTML, can this clubname
become a hyperlink to the clubURL ? (While showing the clubname..)
Anybody ideas ?
View 3 Replies
View Related
Mar 3, 2007
I have a table with one field set as a hyperlink. I have to generate the hyperlink according to what else is going on in the record, I do this by assembling a text string which I can write to a text field in the same record. I have no problem doing this but when I try to copy that string into the Hyperlink field I get type mismatch. Incidentally if I put two text boxes on a form and bind one to the text and one to the hyperlink field the I can 'cut and paste' it OK so how come I can't do it with Access basic?
Dim stGunlib As String
Dim stGunlib2 As String
stGunlib2 = [Stock number]
stGunlib = "www.shooting.uk.com/Gunlibrary/" + stGunlib2 + ".jpg"
[Link] = stGunlib
[Picture] = stGunlib ([Picture] is a hyperlink field) it goes wrong here
I am using Access 2002
Thanks Dennis
View 6 Replies
View Related
Mar 15, 2013
I need to get an email address from a field and place it onto another form.. HOWEVER I dont want it as a hyperlink, nor do I want the mailto blah blah coming over.. I just want the email address as TEXT.In the application the user opens the email form by clicking an icon on an invoice screen, this will allow them to automatically email to the client.. Once they open the email screen they naturally see an arrangement of other boxes where they can enter subject, email description etc..
At the same time there are two boxes, the "To" box and the"From" box... I want these boxes to be auto updated with the email address (to save time). When the user clicks the icon on the invoice screen it automatically copies and displays the email address of the client in the "To" box on the invoice.. The problem I am having is that it is displaying as useless information which is associated with the hyperlink.The email address comes from a field that has already previously been associated as a hyperlink, and it HAS to come from this field, I have no way around it.... All of this information is coming from an address book section from a field that is a hyperlink field.. If it was a txt field then I would not be having this problem.
As I already have various forms open displaying information I am able to used simple code to fill in various bits of info to save time... Because of this I am using simply code to copy the email address from one form to another:
Forms![Email]![To] = Forms![AddressBook]![Email]
Obviously the above code is simple and works for 90% of this type of approach, however there must be some other code that I need to use to first translate the email address to text...
In the end I don't care what I have to do as long as it works.. Remember though that the original field is a hyperlink field and must remain so, I cannot simply convert that to txt..
View 1 Replies
View Related
Apr 25, 2013
I have a report where I need to display a box with the following:
="text text text " & url &" text text text"
I need the URL to be bolded, but not underlined or blue. The URL is a variable, so I'm building the text using a string. It looks like the only way to set part of the field to bold is to make it rich text and add html bolding instructions, but that converts the url to a hyperlink. I don't want it to be a hyperlink, just text.
View 2 Replies
View Related
May 7, 2014
I was trying to see if there is a way to convert text to a hyperlink in a query.
Background : I'm pulling information from a lotus notes database using an OBDC connection and storing it into an access database and using that to upload to a sharepoint site. While we are converting over to a sharepoint site, I was trying to make it easy to get back to the original site for each document to check the work.
One of my columns in the query looks like this:
Code:
Notes Link: "notes://pncpgha66/852570CE0056FEF3/0BFCC83A5C11D7C3852576CD0072ED3E/" & [NoteUNID]
I don't see a way to convert that whole part to a hyperlink though. Like I could with a date and text. Cdate().
View 1 Replies
View Related
Nov 7, 2014
So I have a table with 2 fields.The first field has the addresses to multiple hyperlink paths to folders on my computer.In this field the display text matches the hyperlink paths.In the second field I have the desired display text for field 1.I have tried using an update query to either:
1) Change the display texts of field 1 to match field 2 while preserving the hyperlink path
2) Add the hyperlink path from field 1 to field 2 without altering the display name.
I cannot get either one to work. Upon updating field 1, I lose the path, and upon updating field 2, I lose the name.
View 3 Replies
View Related
Dec 3, 2014
I am generating a report that needs to have a hyperlink in part of one of the fields. Prior to saving the field to the database I do a bit of VBA coding on it and add some HTML. The result is this in the field:
"There are two ways to book with your preferred rate: <br>
1. <b><a href="http://hamptoninn.hilton.com/en/hp/reservations/index.jhtml?hotel=ABGVA&corporateCode=12345">Click Here</a></b>! <br>
2. Call us directly or at 1-800-Hampton and use your Corporate ID 12345."
It works beautifully if you paste it into a web page but in the Access report, Access applies the Bold but just ignores the hyperlink.
This is Access 2013 with MS SQL Server 2008 backend. Everything I have read suggests that this should work and is supported. Is there some trick I'm missing?
View 2 Replies
View Related
Mar 9, 2013
I'm using access 2007. I have a table with 2 fields:
phtolink - hyperlink
phtopath - text
I am loading the table with existing data from a spreadsheet. The hyperlink field imported correctly into phtolink.
Now I need to convert the hyperlink field to a text field that displays the path to the photo referenced by the hyperlink.
I updated the text field with the hyperlink field but it didn't display the hidden part of the hyperlink.
How do I convert a hyperlink to display the path in a text field?
View 3 Replies
View Related
Oct 15, 2013
I have a field in a Table (tblMainFile) named "File Location" which contains a hyperlink for each of the files.I have a continuous form (from a query) which displays information from the tblMainFile table.the form shows a text box (with the hyperlink) which is clickable to take them to the link location.I would like to have a button which says (GET FILE) or a different text box which simply says "Get File" as opposed to the entire hyperlink.
View 6 Replies
View Related
Sep 23, 2005
Please Does Anyone Know A Way To Send A Form , Like Copying Text, To Word Processor Programme Like Word For Example.is There A Programme To Do That? Thanx
View 2 Replies
View Related
Sep 8, 2014
In the Access Table, how does one Find and Replace part of the hyperlink if the Text to display is different?
Example of Hyperlink Editor:
Example of Find and Replace
In other words, I'd like to find FAKESERVER and replace it with C:Users in all 1000 records. Is there any possible way to do this if there is Text to display?
View 4 Replies
View Related
Jan 6, 2014
Im developing a database for work, I would like to provide a link on a form to run an external program. The form is call frmProfile. The table is called tblProfile and the hyperlink field is called link.
I would like a diaglog box to appear where the user can browse for the file and select it. Ive found various scripts but with my vb skills being very basic its no wonder im getting no joy.
I should add... each record has its own associated file. Its cctv footage which runs from the cctv systems own proprietary software. So its an individual filefor each record not just a program.
View 1 Replies
View Related
Sep 26, 2013
I have 2 databases (accdb). Both databases have a loading pop form. Also both databases include the following line of code when the loading form opens:
Code:
docmd.runcommand acCmdAppMinimize
This code works great when I open the databases individually. but my problem is that I have a label on the pop form in accdb 1 with its hyperlink address set to accdb 2 and the subaddress set to the macro name.The hyperlink opens the database 2 just fine and it opens the loading form but it doesn't minimize the application window.
View 1 Replies
View Related
Sep 26, 2013
I put in contracts in a form in Access.
Each contract has a Special ID. it's called mietvertragsnummerID (German Word).
Now i want by pressing a button, that for the choosen ID, a pdf, which gets saved in a seperate Folder, gets opened.
So i have the ID 18. (in the form in Access)
In the Folder M:FBGrimmSuW was saved the contract with the Name:
Mietvertrag18.
I've created the following code, but it doesn't work.
Code:
Private Sub Befehl4065_Click()
Dim sPath As String
sPath = "M:FBGrimmSuW" & "Mietvertrag" & Me.MietvertragsnummerID & ".pdf"
End Sub
View 2 Replies
View Related
Nov 14, 2014
I have a form titled 'New/Edit/Search Contractor Employee" that provides controls to fields within a table titled "Contractors". In this table, I have a Hyperlink field that will store the location of the files related to individual employees. On this form, I have a Control that (at the moment) the user can copy a Hyperlink and enter into this, to populate the field. This will then allow the user to click on this Hyperlink to open up the individual folder location to drag and drop whatever files they want associated to this individual record.
I have created a Command Button to automatically create a unique folder for this record, VBA below:
Private Sub Command168_Click()
strPath = "V:IntProdTrans&OpsTERMINALSDriver and Contractor Database 2014ContIndPW" & "" & txtCompanyID
If Len(Dir(strPath, vbDirectory)) = 0 Then
MkDir strPath
End If
strPath = "V:IntProdTrans&OpsTERMINALSDriver and Contractor Database 2014ContIndPW" & "" & txtCompanyID & "" & txtFirstName & " " & txtLastName
If Len(Dir(strPath, vbDirectory)) = 0 Then
MkDir strPath
End If
End Sub
What I'm trying to work out now is how to automatically enter this new folder location into the Control, which is then viewable and can be clicked on. I managed to do this (can't for the life of me remember how) but it entered the location as text and I wasn't able to click.
The Hyperlink control is titled 'Induction Paperwork' relates to a Hyperlink field.
View 1 Replies
View Related
Jan 20, 2015
I have a query which is a concatenated field of text and then a field from a table that has a hyperlink.
i.e 15mm predesigned mould Drw: [L:10527-123-A.pdf#L:10527-123-A.pdf#]
I want it to display in the query field as just the hyperlink
15mm predesigned mould Drw: [L:10527-123-A.pdf]
View 5 Replies
View Related
May 16, 2014
I'm trying to use ghudson's browse button in a form on MS Access. It works well, but I'm running into a tiny bug after implementing it into my database.
[URL] ....
I am able to browse, I am able to select a file, and am also able to have it display into the hyperlink textbox.
However, when I try to click on the hyperlink in the textbox, it does not take me to the file.
To fix the bug, and to get the hyperlink working again, I have to modify the hyperlink within the textbox, then bring it back as it was. (generally, I hit backspace, and replace the letter I removed.)
View 6 Replies
View Related
Aug 20, 2014
I am using the following vba code to create and send an html format email message. The key information in the email is a hyperlink to a network drive folder location using [Directory] as a hyperlink table value to get the address that is stored like this:
K:PipelinesP9 - TEP ProductsMOP AID-1500Final Approved
The email hyperlink that is produced looks like this:
#K:PipelinesP9_-_TEP_ProductsMOP_AID-
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Dim MOPVDB As String
MOPVDB = "H:PGADSBYMOP VALIDATIONTRACKINGMOPVDBMOP Validation DatabaseFE.accdb"
Set appOutLook = CreateObject("Outlook.Application")
[code]...
View 1 Replies
View Related
Aug 18, 2015
I am attempting to open a website hyperlink, some of the fields contain https:// and some of them dont.
Code:
Private Sub Facebookbut_Click()
Dim Hyper As String
If InStr([TEAMFacebook], "https") Then
Hyper = Me.TEAMFacebook
Else
Hyper = ("https://www.facebook.com/" & Me.TEAMFacebook)
End If
Application.FollowHyperlink Hyper
End Sub
So far this does 2 things, it doesn't open any hyperlinks at all and continues to attempt to until the program is closed from task manager. Before I had this error it would open the hyperlink twice if the field does not contain "https" and the IF statement was passed to the 2nd option.
View 14 Replies
View Related
Jan 17, 2014
I am trying to create a button that opens up a webpage. I get how to create a hyperlink on a button. The problem is, I need to open a specific page depending on the information in a text box.
The text box displays the tracking number for the current record. That number is populated automatically via a control source. The problem is that I need to open different web pages depending on the tracking number displayed. For example, UPS has a specific start to their number (1ZX....). Other trucking companies have a specific format, also.
So how do I tell it to look at the tracking number and then open the corresponding web page?
View 2 Replies
View Related
Nov 19, 2013
I am using MS Access 2010. I have a code that I am using that loops through a folder gather all the names of the files in the folder and inserts them into a table (shown below). The table is named "tblFiles" there are two columns in the table titled file name and file path. What I want to do is to also loop through the same folder to find the file path of the files and insert them into the file path column has a hyperlink where users can just click on the hyperlink and the file opens.
Private Sub Form_Load()
Dim fs, f, f1, fc, s
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("tblFiles")
[Code] .....
View 4 Replies
View Related