Replace Functions

Results 1 to 2 of 2

Thread: Replace Functions

  1. #1
    scopeout Guest

    Default Replace Functions

    I need a replace function for " , and &#039; Access Data & SQL<BR>Can anyone help?<BR><BR>Thanks

  2. #2
    Heaven's Martini Guest

    Default you

    want to replace " and &#039;<BR><BR>check the faqs.<BR><BR>27 i think<BR><BR>Function RemoveCharacters() <BR> dim frm,item,bchar,gchar,nitem<BR> bchar = chr(34)<BR> gchar = "&#34"<BR> Set frm = Server.CreateObject("Scripting.Dictionary") <BR> frm.CompareMode=1 <BR> For each Item in Request.Form <BR> nitem = Replace(Request.Form(Item),bchar,gchar)<BR> frm.Add Cstr(Item), Replace(nitem,"&#039;","&#039;&#039;")<BR> Next <BR> Set RemoveCharacters = frm <BR>End Function <BR><BR>Read the Faqs on this.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts