‘壹’ 我是局域网,如何搭建让自己电脑中的网站源码在浏览器上打得开
那你就需要搭建一个网站服务器,系统自带的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连接。