Ricami da scaricare

<% Function getDateString(ByVal theDate, ByVal strDateSeparator) Dim strDateString Dim strYear, strMonth, strDay If IsDate(theDate) Then strYear = Year(theDate) strMonth = Month(theDate) strDay = Day(theDate) If Len(strYear) = 2 Then strYear = "20" & strYear If Len(strMonth) = 1 Then strMonth = "0" & strMonth If Len(strDay) = 1 Then strDay = "0" & strDay strDateString = strYear & strDateSeparator & strMonth & strDateSeparator & strDay Else strDateString = theDate End If getDateString = strDateString End Function Function isValidKeys(ByVal sentkey1, ByVal sentkey2) Dim calldate, cy, cm, cd, ctot, pipart, random1,temp2 Dim sentkey2_1 Dim bOk : bOk = False temp2=sentkey2 If Not IsNumeric(temp2) Then temp2= 0 Else temp2= CDbl(temp2) sentkey2=temp2 ' random key generation random1=sentkey1 If Not IsNumeric(random1) Then random1 = 0 Else random1 = CDbl(random1) ' end random ' Date key generation calldate=FormatDateTime(now(),2) cy=year(calldate)-2001 cm=month(calldate) cd=day(calldate) ctot=(cint(cd)*501) + (cint(cm)*cint(cd)*700003) + (cint(cy)*cint(cd)* 113) ctot=ctot*10013 '/date key generation ' Pi generation pipart=left(replace(cstr(4*Atn(1)),".",""),16) ' end PI generation sentkey2_1 = (pipart-(sentkey2-ctot)) 'Response.Write "inside function ...
" 'Response.Write "
sentkey2:" & sentkey2 & ":" 'Response.Write "
sentkey2_1:" & sentkey2_1 & ":" 'Response.Write "
compare-result:" & (sentkey2 & "" = sentkey2_1 & "") & ":" 'Response.Write "
dateformat:" & calldate & ":" If cstr(sentkey2_1)=cstr(sentkey1) Then bOk = True End If isValidKeys = bOk End Function If Not isValidKeys(Request.QueryString("txtKey1"), Request.QueryString("txtKey2")) Then ' Do something if the keys isnt valid, redirect ... Response.Redirect "" 'Response.Write "redirect ...
" 'Response.Write "key1:" & Request.QueryString("txtKey1") 'Response.Write "

---

" 'Response.Write "key2:" & Request.QueryString("txtKey2") 'Response.End Else ' otherwise stay on this page and show content ... End If %>

	Hortensia Hoop: 240 x 150 mm Colors: 1209 Yellow 1177 Green 1176 Dark Green 1068 Pink 1225 Light Purple 1117 Purple Download zip file »»
	Bordo Telaio: telaio per ricami infiniti Colori: 1028 blu 1076 blu scuro Scarica il file border.zip »»
	Arancia Telaio: 100 x 100 mm Colori: 1238 arancione 1001 bianco Scarica il file orange.zip »»
	Skater Telaio: 100 x 100 mm Colori: 1079 verde scuro 1039 rosso Scarica il file skater.zip »»
	Foglia by Kerstin Widell Telai: 100 x 100 mm Colori: 1149 oro Scarica il file leaf.zip »»
	Fiori mega by Lena Mattsson telaio: 360 x 150 mm Colori: 1159 giallo scuro 1039 rosso 1169 rosso scuro 1168 arancione 1159 giallo scuro Scarica il file megaflower.zip »»
	Stella by Kerstin Widell Telaio: 100 x 100 mm Colori: filato: 1184 arancione 1238 arancione chiaro 1181 arancione scuro 1177 verde Scarica il file stjarna.zip »»
	Corona Telaio: 100 x 100 mm Colori: 1167 giallo chiaro 1535 blu scuro 1194 porpora Scarica il file crown.zip »»
	Tulipano Telaio: 240 x 150 mm Colori: 1209 verde chiaro 1156 verde scuro 1117 rosa chiaro 1119 rosa 1190 rosa scuro 1005 nero Scarica il file tulip.zip »»
	Fiori Fantasy Telaio: 170 x 100 mm Colori: 1109 rosa 1191 rosa scuro 1101 verde 1208 verde scuro Scarica il file fantasy_flower.zip »»
	Teddybear Telaio: 240 x 150 mm Colori: 1236 grigio chiaro 1196 blu 1017 rosa 1238 arancione 1005 nero 1017 rosa 1126 marrone chiaro 1058 marrone 1002 bianco 1196 blu 1510 verde chiaro 1005 nero Scarica il file teddybear.zip »»
	Fragole selvatiche by Kerstin Widell Telaio: 170 x 100 mm Colori: 1147 rosso 1177 verde 1002 bianco 1176 verde scuro 1023 giallo Scarica il file Wild_Strawberry.zip »»
	Angolo floreale Telaio: 70,80 x 70,80 mm Colori: 1177 verde 1511 rosa 1185 giallo 1011 grigio Scarica il file flower_corner.zip »»
	Fiori by Kerstin Widell Telaio: 100 x 100 mm Colori: 1177 verde 1148 rosa 1169 rosa scuro Scarica il file flower_heart.zip »»
	Halloween by Kerstin Widell Telaio: 100 x 100 mm Colori: 1023 giallo 1002 bianco 1011 grigio chiaro 1131 marrone scuro 1005 nero 1078 arancione Scarica il file Halloween.zip »»
	Spring flower Telaio: 100 x 100 mm Colori: 1177 verde chiaro 1023 giallo 1137 giallo scuro 1176 verde scuro Scarica il file tussilago.zip »»
	Faro Tleaio: 100 x 100 mm Colori: 1143 blu 1147 rosso 1167 giallo chiaro 1219 grigio scuro 1218 grigio chiaro 1059 marrone scuro 1170 marrone 1128 marrone chiaro 1002 bianco 1005 nero 1219 grigio scuro 1218 grigio chiaro Scarica il file lighthouse.zip »»
	Occhiali da sole Telaio: 100 x 100 mm Colori: 1076 blu 1074 azzurro 1170 marrone 1232 verde 1039 rosso 1023 giallo 1071 bianco Scarica il file sunglasses.zip »»