424.c

使用labwindows/cvi开发的小程序

#include "adox.h"
#include "tckgrid.h"
#include <formatio.h>
#include <ansi_c.h>

#include <analysis.h>
#include <cvirte.h>		
#include <userint.h>
#include "424.h"

static int panelHandle;
double sine[512],sinedb[512];
static CAObjHandle objhandle;
static CAObjHandle gridobjhandle;




static ERRORINFO errinfo;
static HRESULT status;
static VARIANT source;
static VARIANT activeconnecting;
static char* recordstr;
static VARIANT aff;
static ADODBObj__Recordset recordset;
char buff[512],buff2[512];
static ADODBObj_Fields data1,num;
//BSTR buff,buff1;
//BSTR bstr1,bstr2;
//const char DATA[50],DATA1[50];

int main (int argc, char *argv[])
{
	if (InitCVIRTE (0, argv, 0) == 0)
		return -1;	/* out of memory */
	if ((panelHandle = LoadPanel (0, "424.uir", PANEL)) < 0)
		return -1;
	DisplayPanel (panelHandle);
	RunUserInterface (); 
	 
	DiscardPanel (panelHandle);
	return 0;
}

int CVICALLBACK close (int panel, int event, void *callbackData,
		int eventData1, int eventData2)
{
	switch (event)
	{
	
		case EVENT_CLOSE:
		   QuitUserInterface (0); 
			break;
	}
	return 0;
}

int CVICALLBACK ok (int panel, int control, int event,
		void *callbackData, int eventData1, int eventData2)
{
	int i;
	switch (event)
	{
		case EVENT_COMMIT:
		   SinePattern(512,4.0,0.0,5.0,sine);
		   ADODB_New_Connection (NULL, 1, LOCALE_NEUTRAL, 0, &objhandle);
		   
		  status = ADODB__ConnectionOpen (objhandle, NULL, "DSN=mydb1", "", "", -1);
	      if(status>=0)
		  {
		    MessagePopup ("提示", "成功！！"); 
		  }
		   
		  else
		  {
		    MessagePopup ("提示", "失败！！");
		  }
		  
		//----------------------------------------------------------------------------------  
	   
		//SQL命令方法（connection对象法）
		ADODB__ConnectionExecute (objhandle, NULL, "CREATE TABLE sample2(ID DOUBLE,DATA DOUBLE,DATA1 DOUBLE,DATA2 DOUBLE)", &aff, -1, &recordset);
		  for(i=0;i<512;i++) 
		  {
		   sprintf(buff,"insert into sample2 VALUES(%i,%f,%f)",i,sine[i],sine[i]);
		 
		  ADODB__ConnectionExecute (objhandle, NULL, buff, &aff, -1, &recordset);
		   } 
	      for(i=0;i<512;i++)
		  {	  
		  sprintf(buff2,"select DATA from sample VALUES(%f)",sine[i]); 
          ADODB__ConnectionExecute (objhandle, NULL, buff2, &aff, -1, &recordset); 
		  Scan (buff2, "%s>%s[dt#]%f", &sinedb[i]); 
		  }
	
		
		
	      PlotWaveform (panelHandle, PANEL_GRAPH, sinedb, 512, VAL_DOUBLE, 1.0, 0.0, 0.0, 1.0, VAL_THIN_LINE, VAL_EMPTY_SQUARE,
						VAL_SOLID, 1, VAL_RED);
			
		  
		  
		  
		  
		  ADODB__ConnectionClose (objhandle, NULL);  
		 //---------------------------------------------------------------------------------
		  //MSFlexGridLib_IMSFlexGridSetText (gridobjhandle,0, "表格韩国"); 
        // MSFlexGridLib_NewIMSFlexGrid (panelHandle,"当时的繁华的", 0, 1,PANEL_MSFLEXGRID,0);  
		  
		 
		 //Recordset对象法
	/*	 ADODB__ConnectionExecute (objhandle, NULL, "CREATE TABLE sample(DATA DOUBLE,DATA1 DOUBLE)", &aff, -1, &recordset);    
		 ADODB__RecordsetSetCursorLocation (objhandle, NULL, ADODBConst_adUseClient);   	
		 ADODB__RecordsetSetCursorType (objhandle, NULL, ADODBConst_adOpenKeyset); 
		 ADODB_New_Recordset (NULL, 1, LOCALE_NEUTRAL, 0, &objhandle);
		 CA_CStringToBSTR("mydb1",&bstr1);
		 CA_CStringToBSTR("select * from sample",&bstr2);
		 status=ADODB__RecordsetOpen (objhandle, NULL, CA_VariantBSTR(bstr2), CA_VariantBSTR(bstr1), ADODBConst_adOpenStatic,
							   2, -1);
		 
		 if(status>=0)                        
		 {                                    
		   MessagePopup ("提示", "成功！！"); 
		 }                                    
		                                      
		 else                                 
		 {                                    
		   MessagePopup ("提示", "失败！！"); 
		 }                                    
		 
		 for (i=0;i<512;i++)
		 {
		 ADODB__RecordsetAddNew (objhandle, NULL, CA_DEFAULT_VAL, CA_DEFAULT_VAL);
	
		 ADODB__RecordsetSetCollect (objhandle, NULL, CA_VariantBSTR(buff), CA_VariantDouble(sine[i])); 	
		 CA_CStringToBSTR(DATA,&buff);
		                                                               
		 ADODB__RecordsetSetCollect (objhandle, NULL, CA_VariantBSTR(buff1), CA_VariantDouble(sine[i]));
		 CA_CStringToBSTR(DATA1,&buff1);
		 
		 ADODB__RecordsetUpdate (objhandle, NULL, CA_DEFAULT_VAL, CA_DEFAULT_VAL);
		 
		 }
		ADODB__RecordsetClose (objhandle, NULL);	*/
		
			break;
	}
	return 0;
}

int CVICALLBACK quit (int panel, int control, int event,
		void *callbackData, int eventData1, int eventData2)
{
	switch (event)
	{
		case EVENT_COMMIT:
			QuitUserInterface (0);
			break;
	}
	return 0;
}