Monday, March 29, 2010

linkvalidation

function checkchar(txt)
{
var rt = true;
var iChars = "!@#$%^&*()+=-[]\\\';{}|\":<>?";

for (var i = 0; i < document.getElementById(txt).value.length; i++)
{
if (iChars.indexOf(document.getElementById(txt).value.charAt(i)) != -1)
{
rt = false;
}
}

return rt;
}

function checkurl(txt)
{
var rt = true;
var iChars = "!@#$%^&*()+=[]\\\';{}|\"<>?";

for (var i = 0; i < document.getElementById(txt).value.length; i++)
{
if (iChars.indexOf(document.getElementById(txt).value.charAt(i)) != -1)
{
rt = false;
}
}

return rt;
}
function isValidEmail(strEmail)
{
validRegExp = /^[^@]+@[^@]+.[a-z]{2,}$/i;
strEmail = document.getElementById(strEmail).value;

// search email text for regular exp matches
if (strEmail.search(validRegExp) == -1)
{
return false;
}
return true;
}

function disp_alert()
{

var title=document.getElementById('title').value;

if(title.indexOf(" ")== 0)
{
alert("Please Enter valid Title");
return false;
}
else if(document.getElementById('title').value=="")
{
alert("Please Enter Your Title")
document.getElementById('title').focus();
return false;
}
else if (!checkchar('title'))
{
alert("Invalid Title Please re-enter.");
document.getElementById('title').focus();
return (false)
}

var url=document.getElementById('url').value;

if(url.indexOf(" ")== 0 && url.indexOf("http://")!=0)
{
alert("Please Enter valid url 1");
return false;
}
else if(document.getElementById('url').value=="")
{
alert("Please Enter Your URL 2")
document.getElementById('url').focus();
return false;
}
else if (!checkurl('url'))
{
alert("Invalid Url Please re-enter.");
document.getElementById('url').focus();
return (false)
}
if(document.getElementById('category').value=="")
{
alert("Please Select Your Category")
document.getElementById('category').focus();
return false;
}
if(document.getElementById('e_mail').value=="")
{
alert("Please enter your email");
document.getElementById('e_mail').focus();
return false;
}
else if(!isValidEmail('e_mail'))
{
alert("Please enter valid Email");
document.getElementById('e_mail').focus();
return (false)
}


var res_link=document.getElementById('res_link').value;

if(url.indexOf(" ")== 0 && url.indexOf("http://")!=0)
{
alert("Please Enter valid Reciprocal Link");
return false;
}
else if(document.getElementById('res_link').value=="")
{
alert("Please Enter Reciprocal Link")
document.getElementById('res_link').focus();
return false;
}
else if (!checkurl('res_link'))
{
alert("Invalid Res_link Please re-enter.");
document.getElementById('res_link').focus();
return (false)
}
return true;
}


//function alphachk()
//
//{
// if((event.keyCode<65 || event.keyCode>90) && event.keyCode != 190 && event.keyCode != 8 && event.keyCode != 37 && event.keyCode != 38 && event.keyCode != 39 && event.keyCode != 40 && event.keyCode != 46 && event.keyCode != 13 && event.keyCode != 116 && event.keyCode != 16 && (event.keyCode <96 || event.keyCode > 122) && event.keyCode != 9 && event.keyCode != 110) event.returnValue = false
//
// }
//

mail function

<%
function sendmail(emailName)
Dim MyMail
Set CdoConf = Server.CreateObject ("CDO.Configuration")
set MyMail = Server.CreateObject("CDO.Message")
CdoConf.Fields( "http://schemas.microsoft.com/cdo/configuration/smtpserver" ) = "212.227.15.179"
CdoConf.Fields( "http://schemas.microsoft.com/cdo/configuration/smtpserverport" ) = 25
CdoConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") ="no-reply@rupizcompare.co.uk"
CdoConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") ="123459876"
CdoConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") =1
CdoConf.Fields( "http://schemas.microsoft.com/cdo/configuration/sendusing" ) = 2
CdoConf.Fields( "http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout" ) = 60
CdoConf.Fields.Update
'siteurl="http://172.16.0.5/mobile/mobilecentral/ask4phone/"
'siteurl="http://www.ask4phone.co.uk/Images/"
siteurl="http://172.16.0.5/mobile/mobilecentral/ask4phone/Images/Mail/"
'siteurl = "http://193.142.127.129/ask4PhoneImages/"

'errStr ="::: Ask 4 Phone ::: style=""padding:0px; margin:0px;"">
Please provide us following details so that we can provide you Free mobile comparison portal :
Your website URL on which you want to display the Mobile whitelabel
solution.
 
Your Website logo which will be displayed on the top of the header of
the website.
Now, For all your earnings till 31st January, 2009 you would get 20% more
Once you will provide us above mention details . Your website will be online within 24 hrs.
Regards
Ask4phone Team
0870034740
"
'siteurl = "http://193.142.127.129/ask4PhoneImages/"
errStr ="::: Ask 4 Phone ::: style=""padding:0px; margin:0px;"">

Please provide us with the following details so that we can process your request to offer you our Mobile Comparison Whitelabel Website absolutely Free!!

Domain name if you have one
Your Website logo
Once you will provide us with the above mentioned details. We can process to make your whitelabel website online within 24 hours of time.


Best Regards
Ask4phone Team
0870 034 7403

"

Set MyMail.Configuration = CdoConf
MyMail.From = "info@rupizinfotech.com"
MyMail.To = "y.kumar@rupizinfotech.com"
MyMail.Bcc = "info@free3gmobilephoneoffers.co.uk"
MyMail.Subject = "Ask4Phone"
MyMail.HTMLBody=errStr
MyMail.Send
Set objNewMail = Nothing
end function
%>

js

// Javascript BCMP
// Created By : Uttam Kumar
// Created on : 05th, Nov 2009

