BorlandTalk.com Borland discussion newsgroups   Archives   FAQ   Search   Memberlist   Usergroups   Register   Profile   Log in to check your private messages   Log in  How do I add a record to an MS Acess DB using Delphi and ADO          BorlandTalk.com Forum Index -> Delphi Databases (ADO) View previous topic :: View next topic   Author Message sara cox Guest Posted: Sat Dec 27, 2003 5:54 am    Post subject: How do I add a record to an MS Acess DB using Delphi and ADO Hi! I am a newbie and I would like to add records to an MS Access DB using Delphi and ADO within a DLL I wrote in Delphi 7. I have a DSN connection. I (obviously) don't want to use a form - the DLL is accessed through C# / .NET and it sends a string of data which needs to be committed to the Access DB. Right now the DLL is working and I can pass a string to it and it pops up with a message box with the string. Do I use a unit in delphi? A function? A procedure? If you can supply me with some simple sample code, I would greatly appreciate it. Thanks in advance! Sara xoxo Back to top MikeB Guest Posted: Sat Dec 27, 2003 5:51 pm    Post subject: Re: How do I add a record to an MS Acess DB using Delphi and DSN-Less connection. DBQ can be passed or get from INI file. Fields collection accesed by ordinal number or Name. uses ADODB_TLB; procedure TForm1.Button1Click(Sender: TObject); var RS, CN: OleVariant; sSql, sCnStr : string; i : Integer; begin sSql := 'SELECT * from Shippers'; sCnStr := 'Provider=MSDASQL.1;Driver={Microsoft Access Driver (*.mdb)};Dbq=f:AccessSamplesNWind2K.mdb;Uid=admin;Pwd='; CN := CreateOleObject('ADODB.Connection'); CN.Open(sCnStr); RS := CreateOleObject('ADODB.Recordset'); RS.ActiveConnection := CN; RS.CursorLocation := adUseClient; RS.CursorType := adOpenKeyset; RS.LockType := adLockOptimistic; RS.Open(sSql); RS.Addnew; RS.Fields['CompanyName'].value := 'My New Shipper'; RS.Fields['Phone'].value := '(555)555-1212'; //RS.Fields[1].value := 'My New Shipper'; //RS.Fields[2].value := '(555)555-1212'; RS.MoveFirst; RS.Update; RS.Close; end; "sara cox" <saracox2004 (AT) yahoo (DOT) com> wrote Quote: Hi! I am a newbie and I would like to add records to an MS Access DB using Delphi and ADO within a DLL I wrote in Delphi 7. I have a DSN connection. I (obviously) don't want to use a form - the DLL is accessed through C# / .NET and it sends a string of data which needs to be committed to the Access DB. Right now the DLL is working and I can pass a string to it and it pops up with a message box with the string. Do I use a unit in delphi? A function? A procedure? If you can supply me with some simple sample code, I would greatly appreciate it. Thanks in advance! Sara xoxo Back to top sara cox Guest Posted: Sun Dec 28, 2003 3:45 pm    Post subject: Re: How do I add a record to an MS Acess DB using Delphi and MikeB! You are my hero! Thanks for the help. I'm going to give it a shot today and let you know if it worked. Thanks SOOOO much! Sara xoxo "MikeB" <m.byerleyATVerizonDottieNettie> wrote Quote: DSN-Less connection. DBQ can be passed or get from INI file. Fields collection accesed by ordinal number or Name. uses ADODB_TLB; procedure TForm1.Button1Click(Sender: TObject); var RS, CN: OleVariant; sSql, sCnStr : string; i : Integer; begin sSql := 'SELECT * from Shippers'; sCnStr := 'Provider=MSDASQL.1;Driver={Microsoft Access Driver (*.mdb)};Dbq=f:AccessSamplesNWind2K.mdb;Uid=admin;Pwd='; CN := CreateOleObject('ADODB.Connection'); CN.Open(sCnStr); RS := CreateOleObject('ADODB.Recordset'); RS.ActiveConnection := CN; RS.CursorLocation := adUseClient; RS.CursorType := adOpenKeyset; RS.LockType := adLockOptimistic; RS.Open(sSql); RS.Addnew; RS.Fields['CompanyName'].value := 'My New Shipper'; RS.Fields['Phone'].value := '(555)555-1212'; //RS.Fields[1].value := 'My New Shipper'; //RS.Fields[2].value := '(555)555-1212'; RS.MoveFirst; RS.Update; RS.Close; end; "sara cox" <saracox2004 (AT) yahoo (DOT) com> wrote in message news:e6c9da04.0312262154.972f3f7 (AT) posting (DOT) google.com... Hi! I am a newbie and I would like to add records to an MS Access DB using Delphi and ADO within a DLL I wrote in Delphi 7. I have a DSN connection. I (obviously) don't want to use a form - the DLL is accessed through C# / .NET and it sends a string of data which needs to be committed to the Access DB. Right now the DLL is working and I can pass a string to it and it pops up with a message box with the string. Do I use a unit in delphi? A function? A procedure? If you can supply me with some simple sample code, I would greatly appreciate it. Thanks in advance! Sara xoxo Back to top MikeB Guest Posted: Sun Dec 28, 2003 6:41 pm    Post subject: Re: How do I add a record to an MS Acess DB using Delphi and "sara cox" <saracox2004 (AT) yahoo (DOT) com> wrote Quote: MikeB! You are my hero! Thanks for the help. I'm going to give it a shot today and let you know if it worked. Thanks SOOOO much! Sara xoxo "MikeB" <m.byerleyATVerizonDottieNettie> wrote DSN-Less connection. DBQ can be passed or get from INI file. Fields collection accesed by ordinal number or Name. uses ADODB_TLB; procedure TForm1.Button1Click(Sender: TObject); var RS, CN: OleVariant; sSql, sCnStr : string; i : Integer; begin sSql := 'SELECT * from Shippers'; sCnStr := 'Provider=MSDASQL.1;Driver={Microsoft Access Driver (*.mdb)};Dbq=f:AccessSamplesNWind2K.mdb;Uid=admin;Pwd='; CN := CreateOleObject('ADODB.Connection'); CN.Open(sCnStr); RS := CreateOleObject('ADODB.Recordset'); RS.ActiveConnection := CN; RS.CursorLocation := adUseClient; RS.CursorType := adOpenKeyset; RS.LockType := adLockOptimistic; RS.Open(sSql); RS.Addnew; RS.Fields['CompanyName'].value := 'My New Shipper'; RS.Fields['Phone'].value := '(555)555-1212'; //RS.Fields[1].value := 'My New Shipper'; //RS.Fields[2].value := '(555)555-1212'; RS.MoveFirst; RS.Update; RS.Close; // Need to add Close to the Connection object here since it was opened in this scope CN.Close; Quote: end; "sara cox" <saracox2004 (AT) yahoo (DOT) com> wrote in message news:e6c9da04.0312262154.972f3f7 (AT) posting (DOT) google.com... Hi! I am a newbie and I would like to add records to an MS Access DB using Delphi and ADO within a DLL I wrote in Delphi 7. I have a DSN connection. I (obviously) don't want to use a form - the DLL is accessed through C# / .NET and it sends a string of data which needs to be committed to the Access DB. Right now the DLL is working and I can pass a string to it and it pops up with a message box with the string. Do I use a unit in delphi? A function? A procedure? If you can supply me with some simple sample code, I would greatly appreciate it. Thanks in advance! Sara xoxo Back to top sara cox Guest Posted: Wed Jan 07, 2004 8:14 am    Post subject: Re: How do I add a record to an MS Acess DB using Delphi and Thanks again MikeB! It totally worked! To others who are trying this, you may wish to use a DSN connection by using the following line: sCnStr := 'Provider=MSDASQL.1;Persist Security Info=False;Data Source=myDSN'; (myDSN is the name of the DSN you set up in the ODBC connections in the control panel) instead of the DSNless version. Also, you need to go to project / import type library / microsoft activex data objects 2.0 in order to not get an error when trying to use ADODB_TLB. Sara Back to top MikeB Guest Posted: Wed Jan 07, 2004 2:57 pm    Post subject: Re: How do I add a record to an MS Acess DB using Delphi and "sara cox" <saracox2004 (AT) yahoo (DOT) com> wrote Quote: Thanks again MikeB! It totally worked! To others who are trying this, you may wish to use a DSN connection by using the following line: sCnStr := 'Provider=MSDASQL.1;Persist Security Info=False;Data Source=myDSN'; (myDSN is the name of the DSN you set up in the ODBC connections in the control panel) instead of the DSNless version. The real purpose of a DSN-Less connection is it omits the requirement to set up a dsn on EVERY machine that runs the program. You can furnish the information needed for the connection string used by the program in an extraneous source like an INI file on the local machine. This is not so much an issue if the program is run on a stand alone machine. Quote: Also, you need to go to project / import type library / microsoft activex data objects 2.0 in order to not get an error when trying to use ADODB_TLB. Sara Back to top Display posts from previous: All Posts1 Day7 Days2 Weeks1 Month3 Months6 Months1 Year Oldest FirstNewest First         BorlandTalk.com Forum Index -> Delphi Databases (ADO) All times are GMT Page 1 of 1   Jump to: Select a forum C++ Builder Newsgroups----------------C++ BuilderC++ Builder (ActiveX)C++ Builder (Announcements)C++ Builder (Command Line Tools)C++ Builder DatabasesC++ Builder Databases (ADO)C++ Builder Databases (Desktop)C++ Builder Databases (InterBase Express)C++ Builder Databases (Multi-Tier)C++ Builder Databases (SQL Servers)C++ Builder (Graphics)C++ Builder (IDE)C++ Builder (Internet)C++ Builder (Internet Socket)C++ Builder (Internet Web)C++ Builder (Jobs)C++ Builder (Language)C++ Builder (Language C++)C++ Builder (Compatibility with MFC)C++ Builder (Native API)C++ Builder (Non-Technical)C++ Builder (Students)C++ Builder (Third Party Tools)C++ Builder (Upgrade)C++ Builder (VCL)C++ Builder (VCL Components Usage)C++ Builder (VCL Components Development)C++ Builder (VCL Usage)C++ Builder (WinAPI)C++ Builder Installation Delphi Newsgroups----------------Delphi (General)Delphi ActiveX Controls UsageDelphi ActiveX Controls DevelopmentDelphi As400Delphi DatabasesDelphi Databases (ADO)Delphi Databases (dbExpress)Delphi Databases (Desktop)Delphi Databases (InterBase Express)Delphi Databases (Multi-Tier)Delphi Databases (SQL Servers)Delphi DeploymentDelphi GraphicsDelphi IDEDelphi InternationalizationDelphi InternetDelphi Internet Isapi-WebBrokerDelphi Internet WebSnapDelphi Internet WinsockDelphi JobsDelphi Language BASMDelphi Language ObjectPascalDelphi Model Driven Architecture (General)Delphi Model Driven Architecture (Third Party)Delphi MultimediaDelphi Native APIDelphi Non-TechnicalDelphi ObjectPascalDelphi OLE AutomationDelphi OO designDelphi OpenToolsAPIDelphi Reporting-ChartingDelphi RTLDelphi StudentsDelphi TeamSourceDelphi Thirdparty ToolsDelphi Thirdparty Tools (General)Delphi Thirdparty Tools (IntraWeb)Delphi Thirdparty Tools (RaveReports)Delphi UpgradeDelphi VCLDelphi VCL ComponentsDelphi VCL Components UsingDelphi VCL Components WritingDelphi WebServices SOAPDelphi WinAPIDelphi XMLDelphi Installationcomp.lang.pascal.delphi.components.misccomp.lang.pascal.delphi.components.usagecomp.lang.pascal.delphi.components.writingcomp.lang.pascal.delphi.databasescomp.lang.pascal.delphi.misccomp.sources.delphi JBuilder Newsgroups----------------JBuilderJBuilder AnnouncementsJBuilder Applet IssuesJBuilder As400JBuilder CompilerJBuilder CORBA/RMIJBuilder DatabasesJBuilder DB SwingJBuilder DebuggerJBuilder DeploymentJBuilder DocumentationJBuilder EnterpriseJBuilder HandheldJBuilder IDEJBuilder JavaJBuilder JavaAPIJBuilder Java LanguageJBuilder Java SwingJBuilder Java BeansJBuilder Java Beans UsageJBuilder Java Beans DevelopmentJBuilder JBCLJBuilder JDataStoreJBuilder JobsJBuilder LinuxJBuilder MacintoshJBuilder & MobileSetJBuilder MultiLingual AppsJBuilder Non-TechnicalJBuilder OpenToolsJBuilder Servlets (JSP)JBuilder StudentsJBuilder Team DevelopmentJBuilder Thirdparty ToolsJBuilder UpgradeJBuilder Installation InterBase Newsgroups----------------InterBaseInterBase Bug DiscussionInterBase GeneralInterBase IBConsoleInterBase OpenSourceInterBase ReplicationInterBase SQLInterBase ThirdpartyInterBase Installation Miscellaneous Borland Newsgroups----------------AppCenterAppServerEnteraVisiBroker  You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum Powered by phpBB © 2001, 2006 phpBB Group SEO toolkit © 2004-2006 webmedic.