Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Private Sub Command1_Click() Dim dbbiblio As Database Dim rds As Recordset Set dbbiblio = OpenDatabase("C:\Program Files\Microsoft Visual Studio\VB98\biblio.mdb") Set rswholetable = dbbiblio.OpenRecordset("Select * from Titles order by title") Do Until rswholetable.EOF = True Debug.Print rswholetable.Fields("Title") & rswholetable.Fields("ISBN") rswholetable.MoveNext Loop rswholetable.AddNew rswholetable.Fields("Title") = "dennis" rswholetable.Fields("ISBN") = 1234 rswholetable.Fields("PubID") = 1 rswholetable.Update
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Why am I getting "No Duplicate Values Found" on this spreadsheet when there very clearly ARE duplicates?||12||573|
|Excel VBA - Run Time error '1004' Application-defined or object-defined error||4||526|
|converting visio 2010 to powerpoint 2010 - formatting issues||5||123|
Join the community of 500,000 technology professionals and ask your questions.