var wsUrl = "http://172.16.0.5/mobile/saf/rupizmobilesites/bestcontractmobilephone_test/";
//var wsUrl = "http://www.Bestcontractmobilephone.co.uk/";
function GetHttpObject(){
var xmlHttpObj;
try {
xmlHttpObj = new XMLHttpRequest();
return xmlHttpObj;
}
catch (e){
try{
xmlHttpObj = new ActiveXObject("Msxml2.XMLHTTP");
return xmlHttpObj;
}
catch (e){
try{
xmlHttpObj = new ActiveXObject("Microsoft.XMLHTTP");
return xmlHttpObj;
}
catch (e)
{
alert("Sorry, Your browser does not support AJAX!");
return null;
}
}
}
}

function headerfill(spnId, ctlId){
var xmlHttp;
var url = wsUrl + "ajax/headerfill.asp";
url=url + "?ctlId="+ctlId;
//alert(url);
url = url + "&rnd=" + Math.random();
xmlHttp = GetHttpObject();
xmlHttp.open("GET", url, true);
xmlHttp.onreadystatechange = function(){StateChanged(xmlHttp, spnId)};
xmlHttp.send(null);
}

function StateChanged(xmlHttp, spnId) {
if (xmlHttp.readyState == 4 || xmlHttp.readyState == "complete"){
document.getElementById(spnId).innerHTML = xmlHttp.responseText;
}else{
}
}

function headerphone(phonename){
if (phonename !="")
window.location.href="Phone_Deal.asp?Ph="+phonename;
}
function headergift(gift){
//alert(gift)
if(gift!="")
window.location.href="gift_deal.asp?gift="+gift;
}

Tuesday, March 23, 2010

// Javascript OMPS
// Created By : Uttam Kumar
// Created on : 16th, Feb 2010

var wsUrl = "http://172.16.0.5/mobile/saf/rupizmobilesites/ompsadmin/Description/";
//var wsUrl = "http://www.onlinemobilephoneshop.co.uk/admin/Description/";
function GetHttpObject(){
var xmlHttpObj;
try {
xmlHttpObj = new XMLHttpRequest();
return xmlHttpObj;
}
catch (e){
try{
xmlHttpObj = new ActiveXObject("Msxml2.XMLHTTP");
return xmlHttpObj;
}
catch (e){
try{
xmlHttpObj = new ActiveXObject("Microsoft.XMLHTTP");
return xmlHttpObj;
}
catch (e)
{
alert("Sorry, Your browser does not support AJAX!");
return null;
}
}
}
}

function fillrecycle(spnId, ctlId, manu){
var xmlHttp;
var url = wsUrl + "ajax/filldetail.asp";
url=url + "?ctlId="+ctlId;
url=url + "&manu="+manu;
url = url + "&rnd=" + Math.random();
xmlHttp = GetHttpObject();
xmlHttp.onreadystatechange = function(){StateChanged(xmlHttp, spnId)};
xmlHttp.open("GET", url , true);
xmlHttp.send(null);
}
function StateChanged(xmlHttp, spnId) {
if (xmlHttp.readyState == 4 || xmlHttp.readyState == "complete"){
document.getElementById(spnId).innerHTML = xmlHttp.responseText;
}else{// For Loading...
}
}

function recylefill(manu){
var xmlHttp;
var url = wsUrl + "ajax/filldetail.asp";
url=url + "?manu="+manu;
//alert(url);
url = url + "&rnd=" + Math.random();
xmlHttp = GetHttpObject();
xmlHttp.onreadystatechange = function(){StateChanged1(xmlHttp)};
xmlHttp.open("GET", url , true);
xmlHttp.send(null);
}

function StateChanged1(xmlHttp) {
if (xmlHttp.readyState == 4 || xmlHttp.readyState == "complete"){
document.getElementById("spnRecycleModel").innerHTML = xmlHttp.responseText;
}else{// For Loading...
}
}


<%
Id=request.QueryString("HandsetId")
conn.open MyDsn
HandsetId = Request.Form("phName")
If Request.Form("submit") <> "" Then
HandsetKeyFeatures = Replace(Request.Form("keyFeature"), "'", "''")
sql="Update tblHandsetKeyFeatures set UpdatedOn='" & now()& "' , HandsetKeyFeature='" & HandsetKeyFeatures & "' where HandsetId="&Id
conn.execute(sql)
response.Redirect("veiwHandsetKeyFeatures.asp?msg=Updated Successfully.")
end if
sql="select * from tblHandsetKeyFeatures where HandsetId="&Id
set rs = conn.execute(sql)

%>







<%=msg%>
Add
New Phone











<%
sql="select ph_name from saf_phone where ph_id="&rs("handsetid")
set rsPh =conn.execute(sql)
%>

<%set rsPh = nothing
%>













Handset Id
name="phid" type="text" class="field" id="phid" value="<%=rs("handsetid")%> " size="40" readonly="readonly"
Handset Name
input name="phname" type="text" class="field" id="phname" value="<%=rsPh("ph_name")%> " size="40" readonly="readonly"
Phone KeyFeatures
 

  




<%
conn.close
set conn = nothing
%>

Thursday, March 18, 2010

viewhadnsetkeyfeatures




<%
if request.QueryString("act")<>"" then
HandsetId=request.QueryString("HandsetId")
sqlid="update tblHandsetKeyFeatures set HKStatus= CASE when HKstatus='True' then 'False' when HKstatus='False' then 'True' end where HandsetId=" & HandsetId
conn.Open MyDsn
conn.execute(sqlid)
conn.close
set conn = nothing
if request.QueryString("act")="True" then
msg= "Phone Deactivated."
else
msg= "Phone Activated."
end if
response.Redirect("veiwHandsetKeyFeatures.asp?msg=" & msg)
end if
sqlrecord="select * from tblHandsetKeyFeatures order by KeyFeatureId"
Dim RecordPagecount,next10,Prev10,CurrPage
set rs = Server.CreateObject("ADODB.Recordset")
ConnectionLess rs, sqlrecord
%>

Admin Pannel :.





















<%
xx=1
Do Until rs.AbsolutePage <> CurrPage OR rs.Eof
xx=xx+1
if xx mod 2=0 then
bgcol="#E5E5E5"
else
bgcol="#FFFFFF"
End If
sql="select ph_name from saf_phone where ph_id="&rs("HandsetId")
Conn.open MyDsn
set rsPh = Conn.execute(sql)
if not rsPh.eof then
ph = rsPh("ph_name")
end if
conn.close
%>

