各位大哥：
小的最近编了个程序，想把内部变量的值以TXT格式保存，并且文件名字可以自己取，但是在运行的时候，经常会出错，实在想不到办法了，请各位帮帮忙，程序和错误如下
FILE* fp;char* a;char* b;char* c;WORD a1;WORD b1;WORD c1;WORD d1;
b=(char*)SysMalloc(60);
a=(char*)SysMalloc(60);
a=GetTagChar("wenjian");


strcpy(b,".txt");
strcat(a,b);
printf("%s\n",a);

fp=fopen(a,"w");
if(fp!=NULL)
{
a1=GetTagWord("a1");
b1=GetTagWord("b1");
c1=GetTagWord("c1");
d1=GetTagWord("d1");
fprintf(fp,"%d\n%d%d\n%d",a1,b1,c1,d1);
}
fclose(fp);
printf("%d%d%d%d\n",a1,b1,c1,d1);
错误：
====================================OnErrorExecute====================================
dwErrorCode1: (ThreadId 1404) 1007006
dwErrorCode2: (ThreadId 1404) 0
szErrorText: (ThreadId 1404) Tag unknown, timeout or conversion failed
szApplicationName: (ThreadId 1404) PDLRuntimeSystem
bCycle: (ThreadId 1404) acycle
szFunctionName: (ThreadId 1404) @1
szTagName: (ThreadId 1404) "xta1"
dwCycle: (ThreadId 1404) 0
szErrorTextTagName: (ThreadId 1404) Tag not exist
lpszPictureName: (ThreadId 1404) NEWPDL0
lpszObjectName: (ThreadId 1404) 按钮1
lpszPropertyName: (ThreadId 1404) (NULL)
dwParamSize: (ThreadId 1404) 12
====================================OnErrorExecute====================================
====================================OnErrorExecute====================================
dwErrorCode1: (ThreadId 1404) 1007006
dwErrorCode2: (ThreadId 1404) 0
szErrorText: (ThreadId 1404) Tag unknown, timeout or conversion failed
szApplicationName: (ThreadId 1404) PDLRuntimeSystem
bCycle: (ThreadId 1404) acycle
szFunctionName: (ThreadId 1404) @1
szTagName: (ThreadId 1404) "xtb1"
dwCycle: (ThreadId 1404) 0
szErrorTextTagName: (ThreadId 1404) Tag not exist
lpszPictureName: (ThreadId 1404) NEWPDL0
lpszObjectName: (ThreadId 1404) 按钮1
lpszPropertyName: (ThreadId 1404) (NULL)
dwParamSize: (ThreadId 1404) 12
====================================OnErrorExecute====================================
====================================OnErrorExecute====================================
dwErrorCode1: (ThreadId 1404) 1007006
dwErrorCode2: (ThreadId 1404) 0
szErrorText: (ThreadId 1404) Tag unknown, timeout or conversion failed
szApplicationName: (ThreadId 1404) PDLRuntimeSystem
bCycle: (ThreadId 1404) acycle
szFunctionName: (ThreadId 1404) @1
szTagName: (ThreadId 1404) "xtc1"
dwCycle: (ThreadId 1404) 0
szErrorTextTagName: (ThreadId 1404) Tag not exist
lpszPictureName: (ThreadId 1404) NEWPDL0
lpszObjectName: (ThreadId 1404) 按钮1
lpszPropertyName: (ThreadId 1404) (NULL)
dwParamSize: (ThreadId 1404) 12
====================================OnErrorExecute====================================
====================================OnErrorExecute====================================
dwErrorCode1: (ThreadId 1404) 1007006
dwErrorCode2: (ThreadId 1404) 0
szErrorText: (ThreadId 1404) Tag unknown, timeout or conversion failed
szApplicationName: (ThreadId 1404) PDLRuntimeSystem
bCycle: (ThreadId 1404) acycle
szFunctionName: (ThreadId 1404) @1
szTagName: (ThreadId 1404) "xtd1"
dwCycle: (ThreadId 1404) 0
szErrorTextTagName: (ThreadId 1404) Tag not exist
lpszPictureName: (ThreadId 1404) NEWPDL0
lpszObjectName: (ThreadId 1404) 按钮1
lpszPropertyName: (ThreadId 1404) (NULL)
dwParamSize: (ThreadId 1404) 12
====================================OnErrorExecute====================================
0000