how to obfuscated with asterisks

[sureshl]

JavaScript Experts,

I have the following HTML. How could I use JavaScript such that when a user clicks on the checkbox in each row the phone numbers and e-mail addresses are partially obfuscated with asterisks?

<table><tr><form method='post'><td>phone:</td><td>21323</td><td width='10%' align='right'>mail:</td><td>[e-mail]</td><input name='submit' type='submit' value='check'><input type='hidden' name='nameid' value='6' ></form></tr></table> 

Dis question is asked to forwarded to javascript ... By Nicodemas in above format...
Am facing a problem, with this script...
I want two fields to be written by star , in order to hide . and this script does it , but ,
wat actually is my page opens directly with star letter , rather i need to open my page with the phoneno and email aftr clicking the button i want to make a change to the star to the respective fields ..........
How can i do this...

Page should open like ..
21323
[e-mail]
check (button) aftr clicking

then
213***
ds**@*****

vbscript
 function getPhone(text)
 dim textsize
 textsize = Len(text)
 text = Left(text,5)
 For index = 0 to textsize
 text = text & "*"
 Next
 getphone = text
 End Function
 Function getEmail(text)
 dim textsize
 textsize =Len(text)
 dim atpos
 atpos = instr(text,"@") - 5
 text = Left(text,5)
 For index = 0 to textsize
 if atpos = index+1 then
 text = text & "@"
 else
 text = text & "*"
 end if
 Next
 getemail = text
 End Function
 Set oConn = Server.CreateObject("ADODB.Connection")
       Set oRs = Server.CreateObject("ADODB.Recordset")
       oConn.Open "Provider=SQLOLEDB; Data Source = ria; Initial Catalog = northwind; Integrated Security = sspi;"
  sSql =  "SELECT  phone,email,id FROM tbl1  userid =4 "
   oRs.Open sSql, oConn
      While not oRs.EOF
 Response.write("<table><tr><form method='post'><td >phone : </td><td>"&getPhone(ors(0))&"</td><td width='10%'align='right'mail :</td><td>"&getEmail(ors(1))&"</td><input name='submit' type='submit' value='check'><input type='hidden' name='nameid' value='" & ors(2) & "' ></form></tr></table>")
        oRs.MoveNext()
     Wend
     ors.close
     oconn.close
 if request.form("submit")="check" then
 i=1
 end if
 if  request.form("nameid") <> "" then
 set star1 = oConn.Execute("select resid from tbl1 where id= '" &request.form("nameid")&"'")
 if not star1.eof then
 sl = "UPDATE tbl1 SET star = '" & i & "' where resid= '" &request.form("nameid")&"' and userID = " & userid
 oConn.Execute sl
 End if
 End if
    %> 
 

[acoder]

You'll need to use JavaScript rather than VBScript. Have you made a start on the JavaScript code?

PS. the [code] tags have numbered lines - there's no need to add them manually.

[sureshl]

But , i found one problem , that i couldn able to store the changes .

I mean this eg shows , (done by javascriipt)

Visualise this eg
Page open like this..
12332
[e-mail]
Check (button) if clicked

Changes to dis
123****
sdf**@*****


But if i refresh the page,
it again change to
12332
[e-mail]

so, am not able hold the obfuscated value , untill i change.....
i need to hold the obfuscated value....thats y i tried server side....
plz suggest..

[acoder]

So, initially you want it displayed, but as soon as it's replaced by asterisks, it should remain that way?

If that's the case, you'll have to use server-side code. You can submit and change the database (or wherever the data is stored) so when you next refresh or display the page, the asterisks are there.

If you want to avoid a reload of the page when replacing, you can use Ajax.

[sureshl]

I dunno much about ajax . .

how can i do this... as my script ensures to make a obfuscated values .

but problem is , it directly opens directly with obfuscated values , i want to happen aftr clicking button , and have to be permanent untill i change...

[acoder]

Should the "obfuscation" happen without reloading/unloading the page? If so, then Ajax it is, otherwise you only need server-side code. Let me know which it is.

[sureshl]

plz , U can tell me , how can i do it . .

Coz i need to hold the value of those obfuscated details . so, that i can see the values when i loaded again .

Thanks ...

[acoder]

Here's a link to help get you started. Post back if you get stuck.

[sureshl]

This is what i understood, Am i right with these things..?

Yes . ajax is one which supports latest browsers where any functions can be called by javascript , and the functions status can be checked by readystate function , so whether the connection is success or not

So, aftr these steps, We have two options to do our need ,
Responsetext--> Some Text
Responsexml-->some xml documents travering by javascript functions..

Need some more clarity in Open, send ....

[Dormilich]

@sureshl
open() is comparable to the (HTML) form element, while send() is starting the http request (sending the variables)

see XMLHttpRequest – MDC

regards

[sureshl]

This is my first ajax code...Okay , For my issue ,
I converted my vbscript to javascript , Is my coding is correct , Now i need to work such a way to convert my clear text to obfuscated values . .

