Enter ile belirli yerlerden kodunuzu bölün
DoCmd.RunSQL "INSERT INTO IHALERAPORHAREKETLER ( HAREKETRPRPDEFAULTID, HAREKETRPIHALEID," & vbCrLf & _
"HAREKETRPDEGER, HAREKETRPKONTROL, HAREKETBASLIK, HAREKETRAPORID )SELECT rpeklelist.RPDEFAULTID," & vbCrLf & _
"[Forms]![yeniihale].[Form]![IHALEID] , rpeklelist.RPVARSAYILAN," & vbCrLf & _
"[Forms]![yeniihale]![IHALEID] & [RPDEFAULTID] , rpeklelist.RPDEGISKEN," & vbCrLf & _
"rpeklelist.RPSTDRAPORID FROM rpeklelist;", 0
1. her satır sonuna ," & vbCrLf & _ koyun
2. her satır başına " koyun
3. son satır sonuna ", 0 koyun
________________
Hayri hocam pardon
okileturc, 18-03-2009 tarihinden beri AccessTr.neT üyesidir.