Update hyperlink path

[jumbledore]

I had created an access database to store path names of files on my local drive using the below vba code:

Dim rst As dao.Recordset

Set rst = MyDB.OpenRecordset("MyTable", dbOpenDynaset, dbAppendOnly)

With rst
. AddNew
! [File_path] ="Link" & "#c:\myfiles#"
.Update

rst.Close


I have only mentioned the code relevant to my question and have left out the other details. The code works fine and I have updated more than 2000 records using it but now I want to change the path of the hyperlink from "#c:\myfiles#" to "#c:\thosefiles#"
How do I do so?

Thanks

 

[stumac]

It can be done in an update query:

UPDATE MyTable SET File_Path = Replace([File_Path],"c:\myfiles","c:\thosefiles");

Or in VBA (Untested)

Sub UpdateFilePath()
Dim rs1 As Recordset
 Set rs1 = CurrentDb.OpenRecordset("MyTable")
    With rs1
        Do Until .EOF = True
        .Edit
        !File_Path = Replace(!File_Path, "c:\myfiles", "c:\thosefiles")
        .Update
        .MoveNext
        Loop
     End With
Set rs1 = Nothing
End Sub

 

[jumbledore]

It can be done in an update query:

UPDATE MyTable SET File_Path = Replace([File_Path],"c:\myfiles","c:\thosefiles");

Or in VBA (Untested)

Sub UpdateFilePath()
Dim rs1 As Recordset
 Set rs1 = CurrentDb.OpenRecordset("MyTable")
    With rs1
        Do Until .EOF = True
        .Edit
        !File_Path = Replace(!File_Path, "c:\myfiles", "c:\thosefiles")
        .Update
        .MoveNext
        Loop
     End With
Set rs1 = Nothing
End Sub

Sorry but your solution doesn't work. I tried running the SQL query for 1 record. It gave me a message saying that it was updating a record but when I checked, the link still points to the previous path name.

 

[stumac]

Sorry but your solution doesn't work. I tried running the SQL query for 1 record. It gave me a message saying that it was updating a record but when I checked, the link still points to the previous path name.

Works in Access 2016 (just tested) and has previously worked for me in previous versions.

How are you limiting to one record, are you sure the record you are limiting it to includes the string being replaced?

 

[jumbledore]

Works in Access 2016 (just tested) and has previously worked for me in previous versions.

How are you limiting to one record, are you sure the record you are limiting it to includes the string being replaced?

I am using version 2007 but just to let you know that the field "File_path" displays the hyperlink as"Link" and not the actual path name.

 

[stumac]

Yeah it should still work... see this test file: https://app.box.com/s/spld5dniv788m0j4eg94dg4r4h52snfo

The Query ShowAddress will show you the filepath before you update. Then run the update and it should show the new value.

 

[jumbledore]

Yeah it should still work... see this test file: https://app.box.com/s/spld5dniv788m0j4eg94dg4r4h52snfo

The Query ShowAddress will show you the filepath before you update. Then run the update and it should show the new value.

Thanks it worked!