怎么设置受限网站的访问权限_百度知道
怎么设置受限网站的访问权限
同住的哥们总是用我机器上 瑟7网把网站在IE 工具
安全 设置成 受限站点后为什么还是能打开受限网站。我的机器没有设置用户账号。有什么方法除了改hosts的方法~~谢谢
我有更好的答案
在资源管理器右击“C：\inetpub”中的“。目录。在快捷菜单中选【属性】菜单项，咋ID卡IDE对话框中切换到【安全】选项卡。单击【添加】按钮，即可打开【选择用户或组】对话框，在其中输入用户“Everyone”。单击【确定】按钮，返回文件夹属性对话框中可可看到已将【Everyone】用户添加到列表中。在权限列表中选择【读取和运行】、【列出文件夹目录】【读取】权限后，单击【确定】按钮，即可完成设置。在网页文件夹中还有数据库为用户在提交表单或注册等操作时，会修改到数据库的数据，所以除给用户读取的权限文件的权限设置要进行特别设置。因外，还需要写入和修改权限，否则也会出现用户无法正常访问网站的问题。右击文件夹中的数据库文件，在快捷菜单中选择【属性】菜单项，在打开的属性对话框中切换到【安全】选项卡。在【组用户名称】列表中选择【Eveyone】用户，在权限列表中再选择【修改】、【写入】权限。
安装防火墙，过滤这个网站，禁止IE连接这个网站就好了！
本回答被提问者采纳
——运行——输入 GPEDIT.MSC (可小写）并确定——依次展开『本地计算机策略下的“用户配置”——“管理模板”——“Windows组件”——选中“Windows资源管理器”』——再左键双击视图右侧的“防止从‘我的电脑’访问驱动器——选择已启用——下面再选择“仅限制驱动器E——应用。你试试，你也不能访问E盘了。如果你要访问，再次重复上诉步骤，选择“未配置”并应用即可。而那个受限用户，也许不知道怎么改组策略，另外受限用户无法打开组策略。所以TA无法访问E盘了
回答的很好
但不是我要的答案
我是想屏蔽一个网站
为您推荐：
其他类似问题
访问权限的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。vbs设置internet连接共享提示“没有权限”如何解决 - VBS求助&讨论 -
批处理之家 批处理_BAT_CMD_DOS_VBS_Perl_Python_PowerShell - Powered by Discuz!
帖子8&积分18&技术0 &捐助0 &注册时间&
vbs设置internet连接共享提示“没有权限”如何解决
本帖最后由 pcl_test 于
16:04 编辑
关于网络共享给网卡的一个ics.vbs，这代码怎么弄求助
此代码是用来开启双网卡共享的，如果不行还求指导
代码如下，在XP下运行时可以的，但是在win10上就会报错如下，请问该如何解决
'用法 cscript&&/nologo ics.vbs &内网适配器名称& &外网网络连接名称& &off/on&
OPTION EXPLICIT
DIM ICSSC_DEFAULT, CONNECTION_PUBLIC, CONNECTION_PRIVATE, CONNECTION_ALL
DIM NetSharingManager
DIM PublicConnection, PrivateConnection
DIM EveryConnectionCollection
DIM objArgs
DIM priv_con, publ_con
DIM switch
ICSSC_DEFAULT& && & = 0
CONNECTION_PUBLIC& &= 0
CONNECTION_PRIVATE&&= 1
CONNECTION_ALL& && &= 2
sub Main( )
& & Set objArgs = WScript.Arguments
& & if&&objArgs.Count = 3 then
	priv_con& && &= objArgs(0)& &'内网适配器名称
	publ_con& && &= objArgs(1)& &'外网网络连接名称
	switch& && &&&= objArgs(2)& &'状态切换开关 on 为打开 off 相反
& && &&&if Initialize() = TRUE then
& && && && &GetConnectionObjects()
& && && && &FirewallTestByDeviceName priv_con,publ_con
& && &&&end if
& & else
& && &&&if Initialize() = TRUE then
& && && && &GetConnectionObjects()
& && && && &FirewallTestByDeviceName &list&,&list&
& && &&&end if
& & end if
end sub
sub FirewallTestByDeviceName(con1,con2)
on error resume next
& & DIM Item
& & DIM EveryConnection
& & DIM objNCProps
& & DIM szMsg
& & DIM bFound1,bFound2
& & WScript.echo(vbCRLF)
& & bFound1 = false
& & bFound2 = false
& & for each Item in EveryConnectionCollection
& && &&&set EveryConnection = NetSharingManager.INetSharingConfigurationForINetConnection(Item)
& && &&&set objNCProps = NetSharingManager.NetConnectionProps(Item)
& && &&&szMsg = &Name: && && & & objNCProps.Name& && & & vbCRLF & _
& && && && && & &Guid: && && & & objNCProps.Guid& && & & vbCRLF & _
& && && && && & &DeviceName: & & objNCProps.DeviceName & vbCRLF & _
& && && && && & &Status: && &&&& objNCProps.Status& &&&& vbCRLF & _
& && && && && & &MediaType: &&&& objNCProps.MediaType
& && &&&if EveryConnection.SharingEnabled then
& && && && &szMsg = szMsg& && && && && vbCRLF & _
& && && && && && &&&&SharingEnabled& & vbCRLF & _
& && && && && && &&&&SharingType:&&& & ConvertConnectionTypeToString(EveryConnection.SharingConnectionType)
& && &&&end if
& && &&&if objNCProps.DeviceName = con1 then
& && && && &bFound1 = true
& && && && &if EveryConnection.SharingEnabled = False and switch=&on& then
& && && && && & szMsg = szMsg & vbCRLF & &Not Shared... Enabling private connection share...&
& && && && && & EveryConnection.EnableSharing CONNECTION_PRIVATE
& && && && &end if
			if switch=&off& then
				szMsg = szMsg & vbCRLF & &Shared... DisEnabling private connection share...&
				EveryConnection.EnableSharing CONNECTION_ALL
			end if
& && &&&end if
& && &&&if objNCProps.Name = con2 then
& && && && &bFound2 = true
& && && && &if EveryConnection.SharingEnabled = False and switch=&on& then
& && && && && & szMsg = szMsg & vbCRLF & &Not Shared... Enabling public connection share...&
& && && && && & EveryConnection.EnableSharing CONNECTION_PUBLIC
& && && && &end if
			if switch=&off& then
				szMsg = szMsg & vbCRLF & &Shared... DisEnabling public connection share...&
				EveryConnection.EnableSharing CONNECTION_ALL
			end if
& && &&&end if
& && &&&WScript.Echo(szMsg & vbCRLF)
& & next
		if( con1 && &list& ) then
			if( bFound1 = false ) then
				WScript.Echo( &Connection & & chr(34) & con1 & chr(34) & & was not found& )
			end if
			if( bFound2 = false ) then
				WScript.Echo( &Connection & & chr(34) & con2 & chr(34) & & was not found& )
			end if
		end if
end sub
function Initialize()
& & DIM bReturn
& & bReturn = FALSE
& & set NetSharingManager = Wscript.CreateObject(&HNetCfg.HNetShare.1&)
& & if (IsObject(NetSharingManager)) = FALSE then
& && &&&Wscript.Echo(&Unable to get the HNetCfg.HnetShare.1 object&)
& & else
& && &&&if (IsNull(NetSharingManager.SharingInstalled) = TRUE) then
& && && && &Wscript.Echo(&Sharing isn't available on this platform.&)
& && &&&else
& && && && &bReturn = TRUE
& && &&&end if
& & end if
& & Initialize = bReturn
end function
function GetConnectionObjects()
& & DIM bReturn
& & DIM Item
& & bReturn = TRUE
& & if GetConnection(CONNECTION_PUBLIC) = FALSE then
& && &&&bReturn = FALSE
& & end if
& & if GetConnection(CONNECTION_PRIVATE) = FALSE then
& && &&&bReturn = FALSE
& & end if
& & if GetConnection(CONNECTION_ALL) = FALSE then
& && &&&bReturn = FALSE
& & end if
& & GetConnectionObjects = bReturn
end function
function GetConnection(CONNECTION_TYPE)
& & DIM bReturn
& & DIM Connection
& & DIM Item
& & bReturn = TRUE
& & if (CONNECTION_PUBLIC = CONNECTION_TYPE) then
& && &&&set Connection = NetSharingManager.EnumPublicConnections(ICSSC_DEFAULT)
& && &&&if (Connection.Count & 0) and (Connection.Count & 2) then
& && && && &for each Item in Connection
& && && && && & set PublicConnection = NetSharingManager.INetSharingConfigurationForINetConnection(Item)
& && && && &next
& && &&&else
& && && && &bReturn = FALSE
& && &&&end if
& & elseif (CONNECTION_PRIVATE = CONNECTION_TYPE) then
& && &&&set Connection = NetSharingManager.EnumPrivateConnections(ICSSC_DEFAULT)
& && &&&if (Connection.Count & 0) and (Connection.Count & 2) then
& && && && &for each Item in Connection
& && && && && & set PrivateConnection = NetSharingManager.INetSharingConfigurationForINetConnection(Item)
& && && && &next
& && &&&else
& && && && &bReturn = FALSE
& && &&&end if
& & elseif (CONNECTION_ALL = CONNECTION_TYPE) then
& && &&&set Connection = NetSharingManager.EnumEveryConnection
& && &&&if (Connection.Count & 0) then
& && && && &set EveryConnectionCollection = Connection
& && &&&else
& && && && &bReturn = FALSE
& && &&&end if
& & else
& && &&&bReturn = FALSE
& & end if
& & if (TRUE = bReturn)&&then
& && &&&if (Connection.Count = 0) then
& && && && &Wscript.Echo(&No & + CStr(ConvertConnectionTypeToString(CONNECTION_TYPE)) + & connections exist (Connection.Count gave us 0)&)
& && && && &bReturn = FALSE
& && &&&'valid to have more than 1 connection returned from EnumEveryConnection
& && &&&elseif (Connection.Count & 1) and (CONNECTION_ALL && CONNECTION_TYPE) then
& && && && &Wscript.Echo(&ERROR: There was more than one & + ConvertConnectionTypeToString(CONNECTION_TYPE) + & connection (& + CStr(Connection.Count) + &)&)
& && && && &bReturn = FALSE
& && &&&end if
& & end if
& & Wscript.Echo(CStr(Connection.Count) + & objects for connection type & + ConvertConnectionTypeToString(CONNECTION_TYPE))
& & GetConnection = bReturn
end function
function ConvertConnectionTypeToString(ConnectionID)
& & DIM ConnectionString
& & if (ConnectionID = CONNECTION_PUBLIC) then
& && &&&ConnectionString = &public&
& & elseif (ConnectionID = CONNECTION_PRIVATE) then
& && &&&ConnectionString = &private&
& & elseif (ConnectionID = CONNECTION_ALL) then
& && &&&ConnectionString = &all&
& & else
& && &&&ConnectionString = &Unknown: & + CStr(ConnectionID)
& & end if
& & ConvertConnectionTypeToString = ConnectionString
end function复制代码
附件: 您需要才可以下载或查看附件。没有帐号？
勿发笼统无意义的标题PB -2
帖子8&积分18&技术0 &捐助0 &注册时间&
还请指出问题或者方向，谢谢了
帖子8&积分18&技术0 &捐助0 &注册时间&
初到贵坛并不熟悉，看到DiamondbacK 反馈的帖子才觉得，发这篇帖子挺是对不起论坛的，我承认我是新手和伸手党也有点无耻，和老鸟的境界没得比，甚至最简单的代码都搞不定，小弟以前逛得论坛都没有bathome这么有技术性，此次也是接触了这个ICS共享脚本问题才来的，作为一个新手不敢要求太多，只求贵坛和气不想伤了大神们的心，其实我的问题已经不重要了，一天解决不了两天，总有解决的时候，论坛的长久才是关键，DiamondbacK大神的话在理，在下叨扰了
&&PS:我也在百度搜罗了N多相关信息，弄得焦头烂额不得已才请教求助，有时候发帖求助只是想尽快解决问题吧，生活中接触代码的机会太少了，养成了伸手的习惯，惭愧惭愧
& && && && && && && && && && && && && && && && && && && && && && && && && &——不想删帖是想留句话，起码还有新手有自知之明
帖子8&积分18&技术0 &捐助0 &注册时间&
我相信我的问题会解决的，哪怕只有我自己自学自通，祝福贵坛！
帖子682&积分1680&技术46 &捐助0 &注册时间&
管理员权限试试看
帖子742&积分1455&技术63 &捐助30 &注册时间&
& & 淡定，别去搭理那些整天叽叽歪歪的人。
帖子8&积分18&技术0 &捐助0 &注册时间&
& & 右键没有管理员运行的选项啊
帖子2666&积分5651&技术229 &捐助50 &注册时间&
Writing Code That Nobody Else Can Read.
帖子8&积分18&技术0 &捐助0 &注册时间&
& & 拷贝到XP测试可以使用，但小弟的win10里用不了会报错
帖子2666&积分5651&技术229 &捐助50 &注册时间&
& & 建立批处理.bat&&内容为 start xxx.vbs (就是你要运行的vbs
批处理的右键菜单应该有 用管理员身份运行
Win7是这样的
Writing Code That Nobody Else Can Read.
帖子8&积分18&技术0 &捐助0 &注册时间&
& & 谢谢啊，好像可以了，非常感谢
[通过 QQ、MSN 分享给朋友]如何设置安装权限_百度知道
如何设置安装权限
我有更好的答案
部分手机支持修改应用程序权限：智能管理器-应用程序权限管理/应用程序许可-点击应用程序/权限-滑动对应开关即可设置。注：部分内置软件权限为系统默认，无法更改。
三星产品问答服务
主营：电子产品
为您推荐：
其他类似问题
您可能关注的内容
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。}