Advertisement
Guest User

tertemiz

a guest
Jun 8th, 2012
72
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ASP 0.19 KB | None | 0 0
  1. Function temiz(input)
  2.  IF isNull(input)=True Then Exit Function
  3.  input=Trim(input)
  4.  input=Replace(input,Chr(39),"" ,1,-1,0)
  5.  input=Replace(input,"'","" ,1,-1,1)
  6.  temiz=input
  7. End Function
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement