I have a form with a web browser control.
The page that we access through this control, is designed to open the links in a new tab.
When I browse to this page in web browser control and click a link, the target page is opened in a new window out side of Access. (mostly with an error, sometimes successful)
Is there any way to force the link open in the same web browser control (and not a new window outside of Access)?
Some Sample link on the page: (254915390 is the order number.)
The execSearch Function:
We are on Microsoft 365, (not the latest version). So the Web Browser control is not the new version that was released a while back.
If updating to latest version can be a key point to solve the problem, certainly we will do.
Thanks for your time and help.
PS:
We also receive a csv file that contains Order Numbers. We have a query linked to this csv file and we know the links on the page.
It means that we have all the links (Order Numbers) on the page, listed in a combo box.
I was thinking to use the combo box to navigate the web browser control to the page by running the JavaScript in VBA.
The page that we access through this control, is designed to open the links in a new tab.
When I browse to this page in web browser control and click a link, the target page is opened in a new window out side of Access. (mostly with an error, sometimes successful)
Is there any way to force the link open in the same web browser control (and not a new window outside of Access)?
Some Sample link on the page: (254915390 is the order number.)
HTML:
<td align="LEFT" bgcolor="lavender" nowrap="">
<a href="JavaScript:execSearch('1','254915390','502017','1','kc')" onclick="return screenEnabled(ScreenEnabled);">254915390</a>
<input type="hidden" name="ACCCD1" value="19017">
<input type="hidden" name="CUSTCD1" value="502017">
<input type="hidden" name="ODRNO1" value="254915390">
<input type="hidden" name="DISTNO1" value="1">
<input type="hidden" name="CHKFLG1" value="">
</td>
The execSearch Function:
JavaScript:
function execSearch(nbr){
document.ODRFM.nextURL.value = "TServletKc100";
document.ODRFM.ACCCD.value = document.ODRFM["ACCCD" + nbr].value;
document.ODRFM.CUSTCD.value = document.ODRFM["CUSTCD" + nbr].value;
document.ODRFM.ODRNO.value = document.ODRFM["ODRNO" + nbr].value;
document.ODRFM.DISTNO.value = document.ODRFM["DISTNO" + nbr].value;
document.ODRFM.action = "/suppo/servlet/EdiGate_T";
document.ODRFM.target = "_blank";
document.ODRFM.submit();
}
We are on Microsoft 365, (not the latest version). So the Web Browser control is not the new version that was released a while back.
If updating to latest version can be a key point to solve the problem, certainly we will do.
Thanks for your time and help.
PS:
We also receive a csv file that contains Order Numbers. We have a query linked to this csv file and we know the links on the page.
It means that we have all the links (Order Numbers) on the page, listed in a combo box.
I was thinking to use the combo box to navigate the web browser control to the page by running the JavaScript in VBA.
Last edited: