محبوبترینها
نمایش جنگ دینامیت شو در تهران [از بیوگرافی میلاد صالح پور تا خرید بلیط]
9 روش جرم گیری ماشین لباسشویی سامسونگ برای از بین بردن بوی بد
ساندویچ پانل: بهترین گزینه برای ساخت و ساز سریع
خرید بیمه، استعلام و مقایسه انواع بیمه درمان ✅?
پروازهای مشهد به دبی چه زمانی ارزان می‌شوند؟
تجربه غذاهای فرانسوی در قلب پاریس بهترین رستوران‌ها و کافه‌ها
دلایل زنگ زدن فلزات و روش های جلوگیری از آن
خرید بلیط چارتر هواپیمایی ماهان _ ماهان گشت
سیگنال در ترید چیست؟ بررسی انواع سیگنال در ترید
بهترین هدیه تولد برای متولدین زمستان: هدیه‌های کاربردی برای روزهای سرد
در خرید پارچه برزنتی به چه نکاتی باید توجه کنیم؟
صفحه اول
آرشیو مطالب
ورود/عضویت
هواشناسی
قیمت طلا سکه و ارز
قیمت خودرو
مطالب در سایت شما
تبادل لینک
ارتباط با ما
مطالب سایت سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون
مطالب سایت سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون
آمار وبسایت
تعداد کل بازدیدها :
1828675904
cookies چرا اين جوري همه چي رو لو ميدن -
واضح آرشیو وب فارسی:سایت ریسک: t=19653">cookies چرا اين جوري همه چي رو لو ميدن nima_isp 10 مهر 1383, 00:45سلام من از اين دستورات براي كوكي ها استفاده كردم ولي دقيقا مقدار متغير ها توي فايل كوكي نوشته ميشن response.cookies("kanoon").Expires = date + 1 Response.Cookies("kanoon")("user")=user Response.Cookies("kanoon")("pass")=pass و فايل كوكي اين جوري ميشه kanoon pass=nima&user=nima 127.0.0.1/ 1536 1817957376 29665269 2026609072 29665118 * حالا چي كار كنم اين اطلاعات لو نره AliReza 26 10 مهر 1383, 02:05يوزر مهم نيست .... ولي پسورد را بهتره بصورت رمز دربياري بعد توي ديتابيس و كوكيت ذخيره كني...... a_mollaei 10 مهر 1383, 03:49البته يه نكته اي هم هست. كوكي ها روي سيستم User ساخته ميشه و اطلاعات خود User رو قرار ميده. خوب چه اشكالي داره كه User بتونه نام كاربري و كلمه عبور خودش رو ببينه؟؟ hoom 10 مهر 1383, 16:56سلام همانطور كه عليرضا گفت ميتوني پسورد يا همه رو بصورت رمز دربياري و بنويسي و يا بخوني. البته اگر از SSL استفاده كني يه گزينه Secure هم براي كوكي داري كه از اون ميتوني استفاده كني. ارادتمند AliReza 26 10 مهر 1383, 18:14البته يه نكته اي هم هست. كوكي ها روي سيستم User ساخته ميشه و اطلاعات خود User رو قرار ميده. خوب چه اشكالي داره كه User بتونه نام كاربري و كلمه عبور خودش رو ببينه؟؟ خوب مشكل اينجاست يه هكر هم براحتي ميتونه محتواي فايل كوكي را ببينه..... :lol: a_mollaei 10 مهر 1383, 19:10خوب ميتوني از Session استفاده كني. البته اگه از hash براي كد كردن استفاده كني ديگه هيچ مشكلي نداري. nima_isp 11 مهر 1383, 14:07خوب مرسي ولي ميشه يه مثال از كد كردن اينها بهم بگين باز هم مرسي تورو خدا مثال كامل باشه دز ضمن اين سايت شما چه طوري كد ميكنه naeim_crack 11 مهر 1383, 14:36سلام براي تبديل متغييرها به كد MD 5 HASH شما بايد يك فايل به اسم md 5.asp بسازيد بعد كد زير رو درون فايل بنويسيد . <% Private Const BITS_TO_A_BYTE=8 Private Const BYTES_TO_A_WORD=4 Private Const BITS_TO_A_WORD=32 Private m_lOnBits(30) Private m_l2Power(30) m_lOnBits(0)=CLng(1) m_lOnBits(1)=CLng(3) m_lOnBits(2)=CLng(7) m_lOnBits(3)=CLng(15) m_lOnBits(4)=CLng(31) m_lOnBits(5)=CLng(63) m_lOnBits(6)=CLng(127) m_lOnBits(7)=CLng(255) m_lOnBits(8)=CLng(511) m_lOnBits(9)=CLng(1023) m_lOnBits(10)=CLng(2047) m_lOnBits(11)=CLng(4095) m_lOnBits(12)=CLng(8191) m_lOnBits(13)=CLng(16383) m_lOnBits(14)=CLng(32767) m_lOnBits(15)=CLng(65535) m_lOnBits(16)=CLng(131071) m_lOnBits(17)=CLng(262143) m_lOnBits(18)=CLng(524287) m_lOnBits(19)=CLng(1048575) m_lOnBits(20)=CLng(2097151) m_lOnBits(21)=CLng(4194303) m_lOnBits(22)=CLng(8388607) m_lOnBits(23)=CLng(16777215) m_lOnBits(24)=CLng(33554431) m_lOnBits(25)=CLng(67108863) m_lOnBits(26)=CLng(134217727) m_lOnBits(27)=CLng(268435455) m_lOnBits(28)=CLng(536870911) m_lOnBits(29)=CLng(1073741823) m_lOnBits(30)=CLng(2147483647) m_l2Power(0)=CLng(1) m_l2Power(1)=CLng(2) m_l2Power(2)=CLng(4) m_l2Power(3)=CLng(8) m_l2Power(4)=CLng(16) m_l2Power(5)=CLng(32) m_l2Power(6)=CLng(64) m_l2Power(7)=CLng(128) m_l2Power(8)=CLng(256) m_l2Power(9)=CLng(512) m_l2Power(10)=CLng(1024) m_l2Power(11)=CLng(2048) m_l2Power(12)=CLng(4096) m_l2Power(13)=CLng(8192) m_l2Power(14)=CLng(16384) m_l2Power(15)=CLng(32768) m_l2Power(16)=CLng(65536) m_l2Power(17)=CLng(131072) m_l2Power(18)=CLng(262144) m_l2Power(19)=CLng(524288) m_l2Power(20)=CLng(1048576) m_l2Power(21)=CLng(2097152) m_l2Power(22)=CLng(4194304) m_l2Power(23)=CLng(8388608) m_l2Power(24)=CLng(16777216) m_l2Power(25)=CLng(33554432) m_l2Power(26)=CLng(67108864) m_l2Power(27)=CLng(134217728) m_l2Power(28)=CLng(268435456) m_l2Power(29)=CLng(536870912) m_l2Power(30)=CLng(1073741824) Private Function LShift(lValue,iShiftBits) If iShiftBits=0 Then LShift=lValue Exit Function ElseIf iShiftBits=31 Then If lValue And 1 Then LShift=&H80000000 Else LShift=0 End If Exit Function ElseIf iShiftBits<0 Or iShiftBits>31 Then Err.Raise 6 End If If (lValue And m_l2Power(31-iShiftBits)) Then LShift=((lValue And m_lOnBits(31-(iShiftBits+1)))*m_l2Power(iShiftBits)) Or &H80000000 Else LShift=((lValue And m_lOnBits(31-iShiftBits))*m_l2Power(iShiftBits)) End If End Function Private Function RShift(lValue,iShiftBits) If iShiftBits=0 Then RShift=lValue Exit Function ElseIf iShiftBits=31 Then If lValue And &H80000000 Then RShift=1 Else RShift=0 End If Exit Function ElseIf iShiftBits<0 Or iShiftBits>31 Then Err.Raise 6 End If RShift=(lValue And &H7FFFFFFE)m_l2Power(iShiftBits) If (lValue And &H80000000) Then RShift=(RShift Or (&H40000000m_l2Power(iShiftBits-1))) End If End Function Private Function RotateLeft(lValue,iShiftBits) RotateLeft=LShift(lValue,iShiftBits) Or RShift(lValue,(32-iShiftBits)) End Function Private Function AddUnsigned(lX,lY) Dim lX4 Dim lY4 Dim lX8 Dim lY8 Dim lResult lX8=lX And &H80000000 lY8=lY And &H80000000 lX4=lX And &H40000000 lY4=lY And &H40000000 lResult=(lX And &H3FFFFFFF)+(lY And &H3FFFFFFF) If lX4 And lY4 Then lResult=lResult Xor &H80000000 Xor lX8 Xor lY8 ElseIf lX4 Or lY4 Then If lResult And &H40000000 Then lResult=lResult Xor &HC0000000 Xor lX8 Xor lY8 Else lResult=lResult Xor &H40000000 Xor lX8 Xor lY8 End If Else lResult=lResult Xor lX8 Xor lY8 End If AddUnsigned=lResult End Function Private Function F(x,y,z) F=(x And y) Or ((Not x) And z) End Function Private Function G(x,y,z) G=(x And z) Or (y And (Not z)) End Function Private Function H(x,y,z) H=(x Xor y Xor z) End Function Private Function I(x,y,z) I=(y Xor (x Or (Not z))) End Function Private Sub FF(a,b,c,d,x,s,ac) a=AddUnsigned(a,AddUnsigned(AddUnsigned(F(b,c,d),x ),ac)) a=RotateLeft(a,s) a=AddUnsigned(a,b) End Sub Private Sub GG(a,b,c,d,x,s,ac) a=AddUnsigned(a,AddUnsigned(AddUnsigned(G(b,c,d),x ),ac)) a=RotateLeft(a,s) a=AddUnsigned(a,b) End Sub Private Sub HH(a,b,c,d,x,s,ac) a=AddUnsigned(a,AddUnsigned(AddUnsigned(H(b,c,d),x ),ac)) a=RotateLeft(a,s) a=AddUnsigned(a,b) End Sub Private Sub II(a,b,c,d,x,s,ac) a=AddUnsigned(a,AddUnsigned(AddUnsigned(I(b,c,d),x ),ac)) a=RotateLeft(a,s) a=AddUnsigned(a,b) End Sub Private Function ConvertToWordArray(sMessage) Dim lMessageLength Dim lNumberOfWords Dim lWordArray() Dim lBytePosition Dim lByteCount Dim lWordCount Const MODULUS_BITS=512 Const CONGRUENT_BITS=448 lMessageLength=Len(sMessage) lNumberOfWords=(((lMessageLength+((MODULUS_BITS-CONGRUENT_BITS)BITS_TO_A_BYTE))(MODULUS_BITSBIT S_TO_A_BYTE))+1)*(MODULUS_BITSBITS_TO_A_WORD) ReDim lWordArray(lNumberOfWords-1) lBytePosition=0 lByteCount=0 Do Until lByteCount >=lMessageLength lWordCount=lByteCountBYTES_TO_A_WORD lBytePosition=(lByteCount Mod BYTES_TO_A_WORD)*BITS_TO_A_BYTE lWordArray(lWordCount)=lWordArray(lWordCount) Or LShift(Asc(Mid(sMessage,lByteCount+1,1)),lBytePosi tion) lByteCount=lByteCount+1 Loop lWordCount=lByteCountBYTES_TO_A_WORD lBytePosition=(lByteCount Mod BYTES_TO_A_WORD)*BITS_TO_A_BYTE lWordArray(lWordCount)=lWordArray(lWordCount) Or LShift(&H80,lBytePosition) lWordArray(lNumberOfWords-2)=LShift(lMessageLength,3) lWordArray(lNumberOfWords-1)=RShift(lMessageLength,29) ConvertToWordArray=lWordArray End Function Private Function WordToHex(lValue) Dim lByte Dim lCount For lCount=0 To 3 lByte=RShift(lValue,lCount*BITS_TO_A_BYTE) And m_lOnBits(BITS_TO_A_BYTE-1) WordToHex=WordToHex & Right("0" & Hex(lByte),2) Next End Function Public Function MD 5(sMessage) Dim x Dim k Dim AA Dim BB Dim CC Dim DD Dim a Dim b Dim c Dim d Const S11=7 Const S12=12 Const S13=17 Const S14=22 Const S21=5 Const S22=9 Const S23=14 Const S24=20 Const S31=4 Const S32=11 Const S33=16 Const S34=23 Const S41=6 Const S42=10 Const S43=15 Const S44=21 x=ConvertToWordArray(sMessage) a=&H67452301 b=&HEFCDAB 89 c=&H98BADCFE d=&H10325476 For k=0 To UBound(x) Step 16 AA=a BB=b CC=c DD=d FF a,b,c,d,x(k+0),S11,&HD 76AA 478 FF d,a,b,c,x(k+1),S12,&HE8C7B 756 FF c,d,a,b,x(k+2),S13,&H242070DB FF b,c,d,a,x(k+3),S14,&HC1BDCEEE FF a,b,c,d,x(k+4),S11,&HF57C0FAF FF d,a,b,c,x(k+5),S12,&H4787C62A FF c,d,a,b,x(k+6),S13,&HA 8304613 FF b,c,d,a,x(k+7),S14,&HFD 469501 FF a,b,c,d,x(k+8),S11,&H698098D 8 FF d,a,b,c,x(k+9),S12,&H8B 44F7AF FF c,d,a,b,x(k+10),S13,&HFFFF5BB 1 FF b,c,d,a,x(k+11),S14,&H895CD 7BE FF a,b,c,d,x(k+12),S11,&H6B 901122 FF d,a,b,c,x(k+13),S12,&HFD 987193 FF c,d,a,b,x(k+14),S13,&HA 679438E FF b,c,d,a,x(k+15),S14,&H49B 40821 GG a,b,c,d,x(k+1),S21,&HF61E2562 GG d,a,b,c,x(k+6),S22,&HC040B 340 GG c,d,a,b,x(k+11),S23,&H265E5A 51 GG b,c,d,a,x(k+0),S24,&HE9B 6C7AA GG a,b,c,d,x(k+5),S21,&HD 62F105D GG d,a,b,c,x(k+10),S22,&H2441453 GG c,d,a,b,x(k+15),S23,&HD 8A 1E681 GG b,c,d,a,x(k+4),S24,&HE7D 3FBC8 GG a,b,c,d,x(k+9),S21,&H21E1CDE6 GG d,a,b,c,x(k+14),S22,&HC33707D 6 GG c,d,a,b,x(k+3),S23,&HF4D 50D 87 GG b,c,d,a,x(k+8),S24,&H455A 14ED GG a,b,c,d,x(k+13),S21,&HA 9E3E905 GG d,a,b,c,x(k+2),S22,&HFCEFA 3F8 GG c,d,a,b,x(k+7),S23,&H676F02D 9 GG b,c,d,a,x(k+12),S24,&H8D 2A 4C8A HH a,b,c,d,x(k+5),S31,&HFFFA 3942 HH d,a,b,c,x(k+8),S32,&H8771F681 HH c,d,a,b,x(k+11),S33,&H6D 9D 6122 HH b,c,d,a,x(k+14),S34,&HFDE5380C HH a,b,c,d,x(k+1),S31,&HA 4BEEA 44 HH d,a,b,c,x(k+4),S32,&H4BDECFA 9 HH c,d,a,b,x(k+7),S33,&HF6BB 4B 60 HH b,c,d,a,x(k+10),S34,&HBEBFBC70 HH a,b,c,d,x(k+13),S31,&H289B 7EC6 HH d,a,b,c,x(k+0),S32,&HEAA 127FA HH c,d,a,b,x(k+3),S33,&HD 4EF3085 HH b,c,d,a,x(k+6),S34,&H4881D 05 HH a,b,c,d,x(k+9),S31,&HD 9D 4D 039 HH d,a,b,c,x(k+12),S32,&HE6DB 99E5 HH c,d,a,b,x(k+15),S33,&H1FA 27CF8 HH b,c,d,a,x(k+2),S34,&HC4AC5665 II a,b,c,d,x(k+0),S41,&HF4292244 II d,a,b,c,x(k+7),S42,&H432AFF97 II c,d,a,b,x(k+14),S43,&HAB 9423A 7 II b,c,d,a,x(k+5),S44,&HFC93A 039 II a,b,c,d,x(k+12),S41,&H655B 59C3 II d,a,b,c,x(k+3),S42,&H8F0CCC92 II c,d,a,b,x(k+10),S43,&HFFEFF47D II b,c,d,a,x(k+1),S44,&H85845DD 1 II a,b,c,d,x(k+8),S41,&H6FA 87E4F II d,a,b,c,x(k+15),S42,&HFE2CE6E0 II c,d,a,b,x(k+6),S43,&HA 3014314 II b,c,d,a,x(k+13),S44,&H4E0811A 1 II a,b,c,d,x(k+4),S41,&HF7537E82 II d,a,b,c,x(k+11),S42,&HBD 3AF235 II c,d,a,b,x(k+2),S43,&H2AD 7D 2BB II b,c,d,a,x(k+9),S44,&HEB 86D 391 a=AddUnsigned(a,AA) b=AddUnsigned(b,BB) c=AddUnsigned(c,CC) d=AddUnsigned(d,DD) Next MD 5=LCase(WordToHex(a) & WordToHex(b) & WordToHex(c) & WordToHex(d)) End Function %> بعد هر جا كه خواستيد از اين كد استفاده كنيد به شگل زير است <!--#include virtual="MD 5.asp"--> MyMD 5Hash=MD 5("The string to encode") اينم يه مثال ديگه <!--#include virtual="MD 5.asp"--> <% Response.Write "Username Hash = " & MD 5("MyUserName") & "<BR>" & vbCRLF Response.Write "Password Hash = " & MD 5("MyPassword") & "<BR>" & vbCRLF %> در ضمن به شكل زير كد ميشه majidonline ميشه 7c306f903d 2f8fb 6391bb 7e4c6218470 وسلام nima_isp 11 مهر 1383, 18:09مرسي. قابل توجه بقيه آقا نعيم برادر منه تو خونه نمي بينمش اينجا بيشتر هم ديگه رو ملاقات مي كنيم nima_isp 11 مهر 1383, 19:08حالا يه سوال ديگه اين كوكي ها براي يك روز روي كامپيوتر مي مونه نميشه كاري كرد كه مثلا چند ساعت بمونه از session هم استفاده نكنم naeim_crack 11 مهر 1383, 21:00سلام ببين كوكي ها مثل آدما تاريخ انقضا دارن مي توني براي كوكي ها تاريخ انقضا يا همون Expires تعين كني :lol: تاريخ انقضا اين كوكي سال ديگه هستش response.cookies("cookiename").Expires = Date() + 365 تاريخ انقضا اين يكي در يك تاريخ معيين شده هستش Response.Cookies("cookiename").Expires="Jan 1, 2010" اين كوكي 2 ساعت بعد از ساخت از بين ميره Response.Cookies("cookiename").Expires =DateAdd("h", 2, Now) البته اگه بخواي بعد از چند روز از بين بره بايد اينجور بنويسي Response.Cookies("cookiename").Expires =DateAdd("d", 2, Now) ديگه حيلي نوشتم حق برادري رو بجا اوردم :lol: وسلام nima_isp 11 مهر 1383, 21:09مرسي نعيم حالا يه چيز ديگه من از كوكي براي ارسال متغير به صفحات استفاده كردم حالا اين جريان هردفه من را به طور اتومتيك وارد كن چيه naeim_crack 11 مهر 1383, 21:18سلام ...... اين كه كاري نداره با هر ورود شما به این سایت شما به طور خود کار وارد به سایت میشید. اطلاعات شما شامل User و Password هست در Cookies ذخیره میشه و بار بعد که وارد سایت میشید . به طور خود کار اطلاعات شما از رویه Cookies خونده میشه و شما وارد سایت میشید. كجاي اين قضيه مشگله من نمي دونم .اين چه ربطي به فرستادن متغيير به صفحات بعد شما داره . حالا كاملا نمي دونم كه چي مي خواي اما فكر كنم اينجوري بشه اين كار و كرد البته امتحان كن اول يك كوكي بساز response.cookies("user")="مقدار" حالا مي توني مقدار رو True False بدي يا هز چيز ديگه و اينجوري ازش استفاده كني if not request.cookies("user")="True" then Respose.write("Welcome ") else Response.Write("Please Login") End If فكر كنم اينجوري بشه nima_isp 11 مهر 1383, 21:38وايييييييييييييي مرسي نميدونستم اين اندازه واردي
این صفحه را در گوگل محبوب کنید
[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 206]
-
گوناگون
پربازدیدترینها