ieldType=='D'{count+=8;continue;}else ifrec->fieldi.fieldType=='I'{count+=4;continue;}else ifrec->fieldi.fieldType=='T'{count+=6;continue;}count+=rec->fieldi.fieldLen;}return count+1;}pDbfHand NewDbfHeadpDbfHand hand, pDbfRec recieldType;= 0;switch{case DOUBLE:= 8;break;case FLOAT:= 4;break;case INT:= 4;break;case SHORT:= 2;break;default:= rec-> fieldi.fieldLen;break;}strcpy, rec-> fieldi.fieldName;+= shortrec-> fieldi.fieldLen;if-1 ==fwritechar&field, sizeofFieldDcp , 1 , hand->fd return NULL;}hand-> = 0x20;hand-> = rec-> realCounts;for i = 0; i < rec-> realCounts; i++hand-> i = rec-> fieldi;return hand;}void WriteFieldEndpDbfHand handieldName,,sizeof;hand-> i.fieldLen = ;hand-> i.fieldType = ;hand-> i.fieldDcis = ;hand-> i.offset = ;}fori=0;i<hand->;i++{forj=0;hand->i.fieldNamej='\0';j++{hand->i.fieldNamej=tolowerhand->i.fieldNamej;}}return hand;}char SaveDate char strieldType == DA TE && record-> fieldi.fieldData = NULL record-> fieldi.fieldData = SaveDaterecord-> fieldi.fieldData;curFieldLen = hand-> i.fieldLen;actDataLen = strlenrecord-> fieldi.fieldData;if actDataLen > curFieldLenactDataLen = curFieldLen;memcpy&bufnPos, record-> fieldi.fieldData, actDataLen;nPos += hand-> i.fieldLen;}bufhand-> = '\0 ';if -1 == fwritebuf, hand-> , 1 , hand->fdrest = FALSE;return rest;}char ReadDbfDate char strieldName{flag=1;break;}}ifflagreturn j;elsereturn -1;}int IsBottomRecordpDbfHand handieldData=charmallochand->m.fieldLen+1;memsetrec->fieldm.fieldData, 0x00, hand->m.fieldLen+1;}if -1== fseekhand->fd,hand->curFpAddr, SEEK_SET ieldLen;memcpyrec->fieldi.fieldData,recData+fieldOffset,curFieldLen;rec->fieldi.fieldData = DsdStrEndSpacerec->fieldi.fieldData, curFieldLen;if rec->fieldi.fieldType == DATE && rec->fieldi.fieldData0 = 0x20rec->fieldi.fieldData =ReadDbfDaterec->fieldi.fieldData;}return 1;}pDbfHand AddRecpDbfHand hand, pDbfRec recordieldData=charmalloclen+1;memsetreci->fieldhand->.fieldData, 0x00, len+1;reci->realCounts++;}}strcpyhand->hand->.fieldName,field_name;hand->hand->.fieldNamestrlenfield_name='\0';hand->hand->.fieldType=type;hand->hand->.fieldLen=len;hand->hand->.fieldDcis=dec;hand->++;reccounts=hand->;hand->fd=fopen"c:\\数据库\\","w";fclosehand->fd;hand->fd=fopen"c:\\数据库\\","w+b";ifNewDbfHeadhand, &hand->rec == NULLreturn NULL;if NULL == WriteFieldDicsribehand, &hand->recreturn NULL;WriteFieldEndhand;if0=fclosehand->fdreturn NULL;fori=0;i<reccounts;i++AddRechand,reci;return hand;}pDbfHand AlterFieldpDbfHand hand,char field_name,char type,int len,int decieldDcis=dec;reci->fieldnum.fieldLen=len;reci->fieldnum.fieldType=type;}}hand->num.fieldType=type;hand->num.fieldLen=len;hand->num.fieldDcis=dec;reccounts=hand->;hand->fd=fopen"c:\\数据库\\","w";fclosehand->fd;hand->fd=fopen"c:\\数据库\\","w+b";ifNewDbfHeadhand, &hand->rec == NULLreturn NULL;if NULL == WriteFieldDicsribehand, &hand->recreturn NULL;WriteFieldEndhand;if0=fclosehand->fdreturn NULL;fori=0;i<reccounts;i++AddRechand,reci;return hand;}pDbfHand DropFieldpDbfHand hand,char field_name,int nieldDcis=reci->fieldnum+1.fieldDcis;reci->fieldnum.fieldLen=reci->fieldnum+1.fieldLen;reci->fieldnum.fieldType=reci->fieldnum+1.fieldType;num++;}}ifnum==-1{forj=0;j<10;j++hand->num.fieldNamej=0;hand->num.fieldType=0;hand->num.fieldLen=0;hand->num.fieldDcis=0;}else{for;num<n;num++{strcpyhand->num.fieldName,hand->num+1.fieldName;hand->num.fieldType=hand->num+1.fieldType;hand->num.fieldLen=hand->num+1.fieldLen;hand->num.fieldDcis=hand->num+1.fieldDcis;}}hand->;reccounts=hand->;hand->fd=fopen"c:\\数据库\\","w";fclosehand->fd;hand->fd=fopen"c:\\数据库\\","w+b";ifNewDbfHeadhand,&hand->rec == NULLreturn NULL;if NULL == WriteFieldDicsribehand,&hand->recreturn NULL;WriteFieldEndhand;if0=fclosehand->fdreturn NULL;fori=0;i<reccounts;i++AddRechand,reci;return hand;}pDbfHand CreateDbfDbfRec rec; bftable_namej+1='d';table_namej+2='b';table_namej+3='f';table_namej+4='\0';do{int field_lengtf=0,flag=1;ieldNamej=sqli;num.fieldNamej='\0';for;sqli==' ';i++;forj=0;sqli=' '&&sqli=',';i++,j++ieldType=Type1j;break;}}ifj==5ieldType=='C'{ieldLen=field_lengtf;}else ifnum.fieldType=='N'||num.fieldType=='F'num.fieldLen=4;else ifnum.fieldType=='D'num.fieldLen=8;else ifnum.fieldType=='S'num.fieldLen=2;field_lengtf=0,flag=1;for;sqli==' ';i++;forj=0;sqli=' '&&sqli=','&&sqli=';';i++,j++lag=1;else{error=0;printf"\n你输入的'KEY'有误,请重新创建\n";break;}}else ifstrcmpcondition,"unique"==0lag=2;else ifstrcmpcondition,"not"==0lag=3;else{error=0;printf"\n你输入的约束条件'NOT NULL'有误,请重新创建\n";break;}}elseieldDcis=0;num.offset=0;=num+1;num++;bf文件return 1;elsereturn 0;}return 1;}int ALTER{char type610={"char","int","short","float","double"};char Type16={'C','N','S','F','D'};FILE fp;int i,j,num,error=1;char T; ; bftable_namej+1='d';table_namej+2='b';table_namej+3='f';table_namej+4='\0';iff=OpenDbf==0 lag=1;else{error=0;printf"\n你输入的'KEY'有误,请重新输入SQL语句\n";}}else ifstrcmpcondition,"unique"==0lag=2;else ifstrcmpcondition,"not"==0lag=3;else{error=0;printf"\n你输入的约束条件'NOT NULL'有误,请重新输入SQL语句\n";}}else lag;iffp=fopen"d:\\","a+b"{printf"打开约束性条件文件失败,请重新输入SQL语句\n";return 0;}fwrite&con,sizeofCondition,1,fp;fclosefp;}}else ifstrcmptemp,"alter"==0ieldName=NULLprintf" %-6s|",f->i.fieldName;}printf"\n";printf"-----------+";fori=0;i<f->;i++printf"-------+";printf"\n";printf"完整性约束|";fori=0;i<f->;i++{switchconi.flag{case 1:printf" 主键|";break;case 2:printf"唯一值|";break;case 3:printf" 非空|";break;default:printf" |";}}printf"-----------+";fori=0;i<f->;i++printf"-------+";printf"\n";printf"TYPE |";fori=0;i<f->;i++{switchf->i.fieldType{case 'N':printf" int |";break;case 'C':printf" char |";break;case 'S':printf" short |";break;case 'F':printf" float |";break;case 'D':printf" double|";break;default:printf" |";}}printf"\n";printf"-----------+";fori=0;i<f->;i++printf"-------+";printf"\n";printf"LENGTH |";fori=0;i<f->;i++printf" %2d |",f->i.fieldLen;printf"\n";printf"-----------+";fori=0;i<f->;i++printf"-------+";printf"\n";}fori=0;i<f->;i++printf"\n";printf"表结构如下:\n";fori=0;i<f->;i++printf"-------+";printf"\n";fori=0;i<f->;i++printf" %-6s|",f->i.fieldName;printf"\n";fori=0;i<f->;i++printf"-------+";printf"\n";fclosefp;return 1;}int a{char mark,n;Show;while1{int i;char order;Read;fori=0;sqli==' ';i++;mark=tolowersqli;switchmark{case 'c':ifCREATEprintf"建表成功\n";else{printf"建表失败\n";continue;}break;case 'a':ifALTERprintf"修改表成功\n";else{printf"修改表失败\n";continue;}break;default:printf"输入错误,请重新输入\n";}printf"是否显示表,请选择y/n\n";whilen=getchar=='\n';whilegetchar='\n';whilen= 'n' &&n='N'&&n= 'y'&&n='Y'{printf"你输入错误,请重新选择y/n\n";whileorder=getchar=='\n';whilegetchar='\n';}ifn=='y'||n=='Y'{ifOutPutprintf"OK\n";elsecontinue;}printf"是否继续操作,请选择y/n\n";whileorder=getchar=='\n';whilegetchar='\n';whileorder = 'n' &&order='N'&& order = 'y'&&order='Y'{printf"你输入错误,请重新选择y/n\n";whileorder=getchar=='\n';whilegetchar='\n';}iforder=='n'||order=='N'break;}return 0;}int b{char mark,n;Show;while1{int i;char order;Read1;fori=0;sqli==' ';i++;mark=tolowersqli;switchmark{case 'c':ifCREATEprintf"建表成功\n";else{printf"建表失败\n";continue;}break;case 'a':ifALTERprintf"修改表成功\n";else{printf"修改表失败\n";continue;}break;default:printf"输入错误,请重新输入\n";}printf"是否显示表,请选择y/n\n";whilen=getchar=='\n';whilegetchar='\n';whilen= 'n' &&n='N'&&n= 'y'&&n='Y' {printf"你输入错误,请重新选择y/n\n";whileorder=getchar=='\n';whilegetchar='\n';}ifn=='y'||n=='Y'{ifOutPutprintf"OK\n";elsecontinue;}printf"是否继续操作,请选择y/n\n"; whileorder=getchar=='\n';whilegetchar='\n';whileorder = 'n' &&order='N'&& order = 'y'&&order='Y'{printf"你输入错误,请重新选择y/n\n";whileorder=getchar=='\n';whilegetchar='\n';}iforder=='n'||order=='N'break;}return 0;}int main{int n;ShowBeginning;while1{printf"请选择执行方式:\n";printf"1、以命令方式运行\n2、以程序方式运行\n3、退出\n";scanf"%d",&n;switchn{case 1:a;break;case 2:b;break;case 3:break;default:printf"你输入错误,请重新选择\n";break;}ifn==3break;}return 0;}。
![毕业设计(论文)-powerbuilder+sql_账务处理系统分析设计与开发[管理资料]](https://img.taocdn.com/s1/m/d887dd0dc8d376eeafaa31a7.png)