td<%=bgcol%>" class="header4"> <%=rs("HandsetId")%>
td<%=bgcol%>" class="header4"> <%=ph%>
<%=bgcol%>" class="header4"><%=replace(rs("HandsetKeyFeature"),"
",vbcrlf)%>
<%=bgcol%>" class="header4"><%=rs("UpdatedOn")%>
<%=bgcol%>" class="header4"><"veiwHandsetKeyFeatures.asp?act=<%=trim(rs("HKStatus"))%>&psize=<%=psize%>&PageNo=<%=CurrPage%>&HandsetId=<%=rs("HandsetId")%>">
<% if rs("HKStatus")="True" then %>

<% else %>

<% end if %>

<%=bgcol%>"><%=psize%>&PageNo=<%=CurrPage%>&HandsetId=<%=rs("HandsetId")%>" class="header3">Update
<%
rs.movenext
loop
%>







<%=msg%>
HandsetId HandsetName HandsetKeyFeatures UpdatedDateTime Status Update

<%=PageNoShow("veiwHandsetKeyFeatures.asp?")%>   



<%
rs.close
set rs=nothing
set conn = nothing%>

addhandsetkeyfeatures



<%
if session("isadminloggedin")=true then
userid = 1
end if
conn.open MyDsn
Manufacturer = Request.Form("manufact")
HandsetId = Request.Form("phName")
HandsetKeyFeatures = Replace(Request.Form("ph_key"), "'", "''")

If Request.Form("submit") <> "" Then
sql="Exec [dbo].[USP_AddUpdHandsetKeyFeatures] 1,"& HandsetId &",'"& HandsetKeyFeatures &"','" & userid & "',1"
msg="Handset KeyFeatures added successfully for handset id= "& HandsetId
conn.execute sql
End if
%>
Admin Pannel :







<%=msg%>



Add
New Phone
















Manufacturer
Handset name
<%
if Request.form("manufact") <>"" then
sqlPHn="select distinct ph_id, ph_name from saf_phone where ph_id not in (select handsetId from tblHandsetKeyFeatures where manufacturer = '"& manufacturer &"') and manufacturer='"&Request.form("manufact")&"' order by ph_name asc"
else
sqlPHn="select distinct ph_id,ph_name from saf_phone where ph_Id=0"
end if
set rsPhn=conn.execute(sqlPHn)
%>
Phone KeyFeatures
 

  

<%conn.close%>

<% set conn = nothing %>


































































































































































































































paging

<%
dim psize
psize = 20
'Current Page No Check
If isEmpty(request.querystring("PageNo")) or request.QueryString("pageno")="" then
CurrPage = 1
else
CurrPage = Cint(request.querystring("PageNo"))
end if

'Setting Page Size
if request.Form("psize")<>"" then
psize=request.Form("psize")
elseif Request.QueryString("psize")<>"" then
psize=request.QueryString("psize")
end if

'Paging Function for Next and Previous 10
function getnext10(num)
pageLen = len(num)
if pageLen = 1 then
next10 = 10
elseif pageLen = 2 then
pageRem = 10
pageTen = right(num, 1)
next10 = num + pageRem - pageTen
elseif pageLen = 3 then
pageRem = 10
pageTen = right(num, 1)
next10 = num + pageRem - pageTen
end if
getnext10 = next10
end function

function getPrev10(num)
pageLen = len(num)
if pageLen = 1 then
Prev10 = 1
elseif pageLen = 2 then
firstDig = left(num, 1)
secondDig = right(num, 1)
Prev10 = num - secondDig - 10
elseif pageLen = 3 then
firstDig = left(num, 1)
secondDig = right(num, 2)
ThirdDig=right(secondDig,1)
Prev10 = num - ThirdDig - 10
end if
if Prev10 = 0 then
Prev10 = 1
end if
getPrev10 = Prev10
end function

function PageNoShow(PageName)
qry_search=server.URLEncode(qry_search)
RSPrevPage = CurrPage -1
RSNextPage = CurrPage + 1
if next10 > RecordPagecount then
next10 = RecordPagecount
end if
if Prev10 = 1 AND next10 - 1 < 10 then
start = 1
else
start = next10 - 10
if right(start, 1) > 0 then
start = replace(start, right(start, 1), "0")
start = start + 10
end if
end if