function makeRequest(url) {
        var httpRequest;
 
        if (window.XMLHttpRequest) { // Mozilla, Safari, ...
            httpRequest = new XMLHttpRequest();
            if (httpRequest.overrideMimeType) {
                httpRequest.overrideMimeType('text/xml');
                // See note below about this line
            }
        } 
        else if (window.ActiveXObject) { // IE
            try {
                httpRequest = new ActiveXObject("Msxml2.XMLHTTP");
            } 
            catch (e) {
                try {
                    httpRequest = new ActiveXObject("Microsoft.XMLHTTP");
                } 
                catch (e) {}
            }
        }
 
        if (!httpRequest) {
            alert('Giving up :( Cannot create an XMLHTTP instance');
            return false;
        }
        httpRequest.onreadystatechange = function() { getphone(text); getemail(text); };
        httpRequest.open('GET', url, true);
        httpRequest.send('');
 
    }
 
    /*function alertContents(httpRequest) {
 
        if (httpRequest.readyState == 4) {
            if (httpRequest.status == 200) {
            <!--alert(httpRequest.responseText);-->
            } else {
                alert('There was a problem with the request.');
            }
        }*/
        function getPhone(text)
          {
           if (httpRequest.readyState == 4)
            {
            if (httpRequest.status == 200) 
            {
              var textsize 
              textsize = Len(text)
              text = Left(text,5)
              For (index = 0 ;index <=textsize ; index++)
              {
              text = text & "*"
              }
              getphone = text
            }
            else 
            {
                alert('There was a problem with the request.');
            }
            }
 
            function getEmail(text)
            {
            if (httpRequest.readyState == 4)
            {
            if (httpRequest.status == 200) 
            {
            var textsize
            textsize =Len(text)
            var atpos
            atpos = instr(text,"@") - 5
            text = Left(text,5)
            for(index = 0 ; index<=textsize ; index ++ )
            {
            if atpos = index+1 then
            text = text & "@"
            }
            else
            {
            text = text & "*"
            }
            }
            getemail = text
            }
            </script>

If the above code is correct , how can i call this ajax script in my code ,

Set oConn = Server.CreateObject("ADODB.Connection")
        Set oRs = Server.CreateObject("ADODB.Recordset")
        oConn.Open "Provider=SQLOLEDB; Data Source = ria; Initial Catalog = northwind; Integrated Security = sspi;"
   sSql =  "SELECT  phone,email,id FROM tbl1  userid =4 "
    oRs.Open sSql, oConn
       While not oRs.EOF
  Response.write("<table><tr><form method='post'><td >phone : </td><td>"&getPhone(ors(0))&"</td><td width='10%'align='right'mail :</td><td>"&getEmail(ors(1))&"</td><input name='submit' type='submit' value='check'><input type='hidden' name='nameid' value='" & ors(2) & "' ></form></tr></table>")
         oRs.MoveNext()
      Wend
      ors.close
      oconn.close

[acoder]

Before we go any further, the only benefit Ajax would provide here is that the "obfuscation" would take place almost instantly without having to submit a form and unloading the page. If that's not important, Ajax is not necessary and you can simply submit the form to a server-side page (code you already have) and display the values with parts replaced by asterisks.

[sureshl]

Now my present code and Problem i had explained....
my below retreives only first data...i mean only this...
12343 [e-mail] ,
i want to retrieve all the data, for those uservalue has id =1

My db :
tbluser
uservalue id
2 1
3 1
4 1
5 1
and using this uservalue it rerieves phone, email from this table
tblstudent
phone email uservalue
12343 [e-mail] 2
123231 [e-mail] 3
123231 [e-mail] 4

set chk =oConn.execute("select uservalue from tbluser where id = 1")  
  if not chk.EOF then
   id  =chk("uservalue")
    sSql =  "SELECT  phoneno,email,id FROM tblstudent where  uservalue = " & id 
    oRs.Open sSql, oConn
       While not oRs.EOF 
       Response.write("<table><tr><form method='post'><td >phone : </td><td>" & getphone(ors(0)) & "</td><td width='10%'align='right'mail :</td><td>"& getEmail(ors(1)) &"</td><input name='submit' type='submit'  value='check'><input type='hidden'  name='nameid' value='" & ors(2) & "' ></form></tr></table>")
       oRs.MoveNext()
    Wend
end if
  if request.form("submit")="check" then
  i=1
  end if
  if  request.form("nameid") <> "" then
  set star1 = oConn.Execute("select resid from tbl1 where id= '" &request.form("nameid")&"'")
  if not star1.eof then
  sl = "UPDATE tbl1 SET star = '" & i & "' where resid= '" &request.form("nameid")&"' and userID = " & userid
  oConn.Execute sl
  End if
  End if
 

[acoder]

Your best bet for that would be the ASP forum. If you do decide to grapple with Ajax again, you can come back to this thread.