[AccessD] inserting in DAO

Jim DeMarco Jdemarco at hshhp.org
Thu Nov 13 09:19:11 CST 2003


Sure just change to read:
strSQL2 = "INSERT into Neww(a,b,c) Values (" & strLine & ", " & rs(1) & ", " & rs(2)& ")"

HTH

Jim DeMarco
-----Original Message-----
From: Oleg_123 at xuppa.com [mailto:Oleg_123 at xuppa.com]
Sent: Thursday, November 13, 2003 10:15 AM
To: accessd at databaseadvisors.com
Subject: [AccessD] inserting in DAO


hey group
Can I use string name in insert function ?
strSQL2 = "INSERT into Neww(a,b,c) Values (strLine,rs(1),rs(2))"

it gives me an error message
...

Private Sub Command0_Click()
MsgBox ("hey")
Dim strLine As String
Dim strSQL1 As String
Dim strSQL2 As String
Dim db As DAO.Database
Dim i As Integer
Dim rs As DAO.Recordset
Set db = CurrentDb

strSQL1 = "Select * From New"
Set rs = db.OpenRecordset(strSQL1)


  Do Until rs.EOF
strLine = rs("FullName")
MsgBox strLine
i = InStr(strLine, " ")
If i <> 0 Then
    strLine = Left(strLine, i)
End If

rs(0) = strLine

 ' strSQL2 = "INSERT into Neww(a,b,c) Values (strLine,rs(1),rs(2))"
  strSQL2 = "INSERT into Neww(a,b,c) Values (rs(0),rs(1),rs(2))"
Debug.Print strSQL2

    CurrentDb.Execute (strSQL2)
    rs.MoveNext
  Loop

   MsgBox ("end")
End Sub



-----------------------------------------
Get Breaking News from CNN, ABC, NBC, CBS Now.
http://www.xuppa.com/news/?link=webmail


_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


***********************************************************************************
"This electronic message is intended to be for the use only of the named recipient, and may contain information from Hudson Health Plan (HHP) that is confidential or privileged.  If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited.  If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message.  Thank You".
***********************************************************************************



More information about the AccessD mailing list