📄 vc6_0 读取excel2003 数据-基础教程-华软网.mht
字号:
<BR>rewind(f<A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/program/pb/Index.html">PB</A>in);=20
<BR>memset(&gRes_info,'\0',sizeof(struct info));=20
<BR>memset(&gOnoff_info,'\0',sizeof(struct onoffinfo));=20
<BR>gRes_info.m_offset =3D INFOSIZE ; <BR><BR>GetDlg<A =
class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/">IT</A>em(IDC_STARTPUSH)->EnableWindow(F=
ALSE);=20
<BR> // =
=BB=F1=C8=A1=B2=E9=D1=AF=BD=E1=B9=FB <BR> =20
while (!recset.IsEOF()) <BR> { <BR>char=20
buf[10]=3D{0}; <BR>temp.Empty(); <BR>tempdefine.Empty();=20
<BR>memset(gOnoff_info.m_reserve,'\0',16); <BR>gRes_info.m_num =3D 0 ; =
<BR>gRes_info.m_offset +=3D gRes_info.m_width*gRes_info.m_high*2; =
<BR>//<A=20
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>oa(gRes_info.m_offset,buf,10);=20
<BR><BR>recset.GetFieldValue("=CE=C4=BC=FE=C3=FB", s<A =
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>em2); <BR> =
=20
recset.GetFieldValue("=BF=ED=B6=C8", s<A =
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>em3); =
<BR>recset.GetFieldValue("=B8=DF=B6=C8", =20
s<A class=3Dchannel_keylink href=3D"http://www.huarw.com/">IT</A>em4); =
<BR>recset.GetFieldValue("=CB=AE=C6=BD", s<A =
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>em5); =
<BR>recset.GetFieldValue("=B4=B9=D6=B1", =20
s<A class=3Dchannel_keylink href=3D"http://www.huarw.com/">IT</A>em6); =
<BR>recset.GetFieldValue("=D5=C5=CA=FD", s<A =
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>em7); =
<BR><BR>//gRes_info.m_No =20
=3D StringToInt(s<A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>em1); <BR>gRes_info.m_width =3D=20
StringToInt(s<A class=3Dchannel_keylink =
href=3D"http://www.huarw.com/">IT</A>em3);=20
<BR>gRes_info.m_high =3D StringToInt(s<A class=3Dchannel_keylink =
href=3D"http://www.huarw.com/">IT</A>em4); <BR>gRes_info.m_row =
=3D=20
StringToInt(s<A class=3Dchannel_keylink =
href=3D"http://www.huarw.com/">IT</A>em5);=20
<BR>gRes_info.m_column=3D StringToInt(s<A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>em6); <BR>gRes_info.m_num =
=3D=20
StringToInt(s<A class=3Dchannel_keylink =
href=3D"http://www.huarw.com/">IT</A>em7);=20
<BR><BR>gRes_info.m_No =3D tempNo + 1 ; <BR><BR>if (s<A =
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>em2 =3D=3D "" || =
gRes_info.m_width =3D=3D 0 ||=20
gRes_info.m_high =3D=3D 0) <BR>{ <BR>recset.MoveNext(); <BR>fwr<A=20
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>e("\r\n",sizeof("\r\n"),1,fptxt); =
<BR>continue ; <BR>} <BR><BR>if (s<A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>em2 =3D=3D =
"boot01")//=B5=DA=D2=BB=D5=C5=BF=AA=BB=FA=CD=BC=C6=AC <BR>{=20
<BR>gOnoff_info.m_No =3D gRes_info.m_No; =
<BR>gOnoff_info.m_offset=3D=20
gRes_info.m_offset; <BR>gOnoff_info.m_width =3D gRes_info.m_width;=20
<BR>gOnoff_info.m_high =3D gRes_info.m_high; =
<BR>gOnoff_info.m_row =3D=20
gRes_info.m_row; <BR>gOnoff_info.m_column=3D gRes_info.m_column;=20
<BR>gOnoff_info.m_num =3D gRes_info.m_num;=20
<BR>memcpy(gOnoff_info.m_reserve,settag[0],strlen(settag[0]));=20
<BR><BR>fseek(f<A class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/program/pb/Index.html">PB</A>in,INFOSIZE-2*s=
izeof(struct=20
onoffinfo),SEEK_SET); <BR>fwr<A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>e(&gOnoff_info,sizeof(struct=20
onoffinfo),1,f<A class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/program/pb/Index.html">PB</A>in);//=D0=B4=D0=
=C5=CF=A2 <BR>} <BR>if=20
(s<A class=3Dchannel_keylink href=3D"http://www.huarw.com/">IT</A>em2 =
=3D=3D=20
"bye01")//=B5=DA=D2=BB=D5=C5=B9=D8=BB=FA=CD=BC=C6=AC <BR>{ =
<BR>gOnoff_info.m_No =3D gRes_info.m_No;=20
<BR>gOnoff_info.m_offset=3D gRes_info.m_offset; =
<BR>gOnoff_info.m_width =3D=20
gRes_info.m_width; <BR>gOnoff_info.m_high =3D gRes_info.m_high;=20
<BR>gOnoff_info.m_row =3D gRes_info.m_row; =
<BR>gOnoff_info.m_column=3D=20
gRes_info.m_column; <BR>gOnoff_info.m_num =3D gRes_info.m_num;=20
<BR>memcpy(gOnoff_info.m_reserve,settag[1],strlen(settag[1]));=20
<BR><BR>fseek(f<A class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/program/pb/Index.html">PB</A>in,INFOSIZE-siz=
eof(struct=20
onoffinfo),SEEK_SET); <BR>fwr<A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>e(&gOnoff_info,sizeof(struct=20
onoffinfo),1,f<A class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/program/pb/Index.html">PB</A>in);//=D0=B4=D0=
=C5=CF=A2 <BR>}=20
<BR>temp =3D sJpgFile ; <BR>temp +=3D "\\"; <BR>temp +=3D s<A =
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>em2 ; <BR>temp +=3D ".jpg" ; =
<BR>if( (fp =3D=20
fopen(temp, "rb")) =3D=3D NULL)//=B8=C3=CD=BC=C6=AC=B2=BB=B4=E6=D4=DA =
<BR>{ <BR>MessageBox(s<A=20
class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/">IT</A>em2+".jpg=CE=C4=BC=FE=B2=BB=B4=E6=D4=
=DA!","=BE=AF=B8=E6!",MB_ICONWARNING);=20
<BR>fclose(f<A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/program/pb/Index.html">PB</A>in); =
<BR>fclose=20
(fptxt); <BR>GetDlg<A class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/">IT</A>em(IDC_STARTPUSH)->EnableWindow(T=
RUE);=20
<BR>return ; <BR>} <BR>fclose (fp); =
<BR><BR>Cstring2Char(temp,gPushPath) ;=20
<BR>//=BD=E2=C2=EB <BR>dateBuf =3D (char =
*)malloc(gRes_info.m_width*gRes_info.m_high*2);=20
<BR>memset(dateBuf,'\0',gRes_info.m_width*gRes_info.m_high*2); =
<BR>JpgCodec(=20
gPushPath, gRes_info.m_width, gRes_info.m_high); <BR><BR>fwr<A=20
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>e("\r\n",sizeof("\r\n"),1,fptxt); =
<BR>tempdefine =3D defineStr; <BR>tempdefine +=3D s<A =
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>em2 ; =
<BR>Cstring2Char(tempdefine,BmpName)=20
; <BR><BR><A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>oa(gRes_info.m_No,buf,10); =
<BR>fwr<A=20
class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/">IT</A>e(BmpName,strlen(BmpName),1,fptxt); =
<BR>fwr<A class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/">IT</A>e("\t\t\t",strlen("\t\t\t"),1,fptxt)=
;=20
<BR>fwr<A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>e(buf,strlen(buf),1,fptxt);=20
<BR><BR>fseek(f<A class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/program/pb/Index.html">PB</A>in,sizeof(struc=
t=20
info)*tempNo,SEEK_SET); <BR>fwr<A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/">IT</A>e(&gRes_info,sizeof(struct =
info),1,f<A=20
class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/program/pb/Index.html">PB</A>in);//=D0=B4=D0=
=C5=CF=A2=20
<BR>fseek(f<A class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/program/pb/Index.html">PB</A>in,gRes_info.m_=
offset,SEEK_SET);=20
<BR>fwr<A class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/">IT</A>e(dateBuf,gRes_info.m_width*gRes_inf=
o.m_high*2,1,f<A=20
class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/program/pb/Index.html">PB</A>in);//=D0=B4=B5=
=A5=D5=C5=CD=BC=C6=AC=B5=C4RGB=D6=B5=20
<BR>free(dateBuf); <BR><BR>fflush(fptxt); <BR>fflush(f<A =
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/program/pb/Index.html">PB</A>in); =
<BR>tempNo ++;=20
<BR> // =
=D2=C6=B5=BD=CF=C2=D2=BB=D0=D0 <BR> =20
recset.MoveNext(); <BR> =
=20
} <BR><BR>fclose (f<A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/program/pb/Index.html">PB</A>in); =
<BR>fclose=20
(fptxt); <BR><BR> // =B9=D8=B1=D5<A =
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/db/" =
target=3D_blank>=CA=FD=BE=DD=BF=E2</A> <BR>recset.Close();=20
<BR> datab<A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/db/Sybase/">ASE</A>.Close(); =
=20
=20
<BR> } <BR> CATCH(CDBException, e) =
<BR> =20
{ <BR> // <A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/db/" =
target=3D_blank>=CA=FD=BE=DD=BF=E2</A>=B2=D9=D7=F7=B2=FA=C9=FA=D2=EC=B3=A3=
=CA=B1... <BR> =20
AfxMessageBox("<A class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/db/" =
target=3D_blank>=CA=FD=BE=DD=BF=E2</A>=B4=ED=CE=F3: " +=20
e->m_strError); <BR> } <BR> END_CATCH;=20
<BR>MessageBox("=CD=EA=B3=C9!"); <BR>GetDlg<A class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/">IT</A>em(IDC_STARTPUSH)->EnableWindow(T=
RUE);=20
<BR>} <BR><BR>CString CBinModifyDlg::GetExcelDriver() <BR>{ <BR>char=20
szBuf[2001]; <BR> WORD cbBufMax =3D 2000; <BR> =
WORD=20
cbBufOut; <BR> char *pszBuf =3D szBuf; <BR> =
CString=20
sDriver; <BR><BR> // =
=BB=F1=C8=A1=D2=D1=B0=B2=D7=B0=C7=FD=B6=AF=B5=C4=C3=FB=B3=C6(=BA=AD=CA=FD=
=D4=DAodbcinst.h=C0=EF) <BR> =20
if (!<A class=3Dchannel_keylink=20
=
href=3D"http://www.huarw.com/db/Mssql/Index.html">SQL</A>GetInstalledDriv=
ers(szBuf,=20
cbBufMax, &cbBufOut)) <BR> return "";=20
<BR> <BR> // =
=BC=EC=CB=F7=D2=D1=B0=B2=D7=B0=B5=C4=C7=FD=B6=AF=CA=C7=B7=F1=D3=D0Excel..=
. <BR> =20
do <BR> { <BR> if =
(strstr(pszBuf,=20
"Excel") !=3D 0) <BR> { <BR> =
=20
//=B7=A2=CF=D6 ! <BR> =
=20
sDriver =3D CString(pszBuf); <BR> =
=20
break; <BR> } <BR> =
=20
pszBuf =3D strchr(pszBuf, '\0') + 1; <BR> }while =
(pszBuf[1] !=3D=20
'\0'); <BR><BR> return sDriver; <BR>} =
.<BR><FONT=20
color=3D#ffffff>[=BB=AA =C8=ED =CD=F8]</FONT><BR><A =
class=3Dchannel_keylink=20
href=3D"http://www.huarw.com/bbs/" =
target=3D_blank>=B1=E0=B3=CC=C2=DB=CC=B3</A>=A1=A1<VAR=20
=
csdnid=3D"replyLayer">7</VAR>=A1=A1=B8=F6=CD=F8=D3=D1=BB=D8=B4=F0=A3=BA =
=CE=D2=B8=D5=D7=F6=CD=EA =B5=BC=B3=F6 =C3=BB=D3=D0=B6=C1=C8=A1 =
=B2=BB=B9=FD=C4=E3=BF=C9=D2=D4=BC=D3=B6=CF=B5=E3=B5=F7=CA=D4 =
=BF=B4=BF=B4 =C3=BB=D2=BB=B2=BD=CA=C7=B7=F1=20
=B4=EF=B5=BD=C4=E3=B5=C4=D3=EF=BE=E4=B5=C4=D2=AA=C7=F3 =
=CA=C7=B7=F1=D5=FD=C8=B7 <BR>=D7=EE=BA=C3=D3=D0=B8=F6 =BA=C3=C0=FD=D7=D3 =
<BR> .<BR><FONT color=3D#ffffff>[=BB=AA =C8=ED=20
=CD=F8]</FONT><BR><A class=3Dchannel_keylink =
href=3D"http://www.huarw.com/bbs/"=20
target=3D_blank>=B1=E0=B3=CC=C2=DB=CC=B3</A>=A1=A1<VAR =
csdnid=3D"replyLayer">8</VAR>=A1=A1=B8=F6=CD=F8=D3=D1=BB=D8=B4=F0=A3=BA=20
=
=CE=D2=CA=D4=B9=FD=C1=CB,=C3=BB=B7=A2=CF=D6=D3=D0=CA=B2=C3=B4=B4=ED=CE=F3=
.=B5=AB=CA=C7=C7=E9=BF=F6=BB=B9=CA=C7=D2=BB=D1=F9....... =
<BR>=CF=D6=D4=DA=BE=CD=CA=C7=B2=BB=C3=F7=B0=D7=CE=AA=CA=B2=C3=B4=BB=E1=D5=
=E2=D1=F9=B0=A1???????? <BR>=D5=E6=CA=C7=D4=CE=C1=CB!!!!!! =20
=
<P></P><BR><SPAN>=BB=AA=C8=ED=CD=F8=C9=F9=C3=F7=A3=BA=B1=BE=D5=BE=C4=DA=C8=
=DD=C8=AB=B2=BF=C0=B4=D7=D4=CD=F8=C2=E7=A3=AC=C8=E7=D3=D0=C7=D6=B7=B8=C4=FA=
=B0=E6=C8=A8=C7=EB=C0=B4=D0=C5=D6=B8=B3=F6=A3=AC=B1=BE=D5=BE=C1=A2=BC=B4=C9=
=BE=B3=FD=A1=A3<BR>=BD=F8=C8=EB=C2=DB=CC=B3=CC=D6=C2=DB=A3=BA<A=20
href=3D"http://www.huarw.com/bbs/" target=3D_blank><FONT =
color=3Dblue>VC6.0=20
=B6=C1=C8=A1excel2003 =CA=FD=BE=DD</FONT></A><BR>
<SCRIPT language=3Djavascript=20
src=3D"http://www.huarw.com/AhurD/200804/81.js"></SCRIPT>
</SPAN></DL></DIV>
<DIV class=3Dclear></DIV>
<DIV class=3DNextArticle>
<LI>=C9=CF=D2=BB=C6=AA=BC=BC=C7=C9=A3=BA <A class=3DLinkPrevArticle=20
title=3D"=CE=C4=D5=C2=B1=EA=CC=E2=A3=BAdll=C7=B6=CC=D7=B5=F7=D3=C3,=CF=D4=
=CA=BD=C1=B4=BD=D3,=C8=E7=BA=CE=BD=E2=BE=F6? =D7=F7 &=
nbsp; =D5=DF=A3=BA=D8=FD=C3=FB =B8=FC=D0=C2=CA=B1=BC=E4=A3=BA=
2009-1-8 9:13:30"=20
href=3D"http://www.huarw.com/program/vc/vc01/200901/1649190.html">dll=C7=B6=
=CC=D7=B5=F7=D3=C3,=CF=D4=CA=BD=C1=B4=BD=D3,=C8=E7=BA=CE=BD=E2=BE=F6?</A>=
<LI>=CF=C2=D2=BB=C6=AA=BC=BC=C7=C9=A3=BA <A class=3DLinkNextArticle=20
title=3D"=CE=C4=D5=C2=B1=EA=CC=E2=A3=BA=C8=E7=BA=CE=C8=C3MSI=CE=C4=BC=FE=D4=
=DAGUI=B2=BB=CF=D4=CA=BE=B5=C4=C7=E9=D0=CE=CF=C2=A3=AC=B0=B2=D7=B0=B5=BD=D6=
=B8=B6=A8=B5=C4=C2=B7=BE=B6 =D7=F7 =D5=DF=
=A3=BA=D8=FD=C3=FB =B8=FC=D0=C2=CA=B1=BC=E4=A3=BA2009-1-8 =
9:13:32"=20
href=3D"http://www.huarw.com/program/vc/vc01/200901/1649192.html">=C8=E7=BA=
=CE=C8=C3MSI=CE=C4=BC=FE=D4=DAGUI=B2=BB=CF=D4=CA=BE=B5=C4=C7=E9=D0=CE=CF=C2=
=A3=AC=B0=B2=D7=B0=B5=BD=D6=B8=B6=A8=B5=C4=C2=B7=BE=B6</A>=20
<DIV class=3Dclear></DIV></LI></DIV>
<DIV class=3Dtips>
<UL>
<LI =
id=3Dtips_A>=C4=FA=BF=C9=C4=DC=B6=D4=D2=D4=CF=C2=BC=BC=C7=C9=BB=B9=D3=D0=D0=
=CB=C8=A4 </LI>
<LI><A =
href=3D"http://www.huarw.com/program/Comment.asp?ArticleID=3D1649191"=20
target=3D_blank>=B7=A2=B1=ED=C6=C0=C2=DB</A> </LI>
<LI><A=20
=
onclick=3D"javascript:window.external.AddFavorite(window.location.href, =
'VC6.0 =B6=C1=C8=A1excel2003 =CA=FD=BE=DD')"=20
href=3D"http://www.huarw.com/program/vc/vc01/200901/1649191.html#"=20
target=3D_self>=BC=D3=C8=EBIE=CA=D5=B2=D8</A> </LI>
<LI><A=20
=
href=3D"http://www.huarw.com/User/User_Favorite.asp?Action=3DAdd&Chan=
nelID=3D1002&InfoID=3D1649191"=20
target=3D_blank>=BB=AA=C8=ED=CA=D5=B2=D8</A> </LI>
<LI><A =
href=3D"http://www.huarw.com/program/Print.asp?ArticleID=3D1649191"=20
target=3D_blank>=B4=F2=D3=A1=CE=C4=D5=C2</A> </LI>
<LI><A =
href=3D"javascript:window.close();">=B9=D8=B1=D5=D2=B3=C3=E6</A> =
</LI></UL>
<UL></UL>
<DIV class=3Dclear></DIV></DIV>
<SCRIPT language=3Djavascript=20
src=3D"http://www.huarw.com/AhurD/200804/77.js"></SCRIPT>
<DIV =
class=3DNextArticle>=BF=B4=B9=FD=B4=CB=BC=BC=C7=C9=B5=C4=CD=F8=D3=D1=CD=AC=
=CA=B1=BB=B9=BF=B4=C1=CB:</DIV>
<SCRIPT language=3Djavascript=20
src=3D"http://www.huarw.com/AhurD/200804/78.js"></SCRIPT>
<DIV class=3Dcontent_N>
<DIV class=3DpList_left>
<TABLE width=3D"100%" border=3D0>
<TBODY>
<TR>
<TD><A=20
=
href=3D"http://www.huarw.com/program/vc/vc01/200901/1649180.html">=D4=F5=C3=
=B4=D7=D4=B6=A8=D2=E5=D6=BD=D5=C5,=B1=C8=C8=E7=CE=D2=D2=AA=B4=F2=D3=A1A4=D6=
=BD=D5=C5=D2=BB=B0=EB,=D4=DA=A1=AD</A></TD></TR>
<TR>
<TD><A=20
=
href=3D"http://www.huarw.com/program/vc/vc01/200901/1649181.html">=D0=E8&=
lt;windows=BA=CB=D0=C4=B1=E0=B3=CC>=B9=E2=C5=CC=C0=EF=C3=E6CmnHdr.h=CE=
=C4=BC=FE</A></TD></TR>
<TR>
<TD><A=20
=
href=3D"http://www.huarw.com/program/vc/vc01/200901/1649182.html">=B6=FE=BD=
=F8=D6=C6=CE=C4=BC=FE=B5=C4=B4=E6=B4=A2</A></TD></TR>
<TR>
<TD><A=20
=
href=3D"http://www.huarw.com/program/vc/vc01/200901/1649183.html">=B6=E0=CF=
=DF=B3=CC=B5=C4=D5=FD=B3=A3=B7=B5=BB=D8=A3=BF</A></TD></TR>
<TR>
<TD><A=20
=
href=3D"http://www.huarw.com/program/vc/vc01/200901/1649184.html">=BD=E1=B9=
=B9=CC=E5=D0=B4=C8=EB=CE=C4=BC=FE=B5=C4=D2=C9=CE=CA</A></TD></TR>
<TR>
<TD><A=20
=
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -