怎样直接从*.xls文件中直接读取数据，不要用ODBC和OLE等（急！！！解决就给分）分不够还可以再加！！！！

[tengfei2002]

如题！！！最好能给一个完整的例子
[e-mail]
或
[e-mail]

[tengfei2002]

我有一个很重要的XLS文件，打不开了，我想能恢复多少是多少

[shaojun1314]

呵呵，我也不知道，期待大虾的解答！

[snaill]

那估计很难了，XLS的文件格式不是开放的

[tengfei2002]

CFile f;
CFileException e;

// 打开文件
if (!f.Open("F:\\Book1.xls", CFile::modeRead, &e))
{
TCHAR szError[1024];
e.GetErrorMessage(szError, 1024);
AfxMessageBox(szError);
return;
}
// 第二步：读取版本号
// 读取版本
DWORD dwPos = f.GetPosition();

DWORD dwLen= f.GetLength();
while (dwPos < dwLen)
{
nRead = f.Read((void*)&RecNo, 2);
if (RecNo == XL_BOF)
{
WORD Ver, Type;
f.Read((void*)&RecLen, 2);
f.Read((void*)&Ver, 2);
f.Read((void*)&Type, 2);
f.Seek(RecLen, CFile::current);

int ver = 0;
switch (Ver)
{
case BIFF7:
ver = 7;
break;
case BIFF8:
ver = 8;
AfxMessageBox("Biff8");
break;
}

int type = 0;
switch (Type)
{
case WORKBOOK:
type = 5;
AfxMessageBox("Workbook");
break;
case WORKSHEET:
type = 16;
AfxMessageBox("Worksheet");
break;
case CHART:
type = 32;
AfxMessageBox("Chart");
break;
}

break;
}
dwPos = f.GetPosition();
}
// 第三步：读其它数据
f.SeekToBegin();
dwPos = f.GetPosition();
// 读表格数据
while (dwPos < dwLen)
{
nRead = f.Read((void*)&RecNo, 2);
switch (RecNo)
{
case XL_BOF:
{
f.Read((void*)&RecLen, 2);
AfxMessageBox("Bof");
}
break;
case XL_BOUNDSHEET:
{
DWORD temp;
BYTE visi;
BYTE type;
TCHAR name;

f.Read((void*)&RecLen, 2);
f.Read((void*)&temp, 4);
f.Read((void*)&visi, 1);
f.Read((void*)&type, 1);
f.Read((void*)&StrLen, 2);
f.Read((void*)&name, StrLen);

char buf[128];
memset(buf, 0x0, 128);
strncpy(buf, &name, StrLen);

AfxMessageBox(buf);
}
break;
case XL_DIMENSION:
f.Read((void*)&RecLen, 2);
f.Seek(RecLen, CFile::current);
AfxMessageBox("Dimension");
break;
case 0xE2: // INTERFACED
f.Read((void*)&RecLen, 2);
AfxMessageBox("e2");
break;
case XL_SST:
f.Read((void*)&RecLen, 2);
f.Seek(RecLen, CFile::current);
AfxMessageBox("SST");
break;
case XL_NUMBER:
f.Read((void*)&RecLen, 2);
AfxMessageBox("Number");
break;
case XL_STRING:
f.Read((void*)&RecLen, 2);
AfxMessageBox("String");
break;
case XL_RK:
f.Read((void*)&RecLen, 2);
AfxMessageBox("RK");
break;
case XL_LABEL:
{
f.Read((void*)&RecLen, 2);
AfxMessageBox("Label");
}
break;
case 0xD6:
f.Read((void*)&RecLen, 2);
AfxMessageBox("RString");
break;
case XL_EOF:
dwPos = dwLen;
AfxMessageBox("Eof");
break;
default:
nRead = f.Read((void*)&RecLen, 2);
if (nRead == 0)
dwPos = dwLen;
break;
}
}
// 第四步：关闭文件
f.Close();



这段代码据说可以读xls的结构，谁能让他编译通过呀？

[薛定谔之死猫]

mark

[wonhao]

up

[liuxianzhi]

我有个例子程序，已经发到楼主的信箱了，需要的朋友可以在这里留言或者给我发信息。

[red-fly]

给我看一看，

[e-mail]

[wentrue]

给你一个在VCBASE上找到的直接读取EXCEL文件的源代码。以前我也用过的：
http://www.vckbase.com/code/downcode.asp?id=2079

[13880079673]

如果只是简单的表格,你又知道格式的话就用读文本文件的方法,'\n'是换行,'\t'是换列

[wentrue]

已经发过去了 接分～～～～

[tengfei2002]

谢谢 liuxianzhi(碧渊)和wentrue(上，向上)

[tengfei2002]

liuxianzhi(碧渊)和wentrue(上，向上)
可以去“数据库”版中，回复这个问题，我把那个贴子也结了

[追求自由]

mark