Insert Multiple Records

by Tom (1 Submission)
Category: Databases/Data Access/DAO/ADO
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 2^nd June 2005
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

API Declarations
Option Explicit

Rate Insert Multiple Records



Dim d As Integer, h As Integer
For d = 1 To 31
  For h = 8 To 17
    DoCmd.RunSQL "INSERT INTO Appointment (LessonDate,StartTime,EndTime) VALUES (#01/" & d & "/2005#,"#" & h & ":00#,#" & h+1 & ":00#)"
  Next h
Next d
End Sub

Download this snippet Add to My Saved Code

Insert Multiple Records Comments

No comments have been posted about Insert Multiple Records. Why not be the first to post a comment about Insert Multiple Records.

Insert Multiple Records

Insert Multiple Records Comments

Post your comment

Difficulty