此脚本在2000下运行ok,在XP下编辑就出错了,请指教

已锁定

淡蓝色

  • 帖子

    163
  • 精华

    1
  • 被关注

    2

论坛等级:游士

注册时间:2005-09-12

普通 普通 如何晋级?

此脚本在2000下运行ok,在XP下编辑就出错了,请指教

613

1

2011-03-09 11:47:38

此脚本在2000下运行ok,在XP下编辑就出错了,请指教!
void DKGY(char * text1)
{
#pragma code ("comdlg32.dll")
#include "commdlg.h"
#pragma code()

BOOL bRet;
OPENFILENAME ofn;
char szFilter[] = "DL files*.dlAll DL Files*.dl";
char* psz;
char szFile[_MAX_PATH+1];
char szInitialDir[_MAX_PATH+1] = "C:\\";


char Gname[_MAX_PATH+10]="";
char Gname2[_MAX_PATH+10]="";
int mm,nn,j;
char * psz2;
char Gname3[_MAX_PATH+10]="";
BOOL GetProjectPath(char * lpstrProjectPath);


ofn.lStructSize = sizeof(OPENFILENAME);

ofn.hwndOwner = FindWindow(NULL,text1);

for (psz = szFilter; *psz; psz++)
{
if (*psz == '')
{
*psz = 0;
}
}
ofn.lpstrFilter = szFilter;

ofn.lpstrFile = szFile;

ofn.nMaxFile = _MAX_PATH+1;


GetProjectPath(szInitialDir); //if function fails initial//directory is "C:\\"

ofn.lpstrInitialDir = szInitialDir;

bRet = GetOpenFileName(&ofn);

{

FILE* pFile = NULL;

char szFile1[_MAX_PATH+10];

int i;




strcpy(szFile1,ofn.lpstrFile);
strcpy(Gname,szFile1);


strcpy(Gname2,"");
if ((psz2=strrchr(Gname,'.'))!=NULL)
{

* psz2=0;
nn=strlen(Gname);
SetTagSDWord("strlen",nn);

}
if ((psz2=strrchr(Gname,'\\'))!=NULL)
{
mm=psz2-Gname+1;


}
for (j=mm;j<=nn+1;j++)
{

Gname2[j-mm]=* (Gname+j);

}

SetTagChar("gyName",Gname2);

SetTagChar("ProPath",szFile1);

}

此脚本在2000下运行ok,在XP下编辑就出错了,请指教 已锁定
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有32566条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

  • 分享

  • 只看
    楼主

top
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。