[AccessD] inserting in DAO

Oleg_123 at xuppa.com Oleg_123 at xuppa.com
Thu Nov 13 09:38:03 CST 2003


great, thank you :--)

> 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".
> ***********************************************************************************
>
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com



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




More information about the AccessD mailing list