Advertisement
Guest User

Untitled

a guest
Jul 22nd, 2017
54
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 0.87 KB | None | 0 0
  1. <input name="firstNameIn" type="text" id="firstNameIn" style='width:170px;color:gray'
  2.         defaultValue="John" value="John" onfocus=DeWaterMark(me) onblur=WaterMark(me) onkeyup='call updatePrev(me,prev1.firstName)' />
  3.  
  4. sub updatePrev(txt,prev)
  5.     prev.innerhtml = txt.value
  6.     if len(firstNameIn.value) > 0 and firstNameIn.style.color <> "gray" _
  7.     and len(lastNameIn.value) > 0 and lastNameIn.style.color <> "gray" _
  8.     and len(positionIn.value) > 0 and positionIn.style.color <> "gray" _
  9.     and len(departmentIn.value) > 0 and departmentIn.style.color <> "gray" _
  10.     and len(phone1In.value) > 2 and phone1In.style.color <> "gray" _
  11.     and len(phone2In.value) > 2 and phone2In.style.color <> "gray" _
  12.     and len(phone3In.value) > 3 and phone3In.style.color <> "gray" _
  13.     then
  14.         apply.disabled=false
  15.         copy.disabled=false
  16.     else
  17.         apply.disabled=true
  18.         copy.disabled=true
  19.     end if
  20. end sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement