unit1.~cpp

ORACLE数据库的批量插入例子

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include "dbclass.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
	CDbClass *m_pdbclass = new CDbClass("主线程",1);
	if (m_pdbclass->convert_Connected_Database == DATABASE_STATUS_DISCONNECTED) {  //脸上数据库
		m_pdbclass->CONVERT_DB_CONNECT("ygdx","ygdx","smslocal");
		if (m_pdbclass->convert_Connected_Database == DATABASE_STATUS_DISCONNECTED) {
      ShowMessage("无法连接上数据库");
      delete m_pdbclass;
      return;
		}
	}
  char time1[23];
  char time2[23];
  memset(time1,0,sizeof(time1));
  memset(time2,0,sizeof(time2));
  m_pdbclass->InsertIntoRoarMsg(time1,time2);
  Memo1->Lines->Add(time1);
  Memo1->Lines->Add(time2);
	m_pdbclass->convert_Discont_db();
	delete m_pdbclass;
}
//---------------------------------------------------------------------------