igc源碼編譯

『壹』 VC++調試錯誤

//在f:\新建文件夾\pvc6\vc98\include\下創建一個文本文件，把下面的內容粘貼進去，保存，名字改為streambuf
// streambuf standard header

#if _MSC_VER > 1000
#pragma once
#endif

#ifndef _STREAMBUF_
#define _STREAMBUF_
#include <xlocnum>

#ifdef _MSC_VER
#pragma pack(push,8)
#endif /* _MSC_VER */
_STD_BEGIN
// TEMPLATE CLASS basic_streambuf
template<class _E, class _Tr = char_traits<_E> >
class basic_streambuf {
protected:
basic_streambuf()
: _Loc() {_Init(); }
basic_streambuf(_Uninitialized)
: _Loc(_Noinit) {}
public:
typedef basic_streambuf<_E, _Tr> _Myt;
typedef _E char_type;
typedef _Tr traits_type;
virtual ~basic_streambuf()
{}
typedef _Tr::int_type int_type;
typedef _Tr::pos_type pos_type;
typedef _Tr::off_type off_type;
pos_type pubseekoff(off_type _O, ios_base::seekdir _W,
ios_base::openmode _M = ios_base::in | ios_base::out)
{return (seekoff(_O, _W, _M)); }
pos_type pubseekoff(off_type _O, ios_base::seek_dir _W,
ios_base::open_mode _M)
{return (pubseekoff(_O, (ios_base::seekdir)_W,
(ios_base::openmode)_M)); }
pos_type pubseekpos(pos_type _P,
ios_base::openmode _M = ios_base::in | ios_base::out)
{return (seekpos(_P, _M)); }
pos_type pubseekpos(pos_type _P, ios_base::open_mode _M)
{return (seekpos(_P, (ios_base::openmode)_M)); }
_Myt *pubsetbuf(_E *_S, streamsize _N)
{return (setbuf(_S, _N)); }
locale pubimbue(const locale &_Ln)
{locale _Lo = _Loc;
imbue(_Ln);
_Loc = _Ln;
return (_Lo); }
locale getloc()
{return (_Loc); }
streamsize in_avail()
{return (gptr() != 0 && gptr() < egptr()
? egptr() - gptr() : showmanyc()); }
int pubsync()
{return (sync()); }
int_type sbumpc()
{return (gptr() != 0 && gptr() < egptr()
? _Tr::to_int_type(*_Gninc()) : uflow()); }
int_type sgetc()
{return (gptr() != 0 && gptr() < egptr()
? _Tr::to_int_type(*gptr()) : underflow()); }
streamsize sgetn(_E *_S, streamsize _N)
{return (xsgetn(_S, _N)); }
int_type snextc()
{return (_Tr::eq_int_type(_Tr::eof(), sbumpc())
? _Tr::eof() : sgetc()); }
int_type sputbackc(_E _C)
{return (gptr() != 0 && eback() < gptr()
&& _Tr::eq(_C, gptr()[-1])
? _Tr::to_int_type(*_Gndec())
: pbackfail(_Tr::to_int_type(_C))); }
void stossc()
{if (gptr() != 0 && gptr() < egptr())
_Gninc();
else
uflow(); }
int_type sungetc()
{return (gptr() != 0 && eback() < gptr()
? _Tr::to_int_type(*_Gndec()) : pbackfail()); }
int_type sputc(_E _C)
{return (pptr() != 0 && pptr() < epptr()
? _Tr::to_int_type(*_Pninc() = _C)
: overflow(_Tr::to_int_type(_C))); }
streamsize sputn(const _E *_S, streamsize _N)
{return (xsputn(_S, _N)); }
protected:
_E *eback() const
{return (*_IGbeg); }
_E *gptr() const
{return (*_IGnext); }
_E *pbase() const
{return (*_IPbeg); }
_E *pptr() const
{return (*_IPnext); }
_E *egptr() const
{return (*_IGnext + *_IGcnt); }
void gbump(int _N)
{*_IGcnt -= _N;
*_IGnext += _N; }
void setg(_E *_B, _E *_N, _E *_L)
{*_IGbeg = _B, *_IGnext = _N, *_IGcnt = _L - _N; }
_E *epptr() const
{return (*_IPnext + *_IPcnt); }
_E *_Gndec()
{++*_IGcnt;
return (--*_IGnext); }
_E *_Gninc()
{--*_IGcnt;
return ((*_IGnext)++); }
void pbump(int _N)
{*_IPcnt -= _N;
*_IPnext += _N; }
void setp(_E *_B, _E *_L)
{*_IPbeg = _B, *_IPnext = _B, *_IPcnt = _L - _B; }
void setp(_E *_B, _E *_N, _E *_L)
{*_IPbeg = _B, *_IPnext = _N, *_IPcnt = _L - _N; }
_E *_Pninc()
{--*_IPcnt;
return ((*_IPnext)++); }
void _Init()
{_IGbeg = &_Gbeg, _IPbeg = &_Pbeg;
_IGnext = &_Gnext, _IPnext = &_Pnext;
_IGcnt = &_Gcnt, _IPcnt = &_Pcnt;
setp(0, 0), setg(0, 0, 0); }
void _Init(_E **_Gb, _E **_Gn, int *_Gc,
_E **_Pb, _E **_Pn, int *_Pc)
{_IGbeg = _Gb, _IPbeg = _Pb;
_IGnext = _Gn, _IPnext = _Pn;
_IGcnt = _Gc, _IPcnt = _Pc; }
virtual int_type overflow(int_type = _Tr::eof())
{return (_Tr::eof()); }
virtual int_type pbackfail(int_type = _Tr::eof())
{return (_Tr::eof()); }
virtual int showmanyc()
{return (0); }
virtual int_type underflow()
{return (_Tr::eof()); }
virtual int_type uflow()
{return (_Tr::eq_int_type(_Tr::eof(), underflow())
? _Tr::eof() : _Tr::to_int_type(*_Gninc())); }
virtual streamsize xsgetn(_E * _S, streamsize _N)
{int_type _C;
streamsize _M, _Ns;
for (_Ns = 0; 0 < _N; )
if (gptr() != 0 && 0 < (_M = egptr() - gptr()))
{if (_N < _M)
_M = _N;
_Tr::(_S, gptr(), _M);
_S += _M, _Ns += _M, _N -= _M, gbump(_M); }
else if (_Tr::eq_int_type(_Tr::eof(), _C = uflow()))
break;
else
*_S++ = _Tr::to_char_type(_C), ++_Ns, --_N;
return (_Ns); }
virtual streamsize xsputn(const _E *_S, streamsize _N)
{streamsize _M, _Ns;
for (_Ns = 0; 0 < _N; )
if (pptr() != 0 && 0 < (_M = epptr() - pptr()))
{if (_N < _M)
_M = _N;
_Tr::(pptr(), _S, _M);
_S += _M, _Ns += _M, _N -= _M, pbump(_M); }
else if (_Tr::eq_int_type(_Tr::eof(),
overflow(_Tr::to_int_type(*_S))))
break;
else
++_S, ++_Ns, --_N;
return (_Ns); }
virtual pos_type seekoff(off_type, ios_base::seekdir,
ios_base::openmode = ios_base::in | ios_base::out)
{return (streampos(_BADOFF)); }
virtual pos_type seekpos(pos_type,
ios_base::openmode = ios_base::in | ios_base::out)
{return (streampos(_BADOFF)); }
virtual _Myt *setbuf(_E *, streamsize)
{return (this); }
virtual int sync()
{return (0); }
virtual void imbue(const locale& _Loc)
{}
private:
_E *_Gbeg, *_Pbeg;
_E **_IGbeg, **_IPbeg;
_E *_Gnext, *_Pnext;
_E **_IGnext, **_IPnext;
int _Gcnt, _Pcnt;
int *_IGcnt, *_IPcnt;
locale _Loc;
};

