Edit Hyperlink Address

[TurboBeagle]

I am still a programming baby. I want a module that will update each fields hyperlink address. I can't seem to find the code that will specifically point to the hyperlink address property and then enable me to update the value. Any suggestions?

 

[mikemaki]

I don't know if this will help, but we just have a text box on a form whose source is a field defined as a hyperlink. We then depend on the user to type in the approprate path. A more progmamatic approach may be to build a string variable and set the hyperlink equal to that. For example:

String="http://www."
String=String & varaiblelinkdata
String=String & ".com"
hyperlink=string

 

[TurboBeagle]

HELPPP!!!!

Ok, I admit defeat. I don't seem to be able to get the Hyperlink object set. This is my code:

Public Function HyperlinkAddresses()


Dim DB As Database
Dim cs As TableDef
Dim cs2 As Recordset
Dim Field1 As Field
Dim links As Field
Dim Name As String
Dim Hyperlink1 As Hyperlink


Name = "http://65./CS/09-26-03/"
Set DB = CurrentDb

Set cs2 = DB.OpenRecordset("CS", dbOpenTable)

Set Hyperlink1 = ???????

cs2.MoveFirst

With cs2
Do While Not .EOF
Hyperlink2 = NAME & [Field1] & ".html"
.Edit
.Update
cs2.MoveNext
Loop
End With

cs2.Close


End Function

 

[mikemaki]

I'm not sure where hyperlink2 came from. It seems to me that Hyperlink1 should be in the assignment statement where Hyperlink2 is. Also, is it defined as a hyperlink in the table?

 

[TurboBeagle]

Yes, that is a typo, should say "1" instead of "2".

The field "LINKS" is formatted as a hyperlink. That is the source of my fustration. I can't say the field LINKS = 'address', wouldn't that change the value in the field instead of the field's hyperlink address?

Sorry for my stupidity, that's why I'm asking for help. Thanks much.