『壹』 我是區域網，如何搭建讓自己電腦中的網站源碼在瀏覽器上打得開
那你就需要搭建一個網站伺服器，系統自帶的IIS。也可以在網上下一個伺服器。
『貳』 請提供免費能用的區域網ERP系統源代碼
ERP系統在對不斷變化的商業需求做出反應方面相對來說也不夠靈活，常常需要進行重大的軟體升級以適應即使看起來並不連續的商業流程變化。Cory Eaves是ERP廠商SSA Global的首席技術官，他說：「如今，我們的99%的客戶都對系統的源代碼進行了修改，他們都希望可以不需要這樣做。因為定製這些系統的間接成本確實很高，與長期維護的成本一樣高。」如今，主要的ERP廠商在SOA架構下爭相重組其軟體產品的時候，都認為通過重新調整軟體以支持SOA，以及用Web服務替代專用應用編程介面，可以提供前所未有的靈活性，部署和集成將更容易，而且需要的定製編碼也更少。此外，廠商們還表示，通過把傳統應用模塊分解成更小的構件，並把這些構件當作可以重新使用的Web服務，用戶就能夠通過只選擇和安排他們所需要的構件來生成定製系統了。用戶表示懷疑對於SOA能否拯救EPR，用戶有理由表示懷疑。集成和維護企業應用的編程人員以前就聽說過CORBA和DCOM的這種類似承諾，結果，它們都很難實現，而且維護成本很高。Eaves稱，同樣，一些公司推出的集成代理器(Integration Broker)也曾承諾縮短在應用之間建立點對點介面的周期，但是它們都太復雜了。與集成代理器一樣，SOA使用的也是輪軸和輻條式設計，也稱服務匯流排，但是，卻有一個重要的不同之處：「這些基於Web標準的方法使得解決這些問題的復雜度減少了很多。」對於Schindler來說，第一份商業訂單就是，明年Kichler公司將向PeopleSoft 8.9遷移，屆時將取消75%的軟體定製。盡管他認為該軟體對XML和Web服務的支持還不成熟，但是，Schindler卻表示，他希望該軟體能夠在2至3年內發展到能融合來自不同廠商的商業過程並使其可以重新使用的地步。[$page$]廠商艱難前行另一方面，ERP廠商卻要繼續其SOA之旅。美國Plant-Wide 研究集團總裁Bill McFadden說：「問題不是讓終端用戶高興，更多的是使ERP廠商能夠從硬代碼API領域里抽身而出。」ERP系統越來越多的是以中間件平台為中心，在這些平台上，大部分的集成工作已經完成，例如，使用IBM公司的WebSphere或者微軟公司的.Net就可以操縱基本過程和應用代碼。ERP廠商不得不面臨一個抉擇，一是使自己與其中的一種中間件保持密切的一致；一是建立自己的中間件系統。由於ERP軟體的預計增長率只有個位數，因此，很少有廠商有能力走建立自己的中間件這條路，但這卻是SAP選擇的道路。公司宣布，隨著mySAP ERP在2007年的面市，它將把其ERP軟體分解成以Web服務出現的更加粒狀的自我描述構件。那樣，用戶就能夠組合這些構件，以生成定製的鬆散耦聯的復合應用，SAP公司稱其為xApps。這一點對加拿大郵政公司(Canada Post)總經理Aaron Nichols很有吸引力，他說：「我們在訂單生成當中使用了一些特定的功能，我們希望把這些功能向企業之外推廣。只挑選那些必需的服務，為每個客戶定製應用。這樣就可以為客戶提供他們想要的性能，而我們也可以在每個應用當中重用這些性能，而且無需運行它們一次以上。」PeopleSoft公司則決心與IBM公司共命運，它把WebSphere作為其首選中間件，但是，Oracle公司對該公司的收購卻使這一戰略的未來不確定了。不過，作為PeopleSoft的用戶，Kichler公司的Schindler表示，他根本不擔心Oracle公司的計劃。他說，第一個實際影響將隨著PeopleSoft 10的面市而顯現，該產品最早也要過36個月才能面市。Schindler表示，就目前而言，Kichler公司將保持現狀。分析人士表示，雖然Oracle公司為其電子商務套間提供了自己的應用伺服器和中間件，但是，其總體SOA戰略卻並未得到很好的闡明。Oracle公司負責ERP的副總裁Fred Studer說：「客戶並不需要單元式信息倉庫。它們需要的是真實的來源。」但RedMond公司分析員James Governor稱，問題是，在真實世界裡，大多數組織都不得不擁有許多資源庫，而這種思維又讓廠商們猶豫不決。Oracle公司一直忙於把其傳統API與Web服務介面捆綁起來，並在積極地做更多的此類工作。但
『叄』 怎樣查看區域網中伺服器某個網站的某個asp網頁源碼 看網上有攻擊IIS服務的辦法，具體怎樣操作
有時由於站點配置的原因，允許客戶列出站點目錄，通常不允許下載或打開的。所以如果你看不到，就表示正常情況下看不到了。
想到看到，直接到教師機上看，或者裝遠程式控制制軟體。
『肆』 我想自己用伺服器搭建個網盤，請問要用什麼伺服器的軟體或者用什麼方法可以把區域網共享盤遠程到外網
樓上回答的好像跑題了吧，人家問的是軟體，你回答的是源碼。好像提問的不是要搞軟體開發的~~~
把區域網中的某台電腦上某個文件夾對外網開放，架個FTP伺服器就可以了。免費的FTP軟體非常多，也都十分簡單。不過，軟體安裝配置好後你要在你那路由器上做好埠映射。如果FTP軟體那邊你沒有修改埠的話，一般默認是23埠。在路由器上把這端號映射到你自己這台電腦上就可以了。
另外如果你共享的使用對像是固定的話，你架個VPN也可以實現，但VPN好像比FTP要復雜一點。
以前的QQ也有個「我的共享」功能也可以臨時實現你要的那種效果，但好像現在QQ把這個取消了。
『伍』 求區域網文件傳輸的源代碼~~~~~~~~~~~
UDP.h
class CUdpComm
{
public:
UCHAR CRCTest(UCHAR* Buff,int From,int To);
BOOL Send(BYTE* buf,int size,char* addr);
CUdpComm(CWnd* pParent,
UINT nSendPort=16888,
UINT nRecvPort=16889);
virtual ~CUdpComm();
private:
UINT m_nSendPort;
UINT m_nRecvPort;
CWnd* m_pParent;
static UINT Thread(LPVOID pParam);
BOOL m_bContinue;
BOOL m_bExited;
};
Top
UDP.cpp
CUdpComm::CUdpComm(CWnd* pParent,UINT nSendPort,UINT nRecvPort)
{
m_nSendPort=nSendPort;
m_nRecvPort=nRecvPort;
m_pParent=pParent;
WSADATA wsd;
WSAStartup(0x0101,&wsd);
m_bContinue=TRUE;
m_bExited=TRUE;
AfxBeginThread(Thread,(LPVOID)this);
}
CUdpComm::~CUdpComm()
{
// BYTE buf[11];
m_bContinue=FALSE;
/*
while(m_bExited==FALSE)
{
Send(buf,11,"127.0.0.1");
}
*/
//Sleep(500);
WSACleanup();
}
BOOL CUdpComm::Send(BYTE *buf, int size,char* addr)
{
CSocket sockSend;
sockSend.Create(m_nSendPort,SOCK_DGRAM,NULL);
sockSend.Bind(m_nSendPort,addr);
int nCount;
nCount=sockSend.SendTo(buf,
size,m_nRecvPort,addr,0);
sockSend.Close();
return TRUE;
}
UINT CUdpComm::Thread(LPVOID pParam)
{
CUdpComm* pThis=(CUdpComm*)pParam;
pThis->m_bExited=FALSE;
CSocket sockReceive;
BYTE buf[256];
BYTE* PostBuf;
UINT Port=pThis->m_nRecvPort;
sockReceive.Create(Port,SOCK_DGRAM,NULL);
sockReceive.Bind(Port,"127.0.0.1");
CString strAddr("127.0.0.1");
UINT nPort=pThis->m_nSendPort;
int nCount;
while(pThis->m_bContinue==TRUE)
{
Sleep(100);
nCount=sockReceive.ReceiveFrom(buf,256,strAddr,nPort,0);
PostBuf=new BYTE[nCount];
memcpy(PostBuf,buf,nCount);
pThis->m_pParent->PostMessage(IDM_SOCK_RECEIVE_DATA,
(WPARAM)PostBuf,nCount);
}
sockReceive.Close();
pThis->m_bExited=TRUE;
return 0;
}
//每次校驗2~buffersize-1位元組內容,不校驗55AA
UCHAR CUdpComm::CRCTest(UCHAR* Buff,int From,int To)
{
UCHAR CrcTable[] = {
0x00, 0x07, 0x0E, 0x09, 0x1C, 0x1B, 0x12, 0x15,
0x38, 0x3F, 0x36, 0x31, 0x24, 0x23, 0x2A, 0x2D,
0x70, 0x77, 0x7E, 0x79, 0x6C, 0x6B, 0x62, 0x65,
0x48, 0x4F, 0x46, 0x41, 0x54, 0x53, 0x5A, 0x5D,
0xE0, 0xE7, 0xEE, 0xE9, 0xFC, 0xFB, 0xF2, 0xF5,
0xD8, 0xDF, 0xD6, 0xD1, 0xC4, 0xC3, 0xCA, 0xCD,
0x90, 0x97, 0x9E, 0x99, 0x8C, 0x8B, 0x82, 0x85,
0xA8, 0xAF, 0xA6, 0xA1, 0xB4, 0xB3, 0xBA, 0xBD,
0xC7, 0xC0, 0xC9, 0xCE, 0xDB, 0xDC, 0xD5, 0xD2,
0xFF, 0xF8, 0xF1, 0xF6, 0xE3, 0xE4, 0xED, 0xEA,
0xB7, 0xB0, 0xB9, 0xBE, 0xAB, 0xAC, 0xA5, 0xA2,
0x8F, 0x88, 0x81, 0x86, 0x93, 0x94, 0x9D, 0x9A,
0x27, 0x20, 0x29, 0x2E, 0x3B, 0x3C, 0x35, 0x32,
0x1F, 0x18, 0x11, 0x16, 0x03, 0x04, 0x0D, 0x0A,
0x57, 0x50, 0x59, 0x5E, 0x4B, 0x4C, 0x45, 0x42,
0x6F, 0x68, 0x61, 0x66, 0x73, 0x74, 0x7D, 0x7A,
0x89, 0x8E, 0x87, 0x80, 0x95, 0x92, 0x9B, 0x9C,
0xB1, 0xB6, 0xBF, 0xB8, 0xAD, 0xAA, 0xA3, 0xA4,
0xF9, 0xFE, 0xF7, 0xF0, 0xE5, 0xE2, 0xEB, 0xEC,
0xC1, 0xC6, 0xCF, 0xC8, 0xDD, 0xDA, 0xD3, 0xD4,
0x69, 0x6E, 0x67, 0x60, 0x75, 0x72, 0x7B, 0x7C,
0x51, 0x56, 0x5F, 0x58, 0x4D, 0x4A, 0x43, 0x44,
0x19, 0x1E, 0x17, 0x10, 0x05, 0x02, 0x0B, 0x0C,
0x21, 0x26, 0x2F, 0x28, 0x3D, 0x3A, 0x33, 0x34,
0x4E, 0x49, 0x40, 0x47, 0x52, 0x55, 0x5C, 0x5B,
0x76, 0x71, 0x78, 0x7F, 0x6A, 0x6D, 0x64, 0x63,
0x3E, 0x39, 0x30, 0x37, 0x22, 0x25, 0x2C, 0x2B,
0x06, 0x01, 0x08, 0x0F, 0x1A, 0x1D, 0x14, 0x13,
0xAE, 0xA9, 0xA0, 0xA7, 0xB2, 0xB5, 0xBC, 0xBB,
0x96, 0x91, 0x98, 0x9F, 0x8A, 0x8D, 0x84, 0x83,
0xDE, 0xD9, 0xD0, 0xD7, 0xC2, 0xC5, 0xCC, 0xCB,
0xE6, 0xE1, 0xE8, 0xEF, 0xFA, 0xFD, 0xF4, 0xF3
};
int i;
UCHAR result = 0;
for(i=From;i<To;i++)
result = CrcTable[Buff[i] ^ result];
return result^0xFF;
}
『陸』 VB編寫的區域網聊天工具源代碼
用VB做聊天程序的方法
---- 所謂"聊天"是指兩個程序能夠發送數據給對方。這個程序涉及到數據通訊的知識，彷彿很復雜，不過，由於VB給我們提供了一個Winsock控制項，問題就變得很簡單了。
---- 先編寫"聊天（主機）"程序。在窗體里添加Winsock控制項，並設置其Protocol屬性為1－SckUDPProtocol，其他屬性為預設值。接著添加兩個標簽和兩個文本框，設置兩個標簽的標題屬性分別為"接收窗"和"發送窗"；兩個文本框的標題屬性為空。最後編寫代碼：
---- 1."聊天（主機）"
Private Sub Form-Load()
′設置網路地址
Winsock1.LocalPort=1024
Winsock1.RemoteHost="202.96.6.1"
Winsock1.RemotePort=1999
End Sub
Private Sub Text1-Change()
′發送用戶輸入的內容
Winsock1.SendData Text1.Text
End Sub
Private Sub Winsock1-DataArrival
(Byval bytesTotal As Long)
Dim rec As String
′接收對方數據並在文本框內顯示
Winsock1.GetData rec, vb String
Text2.Text=rec
End Sub
---- 2."聊天（副機）"
Private Sub Form_Load()
′設置網路地址
Winsock1.LocalPort=1999
Winsock1.RemoteHost="202.96.6.1"
Winsock1.RemotePort=1024
---- 其他部分程序與（主機）相同。最後將兩個程序存檔，並編譯成執行（.Exe）文件。現在就可以使用這個程序進行對話了。
---- 七.文本框中文本的某一特定字元或字元串同時高亮顯示的方法
---- 由於普通TextBox控制項不支持不連續字元串的同時高亮顯示，所以我們選擇RichTextBox控制項。單擊工程（Project）選單項，在彈出的下拉選單中單擊組件（Components）選單項，從彈出的對話框中選擇Microsoft Rich Textbox Control 5.0復選框，確定載入RichTextBox控制項。
---- 新建（New）一個工程，在窗體（Form）上添加一個RichTextBox控制項和兩個Command（按鈕）控制項，都採用系統默認的Name屬性值；設置RichTextBox的Text屬性值為空，Command1和Command2的Caption屬性值分別設為"輸入文本"和"選擇字元串"。最後，添加如下VB代碼：
Private Sub Command1-Click()
Dim str As String
Dim Text As String
str=〃輸入文本〃
Text=InputBox(str)
RichTextBox1.Text=Text
End Sub
Private Sub Command2-Click()
Dim str As String
Dim Text As String
Dim Position As Integer
Dim Lenth As Integer
str=〃輸入要高亮顯示的字元串〃
Text=InputBox(str)
If Text 〈〉 〃〃 Then
Position=InStr(RichTextBox1.Text, Text)－1
Lenth=Len(Text)
RichTextBox1.SelStart=Position
RichTextBox1.SelLength=Lenth
RichTextBox1.SelColor=RGB(255,0,0)
Do While InStr(Position＋Lenth＋
1, RichTextBox1.Text, Text) 〈〉 0
Position=InStr(Position＋Lenth＋
1, RichTextBox1.Text, Text)－1
RichTextBox1.SelStart=Position
RichTextBox1.SelLength=Lenth
RichTextBox1.SelColor=RGB(255,0,0)
Loop
End If
End Sub
---- 按F5執行程序，單擊"輸入文本"按鈕，在彈出的對話框中輸入一些文本，確定後，剛剛輸入的文本將顯示在RichTextBox中；再單擊"選擇字元串"按鈕，在彈出的對話框中輸入你希望高亮顯示的字元串，確定後，RichTextBox中相應的字元串將以紅色高亮顯示。
---- 八.編程實現Windows 95/98操作系統熱啟動的方法
---- 要利用程序實現系統的重新啟動，可以在你的程序中調用API函數來實現。建一個子函數：（以VB為例）
Declare Function SystemParametersInfo Lib 〃
user32〃 Alias -
〃SystemParametersInfo〃 (ByVal uAction As Long,
ByVal uParam As Long,
ByVal lpvParam As Any, ByVal
fuWinIni As Long) As Long
Sub DisableCtrlAltDelete(bDisabled As Boolean)
Dim X As Long
X=SystemParametersInfo(97, bDisabled, CStr(1), 0)
End Sub
Call DisableCtrlAltDelete(true) ′禁止熱啟
Call DisableCtrlAltDelete(false) ′允許熱啟
---- 九.在Windows 95/ 98啟動後自動啟動程序的方法
---- 我們都知道在Windows 95/98的"開始"→"程序"選單下有一"啟動"選單項，當每次啟動Windows 95或Windows 98時，系統都會自動啟動放在"啟動"選單欄里的可執行程序。
---- 但目前有好多軟體，像解霸五、ICQ，以及大部分實時偵測病毒的軟體等等，安裝後，並沒有放在"啟動"選單里，也能在啟動操作系統時自動啟動。怎麼實現的呢？
---- 其實只要知道Windows注冊表的一些知識，這個問題就不能稱之為問題了。用滑鼠單擊"開始"，打開開始選單，再單擊"運行"，出現一對話框，然後輸入"regedit"，確定後，會打開系統注冊表編輯器，找到HKEY-LOCAL-MACHINE? SOFTWARE?Microsoft?Windows?CurrentVersion?Run，加入你的程序的入口，就可以了。如果不知道怎麼加，就參考一下已經存在的鍵值。
---- 十. 如何把數據文件輸出到Text控制項中？如果數據量比較大，窗體滿屏也不夠大，怎麼解決？
---- 有一個比較簡單的方法，就是把數據放到一個文本框（Text）里，並在其中加上水平和垂直滾動條。具體實現步驟為：先在窗體（Form）里加入一個文本框，採用默認名Text1；然後，設置文本框Text1的屬性：Text屬性設置為空，MultiLine屬性設置為True，ScrollBars屬性設置為3－Both；接著添加如下VB代碼：
Private Sub Form-Load()
Dim Handle As Integer
Dim FileName As String
On Error GoTo ErrExit
begin:
′輸入要顯示的數據文件的名稱
FileName=InputBox＄(〃Input Filename〃,
〃Open File〃)
On Error GoTo FileErr
Handle=FreeFile
Open FileName For Input As ＃Handle
′把數據文件中的數據輸出到文本框中
Text1.Text=Input＄(LOF(Handle), Handle)
Close ＃Handle
Exit Sub
FileErr:
Dim ErrNum As Integer
If Err.Number=53 Then
ErrNum=MsgBox(〃File not exist〃,
vbOKCancel, 〃Error Information〃)
If ErrNum=1 Then
GoTo begin
Else
Exit Sub
End If
End If
MsgBox Err.Description, , 〃file open failed〃
ErrExit:
Exit Sub
End Sub
′使文本框充滿整個窗體
Private Sub Form-Resize()
Text1.Left=0
Text1.Top=0
Text1.Width=Form1.Width－100
Text1.Height=Form1.Height－400
End Sub
---- 通過這樣的處理，不僅能解決問題，而且用戶還可以在文本框中對數據進行編輯。
---- 十一.關聯文件列表框、目錄列表框和驅動器列表框的方法
---- 想做一個對話窗體，包含驅動器列表框、目錄列表框和文件列表框，並能實現三者的同步操作，怎麼做？這都是我們在實際應用中經常會遇到的問題，在VB中解決這個問題非常簡單，可以通過Path屬性的改變引發Change事件來實現。例如：
Sub Dir1-Change()
File1.Path=Dir1.Path
End Sub
---- 該事件過程使窗體上的目錄列表框Dir1和文件列表框File1產生同步。因為目錄列表框Path屬性的改變將產生Change事件，所以在Dir1-Change事件過程中，把Dir1.Path賦給File1.Path，就可以產生同步效果。類似地，增加下面的事件過程，就可以使三種列表框同步操作：
Sub Drive1-Change()
Dir1.Path=Drive1.Drive
End Sub
---- 該過程使驅動器列表框和目錄列表框同步，前面的過程使目錄列表框和文件列表框同步，從而使三種列表框同步，問題即可解決。
『柒』 哪位哥哥姐姐們有區域網聊天室源碼能不能給我份
在區域網伺服器中安裝Chat Anywhere工具軟體；在安裝該工具之前，可以先到 處下載獲得該工具軟體的安裝程序，然後用滑鼠雙擊它，就能開始聊天服務的安裝操作；安裝過程中，幾乎不需要你進行任何設置，只要你一路單擊「next」按鈕，該工具就會自動完成各種服務配置，並自動完成其他方面的安裝任務。安裝操作結束之後，雙擊系統桌面上的「chat anywhere」快捷圖標，在隨後出現的圖1界面中，你將看到該程序已經默認地創建好幾個不同類別的聊天室了，選中你認為合適的聊天室名稱，再單擊「OK」按鈕，就能啟動伺服器中的聊天服務了。
當然要是你的伺服器中已經架設好並啟動了web伺服器時，那麼在啟動內網聊天服務時就可能出現服務埠沖突的提示，這是因為內網聊天伺服器在默認狀態下也是使用的80埠；遇到這種情況，你可以在圖2所示的埠沖突提示窗口中，為內網伺服器指定一個其他的服務埠號，例如這里筆者為內網聊天伺服器指定的服務埠號為「8009」，單擊「OK」按鈕後，需要重新啟動內網聊天伺服器。
『捌』 易語言區域網資料庫源碼
將MDB文件放在A電腦共享盤里。B電腦用ACC連接A電腦MDB文件就可以了。SQL用ODBC連接。