Posts
 
Reputation
Joined
Last Seen
0 Reputation Points
Unknown Quality Score

No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.

0 Endorsements
1 Contribution
Ranked #107.73K
Discussions / Questions x 1
~181 People Reached
Favorite Forums
Databases x 1
Favorite Tags
visual-basic x 1
microsoft:sql-server x 1
microsoft:access x 1

1 Posted Topic

Member Avatar for Rider570
Run time error 3219
Share on Facebook Share on X Share on LinkedIn

Private Sub cmdsummery_Click() Set wss = DBEngine.Workspaces(0) Set dbs = wss.OpenDatabase("Gagedetails.mdb") Set rss = dbs.OpenRecordset("tblGage") 'Set rss1 = dbs.OpenRecordset("tblopeName") Do While Not rss.EOF OSQL = "SELECT DISTINCT OpeName1 FROM tblGage WHERE Date =" & SQLDate(txtdate.Text) Set rss = dbs.OpenRecordset(OSQL) MSQL = rss("OpeName1") NSQL = "INSERT INTO tblOpeName (name)" & " …

Databases microsoft:access microsoft:sql-server visual-basic
Member Avatar for asaukani
0
1
181

The End.