|
seanfitzpatrick
Starting Member
14 Posts |
 Posted - April 18 2010 : 19:29:19
|
I tried to utilize the new xUniqueFrontpageHeader and xUniqueFrontpageFooter variables within the configuration but it appears to not only change the front page, but all subsequent pages as well. I went in and changed the default.asp to call ShopFrontPageHeader instead of ShopPageHeader and this seemed to rectify the issue for the time being.
Are these new variables working as intended? I did not see any documentation on this in either the manual or knowledge base.
Thanks,
Sean Fitzpatrick
Support Team
Krack Media, LLC
***********************************
http://www.KrackMedia.com
Building More Than Web Sites
. . . Building a Web Presence |
|
|
support
Administrator
4679 Posts |
Posted - April 18 2010 : 20:58:29
|
Hi Sean,
We will be releasing an update for this shortly.
Or you can apply the following:
1. Open default.asp
2. Change all ShopPageHeader to ShopFrontPageHeader
3. Save
4. Open shopheaders.asp
5. Modify routine shoppageheader, as below:
sub ShopFrontPageHeader
if GetConfig("xaffheaders")="Yes" then
dim filename, affid, rc
affid=GetSess("affid")
if affid<>"" then
filename=xMySite2 & "/templates/" & getconfig("xtemplate") & "/aff" & affid &"_header.htm"
Shopspecialheader filename, rc
if rc=0 then exit sub
end if
end if
setsess "fromquickorder",""
'700 - Moving to template
'700 - layout manager enhancement - 2010.03.01
if getconfig("xUniqueFrontpageHeader") <> "" then
dyninclude xMySite2 & "/templates/" & getconfig("xtemplate") & "/"& getconfig("xUniqueFrontpageHeader") &""
else
dyninclude xMySite2 & "/templates/" & getconfig("xtemplate") & "/shoppage_header.htm"
end if
end sub
6. Modify routine ShopPageHeader, as below:
sub ShopPageHeader
if GetConfig("xaffheaders")="Yes" then
dim filename, affid, rc
affid=GetSess("affid")
if affid<>"" then
filename=xMySite2 & "/templates/" & getconfig("xtemplate") & "/aff" & affid &"_header.htm"
Shopspecialheader filename, rc
if rc=0 then exit sub
end if
end if
setsess "fromquickorder",""
'700 - Moving to template
dyninclude xMySite2 & "/templates/" & getconfig("xtemplate") & "/shoppage_header.htm"
end sub
7. Modify routine ShopFrontPageTrailer, as below:
sub ShopFrontPageTrailer
if GetConfig("xaffheaders")="Yes" then
dim filename, affid, rc
affid=GetSess("affid")
if affid<>"" then
filename=xMySite2 & "/templates/" & getconfig("xtemplate") & "/aff" & affid & "_trailer.htm"
Shopspecialheader filename, rc
if rc=0 then exit sub
end if
end if
'700 - Moving to template
'700 - layout manager enhancement - 2010.03.01
if getconfig("xUniqueFrontpageFooter") <> "" then
dyninclude xMySite2 & "/templates/" & getconfig("xtemplate") & "/"& getconfig("xUniqueFrontpageFooter") &""
else
dyninclude xMySite2 & "/templates/" & getconfig("xtemplate") & "/shoppage_trailer.htm"
end if
end sub
8. Modify routine ShopPageTrailer, as below:
sub ShopPageTrailer
if GetConfig("xaffheaders")="Yes" then
dim filename, affid, rc
affid=GetSess("affid")
if affid<>"" then
filename=xMySite2 & "/templates/" & getconfig("xtemplate") & "/aff" & affid & "_trailer.htm"
Shopspecialheader filename, rc
if rc=0 then exit sub
end if
end if
'700 - Moving to template
dyninclude xMySite2 & "/templates/" & getconfig("xtemplate") & "/shoppage_trailer.htm"
end sub
9. Save & test.
Thanks
Cam
VPASP Support |
 |
|
All Forums
xUniqueFrontpageHeader working as intended?
New Topic
Printer Friendly
Topic 
TrustGuard - PCI Security Scanner
