asked on

How do I insert a value (including commas) into a text field from ASP Classic into Access

Hi EE Brainstrust and thanks in advance for your help

I am having some issues with looking for code or trying to figure out how to insert a value into a text field which has a comma in it, can anyone help?

Fabrice Lambert

Run a parameterized query.
Sample code:

    '// Parameterized query SQL code
Dim sql As String
sql = vbNullString
sql = sql & "PARAMETERS TextData Text;" & vbCrLf
sql = sql & "INSERT INTO MyTable(data)" & vbcrlf
sql = sql & "VALUES ([TextData]);"


Dim db As DAO.Database
Set db = CurrentDb

   '// create a temporary querydef object
Dim qd as Access.QueryDef
Set qd = db.CreateQueryDef("TempQD", sql)
   '// fill up parameters
qd.Parameters("TextData") = "Value, with coma (or whatever hexotic characters)";
qd.Execute(dbFailOnError)
qd.Close
    '// cleanup
db.QueryDefs.Remove(qdf.Name)

Open in new window

ste5an

It's the same as with a value without comma, e.g. something like:

Set cmd = server.CreateObject("ADODB.Command")
cmd.ActiveConnection = yourConnection
cmd.CommandText = "INSERT INTO yourTable ( keyColumn1, valueColumn2 ) VALUES ( ?, ? );"
cmd.CommandType = adCmdText
cmd.Parameters.Append cmd.CreateParameter("@keyColumn1, adInteger, adParamInput, 4, key)
cmd.Parameters.Append cmd.CreateParameter("@valueColumn2, adVarchar, adParamInput, 20, value)
cmd.Execute

Open in new window

ASKER CERTIFIED SOLUTION

Scott Fell

membership

This solution is only available to members.

To access this solution, you must be a member of Experts Exchange.

Start Free Trial