WineBiz.co.za / Suppliers Guide

<%@ Language="JavaScript" %> <% function GetList(){ var sqlList='SELECT AccountUsers.CompanyName AS CompanyName'; sqlList+=',AccountUsers.CompanyContactPerson AS CompanyContactPerson'; sqlList+=',AccountUsers.CompanyEmail AS CompanyEmail'; sqlList+=',AccountUsers.CompanyTelephone AS CompanyTelephone'; sqlList+=',AccountUsers.CompanyFax AS CompanyFax'; sqlList+=',AccountUsers.CompanyWebSite AS WebAddress'; sqlList+=',CountryCode.Description AS CountryName'; sqlList+=',RspDetail.RspListCode AS ListCode'; sqlList+=',RspDetail.Description AS RspDesc'; sqlList+=',RspTypeCode.Description AS ServiceType'; sqlList+=' FROM AccountUsers'; sqlList+=' INNER JOIN ((RspDetail INNER JOIN RspList'; sqlList+=' ON RspDetail.RspListCode = RspList.RspDetailCode)'; sqlList+=' INNER JOIN RspTypeCode'; sqlList+=' ON RspList.RspTypeCode = RspTypeCode.RspTypeCode)'; sqlList+=' ON AccountUsers.AccountNumber = RspDetail.ListAccount'; sqlList+=' INNER JOIN CountryCode'; sqlList+=' ON RspDetail.CountryCode = CountryCode.CountryCode'; sqlList+=' WHERE (((RspDetail.RspListCode)=\''+RspDetail+'\'))'; OpenRecordSet('rsList',sqlList,'Conn'); } // ================ Begin ================ var LoginCookie=new String(Request.Cookies("CLoginGood")); var LoginVars=new Array(); LoginVars=LoginCookie.split("#"); var LoginGood=LoginVars[0] var AccountNumber=LoginVars[1]; var RspDetail=Request("List"); OpenDatabase('Conn'); var Button=Request("Button"); if (Button=="Back"){ Response.Redirect('rsp.asp'); } if (ParamGood(RspDetail)){ GetList(); } else{ Response.Redirect('rsp.asp'); } // ================ End ================ %> WineBiz.co.za / Suppliers Guide

Sorry, this page is currently unavailable
Please call us for more info on the subject

Tel: 0861 2 CADEK (22335)
Fax: +27 21 8554745
Box 5111, Helderberg, 7135
No 2 Nobel Park, 9 Nobel St, The Interchange,
Somerset West, South Africa