计算机如何建立小型服务器,如何将个人PC搭建成小型服务器

2023-05-16

想要将个人PC搭建成小型服务器,该怎么办呢,那么如何将个人PC搭建成小型服务器的呢?下面是学习啦小编收集整理的如何将个人PC搭建成小型服务器,希望对大家有帮助~~

将个人PC搭建成小型服务器的方法

工具/原料

netbox软件 性能较好的个人电脑一台

方法/步骤

或许许多人会想到,搭建一个小型服务器应该使用windows 2003,windows 2008这类的专业服务器操作系统,可是对于我们想要搭建一个访问人数较少,访问量不大的小型服务器来说 ,可以说 是多余的。只需要win7 winxp即可,而且使用微软IIS同样也是不必要的。

32ed6ad91b47d3f3dfebdda5820ce535.png

那么,我们就使用一款,名为netbox的软件,这个软件是一个在windows平台下运行的控制台程序,具有非常强大的功能。对win7兼容性较好。

00419f4c698ef5f335c9b072a411ff45.png

用记事本创建一个文件,文件内容如下:

Dim httpd

Shell.Service.icon = "\status\on.gif"

Shell.Service.RunService "netbox", "netbox 开", "小型服务器 关"

Sub OnServiceStart()

Shell.Service.SetTimer 100

Set httpd = CreateObject("netbox.HttpServer")

If httpd.Create("", 80) = 0 Then

Set host = httpd.AddHost("", "\wwwroot")

host.EnableWrite=false

host.EnableScript = true

host.AddDefault "default.asp"

host.AddDefault "default.htm"

host.AddDefault "default.html"

host.AddDefault "index.asp"

host.AddDefault "index.htm"

host.AddDefault "index.html"

httpd.Start

else

Shell.MsgBox "服务器启动失败,80端口可能被占用!请更改脚本文件的服务器端口","端口占用错误"

Shell.Quit 0

end if

End Sub

Sub OnServiceStop()

httpd.Close

End Sub

Sub OnServicePause()

Shell.Service.Icon = "\status\off.gif"

Shell.MsgBox "服务器暂停运行!","暂停"

End Sub

Sub OnServiceResume()

OnServiceTimer

httpd.Start

End Sub

Sub OnServiceTimer

If Shell.Service.icon = "\status\on.gif" Then

Shell.Service.icon = "\status\on1.gif"

Else

Shell.Service.icon = "\status\on.gif"

End If

End Sub

在脚本文件的目录下有两个文件夹:

wwwroot 这里是你要搭建的网站存放目录

status 要在这里放上 on.gif 和 off.gif两个文件,分别代表开关的托盘图标

837d0f60cecdc9b900b857ebece2c28a.png

然后上述脚本用 netbox.exe打开,即可搭建asp服务器

0e086b639fd0df56d0c30e649e2f40f4.png

网上有专人已经做好了netbox的现成脚本文件构成的小软件,名字叫 小旋风AspWeb服务器,这个软件非常人性化,免去了自己动手的诸多不便。可以百度搜索下载。

本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

计算机如何建立小型服务器,如何将个人PC搭建成小型服务器 的相关文章

随机推荐