If RecordPagecount > 1 then
if next10 > 10 then
response.write("< & PageName & "site=" & SiteName & "&PageNo=" & Prev10 & "&qry_search=" & qry_search & "&cat=" & cat & "'> ")
end if
if not RSPrevPage = 0 then
response.write("   Previous   ")
end if
for P = start to next10
if not P = CurrPage then
response.write("" & P & " ")
else
response.write(" " & P & " ")
end if
Next
if not RSNextPage > RecordPagecount then
response.write("   Next   ")
end if
if not next10 = RecordPagecount then
response.write(" >>")
end if
end if
end function

%>

Tuesday, March 16, 2010

// JavaScript Document

var xmlHttp;
function ajaxFunction(){

try
{ // Firefox, Opera 8.0+, Safari
xmlHttp=new XMLHttpRequest();
}
catch (e)
{ // Internet Explorer
try
{
xmlHttp=new ActiveXObject("Msxml2.XMLHTTP");
}
catch (e)
{
try
{
xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");
}
catch (e)
{ alert("Not Support");
return false;
}
}
}
}

function ShowCategory(dvdid){
ajaxFunction();
/*xmlHttpLoginxmlHttp=GetxmlHttpObject();*/

if( xmlHttp == null)
{
return
}

var url="testcategory.asp";
url=url + "?ABC=" +dvdid;

url=url + "&sid="+Math.random()
alert(url);
xmlHttp.onreadystatechange = statechanged
xmlHttp.open("GET",url,true)
xmlHttp.send(null)

}
function statechanged()
{
//alert(xmlHttp.status );
if(xmlHttp.readyState == 4 || xmlHttp.readyState == "complete")
{
document.getElementById('0123').innerHTML=xmlHttp.responseText ;
}

}

function uploadcsv(category)
{
window.location.href ='uploadcsv.asp?category='+category;
}


function showProducts(subcategoryid)
{

ajaxFunction();
/*xmlHttpLoginxmlHttp=GetxmlHttpObject();*/

if( xmlHttp == null)
{

/*alert("BROWSER DOESN'T SUPPORT HTTP REQUEST");*/
return

}

var url="products.asp";
var subcatname = document.getElementById("subcategory").value;
var subdetails = subcatname.split("_");
var subcategoryid = subdetails[1];
var subsubcategoryid = subdetails[2];

url=url + "?subid=" + subcategoryid;
url=url + "&subsubcategoryid=" + subsubcategoryid;

url=url + "&xid="+Math.random()
//alert(url);
xmlHttp.onreadystatechange = statechanged2
xmlHttp.open("GET",url,true)
xmlHttp.send(null)

}

function statechanged2(){
if(xmlHttp.readyState == 4 || xmlHttp.readyState == "complete")
document.getElementById('0125').innerHTML=xmlHttp.responseText ;
else
document.getElementById('0125').innerHTML = "Loading...";
}

<%
arrCategory = Split(Request.QueryString("category"), "_")
if ubound(arrCategory) > 0 Then
CategoryId = arrCategory(1)
CategoryName = arrCategory(0)
SubcategoryId = arrCategory(2)
else
CategoryId = "0"
CategoryName = "Unknown"
SubcategoryId = "0"
End If

Response.Addheader "Content-Disposition", "online; filename=xpertProduct_"& Request.QueryString("category") &".csv"
'Response.ContentType = "application/download"
strURL = "http://www.find-services.co.uk/electric/elecsearch.aspx?site=xpert4u&maincategory="&CategoryId&"&keywords=&pricefrom=&priceto=&removedups=0&sort=&page=1&pagesize=10000&Category="&SubcategoryId
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.Open "GET", strURL, False
xml.Send
Set objXML = Server.CreateObject("Microsoft.XMLDOM")
Set objLst = Server.CreateObject("Microsoft.XMLDOM")
Set objHdl = Server.CreateObject("Microsoft.XMLDOM")
objXML.async = False

If xml.readyState = 4 Then
objXML.LoadXML(xml.responseText)
If objXML.parseError.errorCode <> 0 Then
End If
Set objLst = objXML.getElementsByTagName("item")
noOfHeadlines = objLst.length
cnt = 1
num = 4
x=""
For i = 0 To noOfHeadlines - 1
Set objHdl = objLst.item(i)
if Not objHdl.getElementsByTagName("urlMake") Is Nothing Then
imagemake=objHdl.getElementsByTagName("urlMake").item(0).text
x=x+imagemake+","
End If
if Not objHdl.getElementsByTagName("urlModel") Is Nothing Then
imagemodel=objHdl.getElementsByTagName("urlModel").item(0).text
x=x+ imagemodel +","
End If
if Not objHdl.getElementsByTagName("productName") Is Nothing Then
imageName=objHdl.getElementsByTagName("productName").item(0).text
imageName = replace(imageName," ","-")
x=x+ imageName +","
End If
' if Not objHdl.getElementsByTagName("price") Is Nothing Then
' imageprice=objHdl.getElementsByTagName("price").item(0).text
' x=x+ imageprice +","
' End If
if Not objHdl.getElementsByTagName("description") Is Nothing Then
productDescription=objHdl.getElementsByTagName("description").item(0).text
x=x+ productDescription +","
End If
if Not objHdl.getElementsByTagName("productName") Is Nothing Then
ProductName=objHdl.getElementsByTagName("productName").item(0).text
x=x+ ProductName +","
End If
x=x+"\n"+vbcrlf
Next
End If
response.Write(x)
response.End()
%>
<%
subcategoryId = Request.QueryString("subid")
subsubcategoryid =Request.QueryString("subsubcategoryid")

strURL = "http://www.find-services.co.uk/electric/elecsearch.aspx?site=xpert4u&maincategory=" + subcategoryId + "&keywords=" + "&pricefrom=&priceto=&removedups=0&sort=&page=1&pagesize=10000&category="&subsubcategoryid
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.Open "GET", strURL, False
xml.Send
Set objXML = Server.CreateObject("Microsoft.XMLDOM")
Set objLst = Server.CreateObject("Microsoft.XMLDOM")
Set objHdl = Server.CreateObject("Microsoft.XMLDOM")
objXML.async = False

If xml.readyState = 4 Then
objXML.LoadXML(xml.responseText)
If objXML.parseError.errorCode <> 0 Then
End If
Set objLst = objXML.getElementsByTagName("item")
noOfHeadlines = objLst.length
cnt = 1
num = 4
%>








<%

For i = 0 To noOfHeadlines - 1

Set objHdl = objLst.item(i)
if Not objHdl.getElementsByTagName("urlMake") Is Nothing Then
imagemake=objHdl.getElementsByTagName("urlMake").item(0).text
End If
if Not objHdl.getElementsByTagName("urlModel") Is Nothing Then
imagemodel=objHdl.getElementsByTagName("urlModel").item(0).text
End If
if Not objHdl.getElementsByTagName("productName") Is Nothing Then
imageName=objHdl.getElementsByTagName("productName").item(0).text
imageName = replace(imageName," ","-")
End If
if Not objHdl.getElementsByTagName("price") Is Nothing Then
imageprice=objHdl.getElementsByTagName("price").item(0).text
End If
if Not objHdl.getElementsByTagName("description") Is Nothing Then
productDescription=objHdl.getElementsByTagName("description").item(0).text
End If
if Not objHdl.getElementsByTagName("productName") Is Nothing Then
ProductName=objHdl.getElementsByTagName("productName").item(0).text
End If
%>








<%
Next
%>

 SN  Make  Model  ProductName  Description
<%=i%> <%=imagemake%> <%=imagemodel%> <%=productName%> <%=productDescription%>

<%
End If
%>
<%
Dim catID,strURL, xml,sitePATH

catID=Request.QueryString("ABC")

if catID="Books" then
strURL="http://www.find-services.co.uk/book/bookCategories.aspx?site=xpert4u"
group="category"
id=0
Tname=1
elseif catID="Electronics" then
strURL= "http://www.find-services.co.uk/electric/eleccategories.aspx?site=xpert4u&type=maincategories&category="
group="MainCategory"
id=0
Tname=1

elseif catID="Games" then
strURL="http://www.find-games.co.uk/services/gameplatforms.asp?site=xpert4u&type=category"
group="category"
id=0
Tname=0
' response.Write(strURL)
elseif catID="Movie" then
strURL="http://www.find-services.co.uk/dvd/dvdCategories.aspx?site=xpert4u"
group="category"
id=0
Tname=1

elseif catID = "Music" then 'Music Section

strURL = "http://www.find-services.co.uk/cd/cdCategories.aspx?site=xpert4u"
group = "category"
id = 0
Tname = 1


elseif catID = "Games_Platform" then 'Games Platform Section

strURL = "http://www.find-games.co.uk/services/gameplatforms.asp?site=xpert4u&type="
group = "gamePlatform"
id = 0
Tname = 1

elseif catID = "Electronics_Subcategory" then 'Electronics Subcategory Section
strURL = "http://www.find-services.co.uk/electric/eleccategories.aspx?site=xpert4u&type=subcategories&category="
subcategoryvar = catID
group = "Category"
id = 3
Tname = 2
subid = 0
End if
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.Open "GET", strURL, False
xml.Send
Set objXML = Server.CreateObject("Microsoft.XMLDOM")
Set objLst = Server.CreateObject("Microsoft.XMLDOM")
Set objHdl = Server.CreateObject("Microsoft.XMLDOM")
objXML.async = False

If xml.readyState = 4 Then
objXML.LoadXML(xml.responseText)
If objXML.parseError.errorCode <> 0 Then
End If
Set objLst = objXML.getElementsByTagName(group)
noOfHeadlines = objLst.length

%>

<%
End If
%>

Monday, March 15, 2010
































CATEGORY
SUB-CATEGORY

   
 

Friday, January 22, 2010

SP

set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
GO

-- =============================================
-- Author : Sumit
-- Optimised By : Ashutosh Yadav
-- Create date : 26 April 2007
-- Description : This procedure selects all merchants by status(0 = All, 1 = Active)
-- =============================================
ALTER PROCEDURE [dbo].[usp_GetAllMerchants]
@Status smallint
AS
BEGIN TRY
SET NOCOUNT ON;
IF @Status = 0
BEGIN
SELECT mm.*,am.AffNetworkName,(CASE MerchantStatus WHEN 1 THEN 'Active' WHEN 0 THEN 'InActive' when -1 then 'Recover' END) as MStatus,
(Case MerchantStatus when 1 then 'Deactivate' when 0 then 'Activate' when -1 then 'Recover' end) as Act,
(Case MerchantStatus when 1 then 'Delete' when 0 then 'Delete' end) as Del
FROM tblMerchantMaster mm INNER JOIN tblAffiliateNetworkMaster am ON am.AffiliateId = mm.AffiliateId Where mm.MerchantStatus = 0
END

ELSE IF @Status = 1
BEGIN
SELECT mm.*,am.AffNetworkName,(CASE MerchantStatus WHEN 1 THEN 'Active' WHEN 0 THEN 'InActive' when -1 then 'Recover' END) as MStatus,
(Case MerchantStatus when 1 then 'Deactivate' when 0 then 'Activate' when -1 then 'Recover' end) as Act,
(Case MerchantStatus when 1 then 'Delete' when 0 then 'Delete' end) as Del
FROM tblMerchantMaster mm INNER JOIN tblAffiliateNetworkMaster am ON am.AffiliateId = mm.AffiliateId
WHERE mm.MerchantStatus = 1
END

ELSE IF @Status = 2
BEGIN
SELECT mm.MerchantId,mm.MerchantName,am.AffNetworkName
FROM tblMerchantMaster mm INNER JOIN tblAffiliateNetworkMaster am ON am.AffiliateId = mm.AffiliateId
WHERE mm.MerchantStatus = 1
END
END TRY
BEGIN CATCH
insert into tbldberrorlog Values (ERROR_NUMBER(), ERROR_MESSAGE(), GETDATE(), 'usp_GetAllMerchants')
END CATCH

BLL_Affiliate.cs

using System;
using System.Data;
using System.Configuration;
using System.Data.SqlClient;
using Rupiz.SqlDatabaseHelper;

namespace Rupiz.AffiliateNetwork
{
public class BLL_AffiliateNetworkManagement
{

#region "Constructor"

private String _conString;
public BLL_AffiliateNetworkManagement()
{
try
{
if (ConfigurationManager.ConnectionStrings["strConnectionString"] != null)
{
_conString = ConfigurationManager.ConnectionStrings["strConnectionString"].ConnectionString;
}
else
{
throw new ApplicationException("Sorry, connection to database could not made");
}
}
catch
{
throw;
}
}

#endregion

#region "PROPERTIES"

private int? _affNetId = null;
public int? AffNetId
{
get { return _affNetId; }
set { _affNetId = value; }
}

private string _affNetName;
public string AffNetName
{
get { return _affNetName; }
set { _affNetName = value; }
}

private string _affNetUrl;
public string AffNetUrl
{
get { return _affNetUrl; }
set { _affNetUrl = value; }
}

private string _affNetDescription;
public string AffNetDescription
{
get { return _affNetDescription; }
set { _affNetDescription = value; }
}

private string _paymentMode;
public string PaymentMode
{
get { return _paymentMode; }
set { _paymentMode = value; }
}

private string _paymentGrace;
public string PaymentGrace
{
get { return _paymentGrace; }
set { _paymentGrace = value; }
}

private int? _status = null;
public int? Status
{
get { return _status; }
set { _status = value; }
}

private int? _userid = null;
public int? UserID
{
get { return _userid; }
set { _userid = value; }
}

#endregion

#region "FUNCTIONS"

public DataTable GetAllAffiliate()
{
try
{
DataSet ds = SqlHelper.ExecuteDataset(_conString, CommandType.StoredProcedure, "usp_GetAllAffiliate"); // Get Affiliates from database
if (ds != null)
{
DataTable dt = ds.Tables[0].Copy();
ds.Dispose();
return dt;
}
else
{
return (DataTable)null;
}
}
catch (Exception ex)
{
throw new Exception(ex.Message);
}
}

public void GetAffiliateById()
{
try
{
SqlParameter pAffId = SqlHelper.CreateParameter("@AffiliateId", AffNetId);
SqlParameter[] allParams = { pAffId };
DataSet ds = SqlHelper.ExecuteDataset(_conString, "usp_GetAffiliateById", pAffId); // Get Affiliates from database
if (ds != null)
{
if (ds.Tables[0].Rows.Count > 0)
{
DataRow dr = ds.Tables[0].Rows[0];
if (dr != null)
{
AffNetDescription = String.Empty;
if (dr["AffDescription"].ToString() != null)
{
AffNetDescription = dr["AffDescription"].ToString();
}
AffNetName = String.Empty;
if (dr["AffNetworkName"].ToString() != null)
{
AffNetName = dr["AffNetworkName"].ToString();
}
AffNetUrl = String.Empty;
if (dr["AffiliateUrl"].ToString() != null)
{
AffNetUrl = dr["AffiliateUrl"].ToString();
}
PaymentMode = String.Empty;
if (dr["PaymentMode"].ToString() != null)
{
PaymentMode = dr["PaymentMode"].ToString();
}
PaymentGrace = String.Empty;
if (dr["PaymentDate"].ToString() != null)
{
PaymentGrace = dr["PaymentDate"].ToString();
}
if (dr["AffiliateStatus"].ToString() != null)
{
Status = Convert.ToInt32(dr["AffiliateStatus"].ToString());
}
}
}
}
}
catch (Exception ex)
{
throw new Exception(ex.Message);
}
}

public int AddUpdAffiliate()
{
try
{
SqlParameter pAffiliateId = SqlHelper.CreateParameter("@AffiliateId", DBNull.Value);
if (AffNetId.HasValue)
{
pAffiliateId.Value = AffNetId.Value;
}
SqlParameter pNetworkName = SqlHelper.CreateParameter("@AffNetworkName", DBNull.Value);
if (AffNetName != string.Empty)
{
pNetworkName.Value = AffNetName;
}
SqlParameter pAffNetUrl = SqlHelper.CreateParameter("@AffiliateUrl", DBNull.Value);
if (AffNetUrl != string.Empty)
{
pAffNetUrl.Value = AffNetUrl;
}
SqlParameter pAffNetDescription = SqlHelper.CreateParameter("@AffDescription", DBNull.Value);
if (AffNetDescription != string.Empty)
{
pAffNetDescription.Value = AffNetDescription;
}
SqlParameter pPaymentMode = SqlHelper.CreateParameter("@PaymentMode", DBNull.Value);
if (PaymentMode != string.Empty)
{
pPaymentMode.Value = PaymentMode;
}
SqlParameter pPaymentGrace = SqlHelper.CreateParameter("@PaymentDate", DBNull.Value);
if (PaymentGrace != string.Empty)
{
pPaymentGrace.Value = PaymentGrace;
}
SqlParameter pModifiedBy = SqlHelper.CreateParameter("@ModifiedBy", DBNull.Value);
if (UserID.HasValue)
{
pModifiedBy.Value = UserID.HasValue;
}
SqlParameter pErr = SqlHelper.CreateParameter("@err", -1, ParameterDirection.Output);
SqlParameter pStatus = SqlHelper.CreateParameter("@AffiliateStatus", DBNull.Value);
if (Status.HasValue)
{
pStatus.Value = Status.Value;
}
// create array of parameters
SqlParameter[] allParams = { pAffiliateId, pNetworkName, pAffNetUrl, pAffNetDescription, pPaymentMode, pPaymentGrace, pModifiedBy, pStatus, pErr };

// store data into the database
SqlHelper.ExecuteNonQuery(_conString, CommandType.StoredProcedure, "usp_AddUpdAffiliate", allParams);

// return the error number (0,1)
int result = -1;
if (pErr.Value != null)
{
result = (int)pErr.Value;
}
return result;

}
catch (Exception ex)
{
throw new Exception(ex.Message);
}

}

public DataTable GetAffiliateNetworkByStatus(int Status)
{
try
{
SqlParameter statusAff = SqlHelper.CreateParameter("@AffiliateStatus", Status);
SqlParameter[] allParams = { statusAff };
// store data into the database
DataSet ds = SqlHelper.ExecuteDataset(_conString, CommandType.StoredProcedure, "usp_GetAllAffiliateByStatus", allParams);
// return the error number (0,1)
if (ds != null)
{
DataTable dt = ds.Tables[0].Copy();
ds.Dispose();
return dt;
}
else
{
return (DataTable)null;
}
}
catch (Exception ex)
{
throw new Exception(ex.Message);
}
}

//public int AddAffiliateNetwork()
//{
// try
// {
// // create parameters
// SqlParameter affNetworkName = SqlHelper.CreateParameter("@AffNetworkName", AffNetName);
// SqlParameter affiliateUrl = SqlHelper.CreateParameter("@AffiliateUrl", AffNetUrl);
// SqlParameter affDescription = SqlHelper.CreateParameter("@AffDescription", AffNetDescription);
// SqlParameter paymentMode = SqlHelper.CreateParameter("@PaymentMode", PaymentMode);
// SqlParameter paymentDate = SqlHelper.CreateParameter("@PaymentDate", PaymentGrace);
// SqlParameter modifiedBy = SqlHelper.CreateParameter("@ModifiedBy", UserID);
// SqlParameter pErr = SqlHelper.CreateParameter("@err", -1, ParameterDirection.Output);
// // create array of parameters
// SqlParameter[] allParams = { affNetworkName, affiliateUrl, affDescription, paymentMode, paymentDate, modifiedBy, pErr };

// // store data into the database
// SqlHelper.ExecuteNonQuery(_conString, CommandType.StoredProcedure, "usp_AddNewAffiliate", allParams);

// // return the error number (0,1)
// int result = -1;
// if (pErr.Value != null)
// {
// result = (int)pErr.Value;
// }
// return result;

// }
// catch (Exception ex)
// {
// throw new Exception(ex.Message);
// }

//}

//public int UpdateAffiliateNetworkStatus()
//{
// try
// {
// // create parameters
// SqlParameter affNetworkId = SqlHelper.CreateParameter("@AffiliateId", AffNetId);
// SqlParameter affStatus = SqlHelper.CreateParameter("@AffiliateStatus", Status);
// SqlParameter modifiedBy = SqlHelper.CreateParameter("@ModifiedBy", UserID);
// SqlParameter pErr = SqlHelper.CreateParameter("@err", -1, ParameterDirection.Output);
// // create array of parameters
// SqlParameter[] allParams = { affNetworkId, affStatus, modifiedBy, pErr };
// // store data into the database
// SqlHelper.ExecuteNonQuery(_conString, CommandType.StoredProcedure, "usp_UpdateAffiliate", allParams);
// // return the error number (0,1)
// int result = -1;
// if (pErr.Value != null)
// {
// result = (int)pErr.Value;
// }
// return result;

// }
// catch (Exception ex)
// {
// throw new Exception(ex.Message);
// }

//}

//public int UpdateAffiliateNetwork()
//{
// try
// {
// // create parameters
// SqlParameter affNetworkId = SqlHelper.CreateParameter("@AffiliateId", AffNetId);
// SqlParameter affiliateUrl = SqlHelper.CreateParameter("@AffiliateUrl", AffNetUrl);
// SqlParameter affDescription = SqlHelper.CreateParameter("@AffDescription", AffNetDescription);
// SqlParameter paymentMode = SqlHelper.CreateParameter("@PaymentMode", PaymentMode);
// SqlParameter paymentDate = SqlHelper.CreateParameter("@PaymentDate", PaymentGrace);
// SqlParameter modifiedBy = SqlHelper.CreateParameter("@ModifiedBy", UserID);
// SqlParameter statusAff = SqlHelper.CreateParameter("@AffiliateStatus", Status);
// SqlParameter pErr = SqlHelper.CreateParameter("@err", -1, ParameterDirection.Output);

// // create array of parameters
// SqlParameter[] allParams = { affNetworkId, affiliateUrl, affDescription, paymentMode, paymentDate, modifiedBy, statusAff, pErr };

// // store data into the database
// SqlHelper.ExecuteNonQuery(_conString, CommandType.StoredProcedure, "usp_UpdateAffiliate", allParams);

// // return the error number (0,1)
// int result = -1;
// if (pErr.Value != null)
// {
// result = (int)pErr.Value;
// }
// return result;
// }
// catch (Exception ex)
// {
// throw new Exception(ex.Message);
// }
//}


#endregion
}
}

view-editAffiliate.aspx.cs

using System;
using System.Data;
using System.Configuration;
using System.Collections;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using Rupiz.Security;
using Rupiz.AffiliateNetwork;


public partial class UI_EditAffiliateView : System.Web.UI.Page
{

private BLL_AffiliateNetworkManagement affNetwork = null;
private AuthorizeAccess access = null;

protected void Page_Load(object sender, EventArgs e)
{
try
{
//lblMsg.Text = String.Empty;
//lblEditAffName.Focus();
access = new AuthorizeAccess();
affNetwork = new BLL_AffiliateNetworkManagement();
if (Request.QueryString["AffId"] != null)
{
ViewState["AffId"] = access.Decrypt(Request.QueryString["AffId"].ToString());
if (!IsPostBack)
{
GetAffDetails();
}
}
else
{
Response.Redirect(Page.ResolveUrl(String.Format("~/Admin/AffiliateNetwork/ViewAffNetworks.aspx?mid={0}&eId={1}", Server.UrlEncode(access.Encrypt("20")), Server.UrlEncode(access.Encrypt("19")))));
}
}
catch (Exception ex)
{
lblMsg.Text = ex.Message;
}
}

private void GetAffDetails()
{
try
{

affNetwork.AffNetId = Convert.ToInt32(ViewState["AffId"].ToString());//Convert.ToInt32(Request.QueryString["affId"]);
affNetwork.GetAffiliateById();
txtEditAffDes.Text = affNetwork.AffNetDescription;
lblEditAffName.Text = affNetwork.AffNetName;
txtEditAffUrl.Text = affNetwork.AffNetUrl;
txtEditPaymentDate.Text = affNetwork.PaymentGrace;
rbtnEditAffPaymentmode.SelectedValue = affNetwork.PaymentMode;
if (affNetwork.Status == 1)
{
rdoActive.Checked = true;
}
else if (affNetwork.Status == 0)
{
rdoInactive.Checked = true;
}
else
{
rdoDeleted.Checked = true;
}
}
catch (Exception ex)
{
lblMsg.Text = ex.Message;
}
}

private bool ValidateForm()
{
if ((!rdoActive.Checked) && (!rdoInactive.Checked) && (!rdoDeleted.Checked))
{
lblMsg.Text = "The affiliate network status cannot be left unselect";
return false;
}
return true;
}

protected void btnUpdateAff_Click(object sender, EventArgs e)
{
try
{
if (Page.IsValid)
{
if (ValidateForm())
{
affNetwork.AffNetId = Convert.ToInt32(ViewState["AffId"].ToString()); //Convert.ToInt32(Request.QueryString["affId"]);
affNetwork.AffNetDescription = txtEditAffDes.Text.Trim();
affNetwork.AffNetUrl = txtEditAffUrl.Text.Trim();
affNetwork.UserID = Convert.ToInt32(Session["UserId"]);
affNetwork.PaymentMode = rbtnEditAffPaymentmode.SelectedValue.Trim();
affNetwork.PaymentGrace = txtEditPaymentDate.Text.Trim();
if (rdoActive.Checked)
{
affNetwork.Status = 1; // Active
}
else if (rdoInactive.Checked)
{
affNetwork.Status = 0; // Inactive
}
else
{
affNetwork.Status = -1; // Deleted
}
int result = affNetwork.AddUpdAffiliate();
if (result == 0)
{
if (Request.QueryString["eId"] != null)
{
Response.Redirect("ViewAffNetworks.aspx?mid=" + Server.UrlEncode(Request.QueryString["mid"].ToString()) + "&eId=" + Server.UrlEncode(Request.QueryString["eId"].ToString()) + "&UMsg=0", false);
}
else
{
Response.Redirect("ViewAffNetworks.aspx?mid=" + Server.UrlEncode(Request.QueryString["mid"].ToString()) + "&AffId=" + Server.UrlEncode(Request.QueryString["AffId"].ToString()) + "&UMsg=0", false);
}
//lblMsg.Text = "Record Updated Sucessfully";
}
else if (result == 1)
{
lblMsg.Text = "Error Occured!! Try Again";
}
else if (result == 2)
{
lblMsg.Text = "Affiliate Network Name exsists choose another name!!";
}
}
}
}
catch (Exception ex)
{
lblMsg.Text = ex.Message;
}
}
}

editAffiliate.aspx.cs

using System;
using System.Data;
using System.Configuration;
using System.Collections;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using Rupiz.Security;
using Rupiz.AffiliateNetwork;


public partial class Admin_ProductMgmt_ViewAffDetail : System.Web.UI.Page
{
private BLL_AffiliateNetworkManagement affNetwork = null;
private AuthorizeAccess access = null;

protected void Page_Load(object sender, EventArgs e)
{
try
{
lblMsg.Text = String.Empty;
access = new AuthorizeAccess();
affNetwork = new BLL_AffiliateNetworkManagement();
if (Request.QueryString["AffId"] != null)
{
ViewState["AffId"] = access.Decrypt(Request.QueryString["AffId"].ToString());
if (!IsPostBack)
{
GetAffDetails();
}
}
else
{
Response.Redirect(Page.ResolveUrl(String.Format("~/Admin/AffiliateNetwork/ViewAffNetworks.aspx?mid={0}&eId={1}", Server.UrlEncode(access.Encrypt("20")), Server.UrlEncode(access.Encrypt("19")))));
}
}
catch (Exception ex)
{
lblMsg.Text = ex.Message;
}
}

private void GetAffDetails()
{
try
{
affNetwork.AffNetId = Convert.ToInt32(ViewState["AffId"].ToString());//Convert.ToInt32(Request.QueryString["affId"]);
affNetwork.GetAffiliateById();

lblAffNetDesc.Text = affNetwork.AffNetDescription;
lblAffNetName.Text = affNetwork.AffNetName;
lblAffNetUrl.Text = affNetwork.AffNetUrl;
lblPaymentDate.Text = affNetwork.PaymentGrace;
lblPaymentBy.Text = affNetwork.PaymentMode;
if (affNetwork.Status == 1)
{
lblStatus.Text = "Active";
}
else if (affNetwork.Status == 0)
{
lblStatus.Text = "Inactive";
}
else
{
lblStatus.Text = "Deleted";
}
}
catch (Exception ex)
{
lblMsg.Text = ex.Message;
}
}
protected void btnBack_Click(object sender, EventArgs e)
{
try
{
if (Request.QueryString["eId"] != null)
{
Response.Redirect("ViewAffNetworks.aspx?mid=" + Server.UrlEncode(Request.QueryString["mid"].ToString()) + "&eId=" + Server.UrlEncode(Request.QueryString["eId"].ToString()));
}
else if (Request.QueryString["vId"] != null)
{
Response.Redirect(Page.ResolveUrl("~/admin/MerchantMgmt/ViewMerchants.aspx?mid=" + Server.UrlEncode(Request.QueryString["mid"].ToString()) + "&eId=" + Server.UrlEncode(Request.QueryString["vId"].ToString())), false);
}
else
{
Response.Redirect("ViewAffNetworks.aspx?mid=" + Server.UrlEncode(Request.QueryString["mid"].ToString()), false);
}
}
catch (Exception ex)
{
lblMsg.Text = ex.Message;
}
}
}

addAffiliate.aspx.cs

using System;
using System.Data;
using System.Configuration;
using System.Collections;
using System.Web;
using System.Drawing;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using Rupiz.AffiliateNetwork;

public partial class UI_AddAffiliateNetwork : System.Web.UI.Page
{

private BLL_AffiliateNetworkManagement affNetwork = null;

protected void Page_Load(object sender, EventArgs e)
{
try
{
lblMsg.Text = String.Empty;
affNetwork = new BLL_AffiliateNetworkManagement();
}
catch (Exception ex)
{
lblMsg.Text = ex.Message;
}
}

protected void btnAdd_Click(object sender, EventArgs e)
{
try
{
AddAffiliate();
}
catch (Exception ex)
{
lblMsg.Text = ex.Message;
}
}

protected void btnClear_Click(object sender, EventArgs e)
{
try
{

txtAffDescription.Text = String.Empty;
txtAffNetName.Text = String.Empty;
txtAffNetUrl.Text = String.Empty;
txtPaymentDate.Text = String.Empty;
}
catch (Exception ex)
{
lblMsg.Text = ex.Message;
}
}

#region User Defined Functions

protected void AddAffiliate()
{
try
{
if (Page.IsValid)
{
affNetwork.AffNetDescription = txtAffDescription.Text.Trim();
affNetwork.AffNetName = txtAffNetName.Text.Trim();
affNetwork.AffNetUrl = txtAffNetUrl.Text.Trim();
affNetwork.UserID = Convert.ToInt32(Session["UserId"].ToString());
affNetwork.PaymentMode = rbtnlstPaymentBy.SelectedValue.Trim();
affNetwork.PaymentGrace = txtPaymentDate.Text.Trim();
int result = affNetwork.AddUpdAffiliate();
if (result == 0)
{
Response.Redirect("ViewAffNetworks.aspx?mid=" + Server.UrlEncode(Request.QueryString["mid"].ToString()) + "&AMsg=1");
}
else if (result == 2)
{
lblMsg.Font.Bold = true;
lblMsg.ForeColor = Color.Red;
lblMsg.Text = "Affiliate Network Name Exsists Choose another Name!!";
}
else
{
lblMsg.Font.Bold = true;
lblMsg.ForeColor = Color.Red;
lblMsg.Text = "Error Occured!!!! Try Again..";
}
}
}
catch (Exception ex)
{
lblMsg.Text = ex.Message;
}
}

#endregion


protected void btnBack_Click(object sender, EventArgs e)
{
try
{
Response.Redirect("ViewAffNetworks.aspx?mid="+Server.UrlEncode(Request.QueryString["mid"].ToString()));
}
catch(Exception ex)
{
lblMsg.Text = ex.Message;
}
}
}

Thursday, January 21, 2010