#ifdef _DLL
#pragma warning(disable:4231) /* the extern before template is a non-standard extension */
extern template class _CRTIMP basic_streambuf<char, char_traits<char> >;
extern template class _CRTIMP basic_streambuf<wchar_t, char_traits<wchar_t> >;
#pragma warning(default:4231) /* restore previous warning */
#endif // _DLL

_STD_END
#ifdef _MSC_VER
#pragma pack(pop)
#endif /* _MSC_VER */

#endif /* _STREAMBUF_ */

/*
* Copyright (c) 1994 by P.J. Plauger. ALL RIGHTS RESERVED.
* Consult your license regarding permissions and restrictions.
*/

『貳』 ASP無組件上傳源碼解釋

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" " http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns=" http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>無標題文檔</title>
</head><body>
<%If request.totalbytes>0 Then
formsize=request.totalbytes ' 取二進制流位元組長度
formdata=request.binaryread(formsize) ' 讀取二進制流內容
bncrlf=chrB(13)&chrB(10)
datastart=instrb(formdata,bncrlf&bncrlf)+3 ' 取二進制流文件開始位置 (兩個回車換行符)
divider=leftB(formdata,instrb(formdata,bncrlf)-1) ' 定義取二進制流 Field 分隔標記 (內容為二進制)
dataend=instrb(datastart,formdata,divider)-datastart ' 取二進制流文件部分結束位置
'將文件信息保存到資料庫
'Call ImgToDb() '將上傳的圖片以二進制保存到資料庫中
Call SaveTofile() '將上傳的文件保存到伺服器
End If
Sub ImgToDb() '將上傳的圖片以二進制保存到資料庫中
mydata=midb(formdata,datastart+1,dataend)'
Set conn=server.CreateObject("adodb.connection")
conn.provider="microsoft.jet.oledb.4.0"
conn.open server.mappath("book/stu.mdb")
Set rs=server.CreateObject("adodb.recordset")
rs.open "select * from img",conn,3
rs.movelast
rs.addnew
rs("img").appendchunk mydata
rs.update
response.binarywrite rs(1)
response.End
End Sub
Sub SaveTofile()'將上傳的文件保存到伺服器
'2.將獲取的信息以二進制流文件存放 --- stm
savepath=server.mappath("images")&"\" '根據情況自己要先建立相應目錄 或者開啟fso自動建立
Set strm=createObject("adodb.str"&"eam")
with strm
.type=1 ' 二進制模式
.mode=3 ' 指定打開模式為讀寫
.open
.write formdata '寫入二進制流內容
'以文本模式讀取數據,用於獲得提交上來的文件路徑及名稱等信息
.position=0 '將游標指向數據首部
.type=2 '以文本模式讀取
.CharSet = "gb2312" '設置中文編碼
formhead=.ReadText(datastart-1) '讀取表單頭部內容
End with
'2.1獲取上傳的文件名稱filename
fullname=fRegExpSgl(formhead,true,true,true,"[\s\S]*filename\=""(.*?)""[\s\S]*","$1")
fname=Split(fullname,"\")
filename=fname(UBound(fname)) '獲取到文件名
Set fso = Server.CreateObject("Scripting.File"&"System"&"Object") '判斷是否與本地盤文件重名,否則重命名 XXX(1).xxx
If fso.FileExists(savepath&filename) Then
For i=1 To 999
Fxname=Split(filename,".")
Fn=Left(filename,InstrRev(filename,".")-1)
Fnx=fxname(UBound(fxname))
If Not fso.FileExists(SavePath&Fn&"("&i&")."&Fnx) Then
filename=Fn&"("&i&")."&Fnx
Exit For
End If
Next
End If
'3.從stm二進制流文件中獲取有效信息 及 保存文件
Set formstrm=createOBject("adodb.str"&"eam")
with formstrm
.type=1 ' 二進制模式
.mode=3
.open
strm.position = datastart ' 指定 stm 對象的起始位置, 以變數 bStart 的值為起始位置
strm.To formstrm,dataend ' 拷貝 stm 二進制流至 fromStm 對象, 長度為 bEnd 變數的長度
.saveTofile (savepath&filename),2 ' 將信息保存到文件, 如果存在相同名稱, 則覆蓋
.close
end with
Set strm=Nothing
Set formstrm=Nothing
response.redirect "?upload=ok&name="&filename
End Sub function fRegExpSgl(str,glb,igc,mtl,pt,rpt)
dim re
set re=new RegExp
re.global=glb
re.ignoreCase=igc
re.multiline=mtl
re.pattern=pt
fRegExpSgl=re.replace(str,rpt)
set re=nothing
end function
%>
<html>
<body leftmargin="0" topmargin="0">
<form action="" method="post" name="form1" enctype="multipart/form-data">
<!-- enctype="multipart/form-data"不能省略,以保證提交過來的信息的正確性,可以遠程提交信息 -->
<input name="FileName" type="FILE" class="tx1" size="40" style="height:22">
<input type="submit" name="Submit" value=" 上傳 " style="color:red;height:22;width:70">
</form>
<%
'''測試語句:輸出相關圖片
If request("upload")="ok" Then
response.write "<img src=""images/"&request("name")&""">"
End If
%>
</body>
</html>
</body>
</html>

『叄』 網路游戲怎麼改源碼啊

勇士的信仰
eNrdW0t3gkyT3s1///tP//+NdpKx09TSf2D//h+ma6yxS46f0yyn5liX5fJ+/zHqds+8kqe2V+LZ/b5nbbvOInv6Ew+67DMSYJeQ00MPWG6yazH8yP+LNOtgcHQezb5Rl7Je/pm8Z6+Xn3P1tDx80mykdfH86nd3BiO/+8Pu7UjbdhMuGFZ8uQ7w7/gvQ1JMHza7BeU5yVvIxPnA+wpcnnpvNjbwinkPgOSLrbtZGXh/rkh2Xl3P7HjHLNHTdLc+YRU7Cpvx5G+2jvtw4xfXB55j//S7S43I8PZ3A7L/Uqn4E1AV20D3xt+Hj++/qFnReXUJnfdjIa3nmAfBoncm6k86/W8TLJz0Amp1tQbuzq++57jt9T04v31PRynbvj68xZSd+yrmBrHRvZ2uCxt7EDe1MqfHYGhZ/pDEqbtXzQG6u0r2QC52n//CL3Y/f/WxbIhu9B3a+4jw80y002bYOvtbi/41e+nsHVgb9Neb1/r4t1+v/7a1fuuyv2/X//f6pfzINzsyPjFE+zbLn101XPcmciPqv5Qst++pcZxP3uNz7h+7knH2EELc7tzmnB//vJqtNPFnOlr3sc64Ov+eTy0k8p0WX1STLQ+++42nh82onzZuxxnU+9t1cvO/Brc7cPjvsQrbdbugQ+dH0L+rgjHpW1h3/VML/31O8SAxaqO1ybCPw8/CK8RxIZewt/TNQPLMOylFea+YVjMChL///x7gh/+8tplC0bvvjf8rH/+3Kv0x+/+LzRz5T4VOVY+FTVq9KGmJfUju+EdihxWqRXeK5/Ac+vLEc8i/+KfDchOtj///348eIzwZ//Niq3WXiUWf33I3hc8HDOG+GQ87rM9eX8cCjuNE/R+xxH4wCU4on0S9PQtoifi9ZeM299o/yNY++NP/fEh8uqcJXb5wb5N0N//qax5vjYjf7Xe6GGZv6ynKXbcyJy/PPcHqPA6u+z2OdMwI//Z6wZxZJ21M/ymZ+lxXp3Ek8uKvf1Dzymg/3ppwf/Xb5HC+HviO8lU0rfJuz1aJc+x7GnYDO/DeT/+/59Wsq9v0/GMccKXGbhx9TIHvx3QT9iZK++FU8HnIEY3AglwvHZe+Ct7DU3CiX9vCljtb/+/91pj7cDhDnv/+Td5RdbjsFi/zdG7IG44twfdHvdJvbiim+pSxvpf8v5vKaNvlJMxsF+/P4vJeWsf4Dt++Bz9bFMgejbII/Vk+E71FhQ/XRgx+/y2O0VX1Wkedgk1jXnMg4Na/+CY9N+GXatKuUI1vOL5jpbvvAV+/VageKpzPl6TEGJ6ws5ZH9V+R+q9U7Kx2kbGf+miQidN/4fD9n+1M1C1h3+/++ojDU63T6V/Xsv5FeMqkLLK8Iu9+i5/T8/+/bQHeZb/hfCdKfRl7FT0RdaLGxT71sA/rI2Q8w3x4/ygGwHdGOcAa7Bl50luEhftaC/hRdA9bCQmPON3/kqsrqCadx/kF+DzFrXUjvRHfdp/kP4r1av+ayHX05i9AZ/Qv1isIm/Hg7zVMmndUuK/fb3onxg5xwW5M3AuQ5l3iLpSf6Wlv+ZU3A++7oNyZlM4428ojP09zymU1+WArbpNwOJ8R7y6kMuYZl//L3vkeRwQHmmCvK1oPy/S/ew/mo/dAY1UidWFP6hq1trTrDs1B1vLckwq+6cxlfGhWaxlZ+L/+CpJwM86PdTPgBrCbU4w3CvHe+PdO7GPxlzg0WlMayqydtLSK/byB+/+688T/+PueBmi9xU0ixrM/9l1+n+Yvk6Zv2xXcSC5wQvoU+/32IKcY1iBn5Imc/+wR105yFmNtCk+7FTRqyb0vXvjklfDAl594ktrso9b+67Kqsn51imO+ZGx6hdhCsH3JCb1mljUgbD/g5zF6tF6o8Swt2WFb++I6D+/bkD8I+Wu/SPjb9BD6uWa1nHLg+++/Ixpzzl8/Vfm8C2Uw3fhWZ/+6cn1FDtnJ3HOtv4v/+/A/+nwnO6zmVcZA5C40/xE18ZfTUuYF7kdhVz1jYl0M/XF/Rfc3dK+gexXda+i+7i3UG8O4h3B//gHa3L8TqG16klbQ/x7iHePcS7h3j3EO8e4t1DvHuIdw/x7mHePwnvN8y7h3n/JLzfMO8M8c748+H9/JuUuS40CMfp//5vCSzvwP+++/Z74zr/+//+EO9VP+meQl/+/lzt7P/M7v6temi13nc08ezwbQS/6sYZlfdJjTyFuOlOU051BH7+VU7W/H8m++ocxFDWd8t6eGAI//lbdW5jKesVK4rtj/D8PLGIXKHP4Hi0p7kFe+0dn+ZBQomvQjrn4gk5LN+rcjBlTcMkvqstZkK++7Jz61/1PAwT+//9DasCdrAaNqnuHImo+DctoCF9J+xbdcd3qut9ZU+T+V5gcHeT60Lvoh9ecD9b5CyB/DK6pTuHQOgnE5s6usC+O6x0rM6tO9Rn/O72ZWWfektSJp/+Ve7L3uzZf5j8/hlU3s7y/zwTPbe5HFifOqS3qCaSv+WIr8JvRaTPenjXX6BYdEZ8Tc5I45+A+BDv8sKqnlnI37qQycTqIXbO+Rfh+IdOjnLd7CviNiXJvuEGp0VW0tZr9k/yLAu6x11Ogd/lDWtI/rtgAExlK3pLBz3h+9N+qwq96WiuZUMajBu+KyXEci3z8g5vNbludLa/6esOX9uiV8wwC98onf5wKdFc+hHH0Wv1qkc+S5aH4pkrzBCc4c98VuSw7/yldJf2m9jPMPoLQVuMNBvD1KIRY4P/Z4++GdOcXFD++u990Digvt3w4e4v2BjzRe9fXT///2S5VXOMCc78Om/imT//F4rfD1V6kI4raiJ4PriYbci+C7pfg6VOeZlI2gtq0zDza7Q//1SsRsQ/M9+aPXfpQ+44rwigo+iTHn4i5rVs6m/ETMyl/1cP/0v6k+92NX/////R4jS9om2Dz7ev6dRP+X/aUXTVmr7VBMmEvcd8kp/WQPvLsaob+CHPn9u1vM6lB++mMuqabIuoZC+5fifL9gbuNpNqkt8WCb9goOnuB/+cLJOf/Eh84h28DR/4Lwf509y8XRR30cxS+D4V+dU8LHS4in/e8zGwaR1XFnwGyY7hrllw1mFUPdC/tAwxDwwnXt/ARtHc5mpIeaXf/S/5pEUOr+55jKJ0e///89J+35DmXP16ezejI/0Sb8XOgeGpK3BtGnjpgzfJ/rFxo3IYe2WofultCYAH/jXTLMK7MS/Ls6e5q5lHWHRaDZx3CSjee9Tg6/MfMSmCNgOvQi9MT6j/8GhAbXbQ==

『肆』 求任何網路游戲源碼

魔獸世界的