Welcome to SPN

Register and Join the most happening forum of Sikh community & intellectuals from around the world.

Sign Up Now!

Need help printing " double quotes

Discussion in 'Information Technology' started by James, Jul 28, 2006.

  1. James

    James
    Expand Collapse
    Guest

    I've got the following code... I need the number to be in "double
    quotes", not 'single quotes'

    so it will look like this when it prints:

    UPDATE TableName SET ColumnName =
    'x'+Right(ColumnName,Len(ColumnName)-1) WHERE (ColumnName=
    "021615039");


    any ideas? here's the code:

    Option Compare Database

    Public Sub buildSQL()
    Open "C:\UpdateUSAAID\1.txt" For Input As #1
    Open "C:\UpdateUSAAID\excludeListSQL.txt" For Output As #2

    Do While Not EOF(1)

    Line Input #1, excludeMember

    Print #2, "UPDATE TableName SET ColumnName =
    'x'+Right(ColumnName,Len(ColumnName)-1) WHERE (ColumnName = '" &
    excludeMember & "');"


    Loop
    Close #1
    Close #2
    End Sub



    Thanks!
     
  2. Loading...

    Similar Threads Forum Date
    Interracial And Interfaith Marriage, Help Needed To Confront/convince My Parents Love & Marriage Aug 16, 2016
    17 yr old Baljit needs your help Get Involved Aug 19, 2015
    Learn Punjabi Need help Language, Arts & Culture May 20, 2014
    United Sikhs From United Sikhs. Phillippines Needs Your Help Sikh Organisations Nov 22, 2013
    Need Help... (Keeping Hair) Questions and Answers Sep 2, 2013

  3. Roger Carlson

    Roger Carlson
    Expand Collapse
    Guest

    Replace each apostrophe with TWO double quotes:

    Print #2, "UPDATE TableName SET ColumnName =
    'x'+Right(ColumnName,Len(ColumnName)-1) WHERE (ColumnName = """ &
    excludeMember & """);"

    --
    --Roger Carlson
    MS Access MVP
    Access Database Samples: www.rogersaccesslibrary.com
    Want answers to your Access questions in your Email?
    Free subscription:
    http://peach.ease.lsoft.com/scripts/wa.exe?SUBED1=ACCESS-L


    "James" <jamesburkett@gmail.com> wrote in message
    news:1152209841.073526.227240@s53g2000cws.googlegroups.com...
    > I've got the following code... I need the number to be in "double
    > quotes", not 'single quotes'
    >
    > so it will look like this when it prints:
    >
    > UPDATE TableName SET ColumnName =
    > 'x'+Right(ColumnName,Len(ColumnName)-1) WHERE (ColumnName=
    > "021615039");
    >
    >
    > any ideas? here's the code:
    >
    > Option Compare Database
    >
    > Public Sub buildSQL()
    > Open "C:\UpdateUSAAID\1.txt" For Input As #1
    > Open "C:\UpdateUSAAID\excludeListSQL.txt" For Output As #2
    >
    > Do While Not EOF(1)
    >
    > Line Input #1, excludeMember
    >
    > Print #2, "UPDATE TableName SET ColumnName =
    > 'x'+Right(ColumnName,Len(ColumnName)-1) WHERE (ColumnName = '" &
    > excludeMember & "');"
    >
    >
    > Loop
    > Close #1
    > Close #2
    > End Sub
    >
    >
    >
    > Thanks!
    >
     
  4. James

    James
    Expand Collapse
    Guest

    I figured it out, thanks though.... code looks like this in case you
    care.
    Print #2, "UPDATE TableName SET ColumnName =
    'x'+Right(ColumnName,Len(ColumnName)-1) WHERE (ColumnName = '""" &
    excludeMember & "'"");"

    James wrote:
    > I've got the following code... I need the number to be in "double
    > quotes", not 'single quotes'
    >
    > so it will look like this when it prints:
    >
    > UPDATE TableName SET ColumnName =
    > 'x'+Right(ColumnName,Len(ColumnName)-1) WHERE (ColumnName=
    > "021615039");
    >
    >
    > any ideas? here's the code:
    >
    > Option Compare Database
    >
    > Public Sub buildSQL()
    > Open "C:\UpdateUSAAID\1.txt" For Input As #1
    > Open "C:\UpdateUSAAID\excludeListSQL.txt" For Output As #2
    >
    > Do While Not EOF(1)
    >
    > Line Input #1, excludeMember
    >
    > Print #2, "UPDATE TableName SET ColumnName =
    > 'x'+Right(ColumnName,Len(ColumnName)-1) WHERE (ColumnName = '" &
    > excludeMember & "');"
    >
    >
    > Loop
    > Close #1
    > Close #2
    > End Sub
    >
    >
    >
    > Thanks!
     
  5. Kerry

    Kerry
    Expand Collapse
    Guest

    Use the Chr function:
    Print #2, "UPDATE TableName SET ColumnName =
    'x'+Right(ColumnName,Len(ColumnName)-1) WHERE (ColumnName = '" &
    Chr(34) &
    excludeMember & chr(34) & "');"

    James wrote:
    > I've got the following code... I need the number to be in "double
    > quotes", not 'single quotes'
    >
    > so it will look like this when it prints:
    >
    > UPDATE TableName SET ColumnName =
    > 'x'+Right(ColumnName,Len(ColumnName)-1) WHERE (ColumnName=
    > "021615039");
    >
    >
    > any ideas? here's the code:
    >
    > Option Compare Database
    >
    > Public Sub buildSQL()
    > Open "C:\UpdateUSAAID\1.txt" For Input As #1
    > Open "C:\UpdateUSAAID\excludeListSQL.txt" For Output As #2
    >
    > Do While Not EOF(1)
    >
    > Line Input #1, excludeMember
    >
    > Print #2, "UPDATE TableName SET ColumnName =
    > 'x'+Right(ColumnName,Len(ColumnName)-1) WHERE (ColumnName = '" &
    > excludeMember & "');"
    >
    >
    > Loop
    > Close #1
    > Close #2
    > End Sub
    >
    >
    >
    > Thanks!
     

Share This Page