שמירת נתוני כרטיסי אשראי באתר

אני חושב שזה אסור מבחינה חוקית אבל
אם אתה רוצה אתה יכול לעשות פונקציה להצפנה

דוגמא לקוד אשר מצפין סיסמא(יפעל אותו דבר על כל מחרוזת)

  function Changing(str)
        dim newpass
        dim tav
        dim i    
        
        for i=1 to len(str)
            tav=mid(str,i,1)
            tav=Asc(tav)+3
            tav=tav*10
            tav=tav-5
            tav=sqr(tav)
            tav=tav*5
            newpass=newpass&";"&tav
        next    
        Changing=newpass
    end function