Okay, partly sussed it:
In the Sub Handle_OITEMS I addeddim Mycatid, Myisql, Myoriginsite, Rsmyitems
then just after ISql=Isql & Orderid
I addedMyisql="select other2 from orders where orderid="
If Getsess("oid")<>"" then
Orderid=GetSess("oid")
else
Orderid=recordid
end if
Myisql=Myisql & Orderid
Set Rsmyitems=myconn.execute(Myisql)
Myoriginsite=Rsmyitems("other2")
Rsmyitems.close
(other2 contains the url of the site).
Then afterIf getconfig("xDisplayPrices")<>"No" then
Body = Body & getlang("LangProductPrice") & ": " & shopformatcurrency(RSItems("unitprice"),getconfig("xdecimalpoint")) & CR
end if
I added Body = Body & "<a href=""http://www." & Myoriginsite & "/shopreviewadd.asp?id=" & Mycatid & """>Write a review for this item here»</a>" & CR
and now in the message template there is a direct link to the write review page for that item.
Next task it set up a marker in the orders table and a page to send the email from.
Steve
Sex toys from a UK sex shop including vibrators and dildos.