iwebsms的专栏

原创 网络最经典命令行－网络安全工作者的必杀技

网络最经典命令行－网络安全工作者的必杀技  1.最基本，最常用的，测试物理网络的 ping 192.168.0.8 －t ，参数－t是等待用户去中断测试 2.查看DNS、IP、Mac等 A.Win98：winipcfg B.Win2000以上：Ipconfig/all C.NSLOOKUP：如查看河北的DNS C:/>nslookup Default Server: ns.hesjptt.ne

原创 测试电子邮件地址正确性

http://centralops.net/co/EmailDossier.vbs.asp

原创 发送邮件常见出错代码

按照下列“Q”代表问题，“A”代表解答。  Q:the server says:550 relaying mail to Q:The server says:550 Q:the server says:550 5.7.1 relaying not permitted:  A:使用某些Smtp服务器时，限制了收件人的地址，只能换一个Smtp服务器。  Q:The server says:550 Q:

原创 在2003下安装WebEasyMail邮件服务器安装过程

邮件服务器安装过程阿Q1)查看硬盘:两块9.1G SCSI 硬盘(实容量8.46*2)2)分区系统分区X盘7.49GWEB 分区X盘1.0G邮件分区X盘8.46G（带１０００个１００Ｍ的邮箱足够了）3)安装WINDOWS SERVER 20034)打基本补丁(防毒)．．．在这之前一定不要接网线！5)在线打补丁6)安装WEBEASYMAIL,然后重启服务器使WEBEASYMAIL完成安装.并注册.然

原创 郁闷啊，我写的IIS增加程序在6.0中碰到了麻烦

原创 自动登录XP其实很轻松

近来有一些文章介绍了让Windows XP自动登录（即不再用输入用户名和密码）的方法，都要涉及注册表的修改，比较麻烦。实际有一个非常方便快捷的方法：在Windows XP中单击“开始→运行”，输入“rundll32 netplwiz.dll,UsersRunDll”（注意大小写及空格），然后进入“用户账户”操作窗口，取消对“要使用本机，用户必须输入用户名及密码”项的选择。在接下来弹出的对话框中

原创 获得网卡MAC地址和IP地址（VB.net）

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click        Dim Wmi As New System.Management.ManagementObjectSearcher("SELECT * FROM Win32_

原创 创建虚拟目录（VB.net）

    Function CriaDiretorioVirtual(ByVal vdirname As String, ByVal serverID As String, ByVal vdirPath As String, ByVal criaApplication As Boolean) As DirectoryEntry        Dim newvdir As DirectoryEnt

原创 创建表，创建行，创建列（VB.NET）

        Dim dt As New DataTable        dt.Columns.Add(New DataColumn("UserID"))        dt.Columns.Add(New DataColumn("IPP"))        Dim dr As DataRow = dt.NewRow        dr.Item("UserID") = "32

原创 索引服务调用代码（C#）

          private void Button1_Click(object sender, System.EventArgs e)         {              // Catalog Name              string strCatalog = "TestCatalog";              string strQuery="";

原创 刀兄写的IIS管理类（C#）

///***********************************************************     ///************** IIS控制管理类 1.0 Beta **************     ///************** Author: 飞刀 **************     ///************** http:/

原创 一段找出URL的代码（C#）

              string str="wecncnc下一页";              str+="wecncnc下一页";               Regex re = new Regex(@"]+href=""(?[^""]+)""",RegexOptions.IgnoreCase);               Match m = re.Match(s

原创 让ASP.NET具备IIS中设定的身份

关键是在web.config中增加如下节点：

原创 磁盘配额的wmi版本（C#）

using System;using System.Management; namespace DiskQuota{     ///      /// Class1 的摘要说明。     ///      class Class1     {         ///          /// 应用程序的主入口点。         ///     

原创 设置Windows系统NTFS某个目录的用户访问权限（c#）

using System;using System.Drawing;using System.Collections;using System.ComponentModel;using System.Windows.Forms;using System.Data;using System.Management;using System.Text;using Syst

原创 通过WMI获得硬盘和CPU的物理序列号（VB.net）

        获得硬盘序列号        Dim cmicWmi As New System.Management.ManagementObjectSearcher("SELECT * FROM Win32_DiskDrive")         Dim Uint32 As UInt32        For Each cmicWmiObj As ManagementOb

原创 使用WMI列出Windows中某个目录的用户权限（C#）

using System;using System.Management;using System.Collections; class Tester {      public static void Main()      {         try          {              ManagementPath path = new

原创 通过WMI列出Windows系统进程（VB.net）

        Dim cmicWmi As New System.Management.ManagementObjectSearcher("SELECT * FROM Win32_Process")         For Each cmicWmiObj As ManagementObject In cmicWmi.Get            ListBox1.Items.Add(

原创 C# to VB.net

http://authors.aspalliance.com/aldotnet/examples/translate.aspx

原创 如何在C# 中使用WMI 实现远程查询和共享

WMI 对大多数开发人员来说是一个感觉比较迷惑的东西，对我来说也是如此。直到最近看了一篇关于 .Net Management 的介绍后，才对WMI 有了一点点了解。下面就把自己的一点经验写给爱好C# 的朋友们。WMI 是一个非常强大的工具，它可以提供给我们非常强大的功能。比如在我们开发应用程序时经常需要得到本地或远程操作系统的信息。虽然看起来很平常，但是实际操作起来还是比较麻烦的，尤其当我们想

原创 Setting NTFS Permissions with C#

Today I needed to set NTFS permissions in C# on some newly created directories. No problem I thought, the CLR will have something for it somewhere in Security, so I checked Google in the hopes to find

原创 VS.NET 学习方法论

VS.NET 学习方法论 　　　 　　——我的VS.NET学习之旅 　　　　　　 　　　屠恩海（SunHai）　　 开发工具：Microsoft Visual Studio .NET 2003　　 操作系统：Windows XP　　题记：即使你没有一点编程经验，只要你愿意，并理解本文介绍的学习方法，你也可以象作者一样轻松、愉快地步入程序设计之门。让我们一起开始激动人心的VS.NET之旅。　

原创 用C#操纵IIS（代码）

using System;using System.DirectoryServices;using System.Collections;using System.Text.RegularExpressions;using System.Text; /** * @author 吴海燕 * @email  wuhy80-usual@yahoo.com * 2004

原创 返回8位小写字母数字混合随机密码

返回8位小写字母数字混合随机密码Function GetRandomPassword() As String    Dim s As String() = {"0", "1", "2", "3", "4", "5", "6", "7", "8", "9", "a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m",

原创 对称加密解密模块

Imports System.TextImports System.Security.Cryptography Module ModSecurity    Function EnText(ByVal Text As String, ByVal sKey As String) As String        Text = Text.ToLower        Dim

原创 根据时间的字符串形式（20031110）获得日期型

根据时间的字符串形式（20031110）获得日期型Function GetDateTimeByDateString(ByVal DateString As String) As Date    Return CDate(Left(DateString, 4) & "-" & Right(Left(DateString, 6), 2) & "-" & Right(DateString, 2

原创 获得汉字字符串拼音首字母

返回给定字符串的首字母Function IndexCode(ByVal IndexTxt As String) As String    Dim i As Integer    For i = 1 To IndexTxt.Length        IndexCode = IndexCode & GetOneIndex(Mid(IndexTxt, i, 1))    Ne

原创 使用HttpWebRequest获得URL的返回值

使用HttpWebRequest获得URL的返回值Function GetUrlValue(ByVal Url As String) As String    Dim HttpWebRequest As System.Net.WebRequest = System.Net.WebRequest.Create(Url)     Dim HttpWebResponse As Syst

原创 获得时间的字符串形式，例如：20031110

获得时间的字符串形式，例如：20031110Function GetDateStringByDateTime(ByVal DateTime As Date) As String    Return DateTime.Year & Format(DateTime.Month, "00") & Format(DateTime.Day, "00")End Function

原创 递归统计指定目录下所有文件容量总和

 Public Class ShowDirSize    递归统计指定目录下所有文件容量总和    Public Shared Function DirSize(ByVal d As IO.DirectoryInfo) As Long        Dim Size As Long = 0        统计本目录下所有文件容量总和        Dim fis As

原创 获得硬盘D盘序列号

获得硬盘C盘序列号Function GetDrvID() As Long    Dim GetVal As Long    Dim TempStr1 As New String(Chr(0), 255)    Dim TempStr2 As New String(Chr(0), 255)     Dim TempLon1 As Integer     Dim Te

原创 获得字符串的MD5格式

获得字符串的MD5格式Function GetMD5(ByVal StrValue As String) As String    Return System.Web.Security.FormsAuthentication.HashPasswordForStoringInConfigFile(StrValue, "md5")End Function

原创 检查一个字符串是不是常用域名

检查一个字符串是不是常用域名Function CheckDomain(ByVal Domain As String) As Boolean    Dim vDomain() As String = Domain.Split(".") : Dim i As Integer    Dim vLastDomain As String() = "com,net,org,gov,cn,info

原创 将货币的小写转换为大写，例如：肆佰陆拾贰圆捌角柒分

将货币的小写转换为大写，例如：肆佰陆拾贰圆捌角柒分Public Function Num2Chi(ByVal txtJE As Double) As String    Dim i, K As Integer    Dim NC, nd, ka, chrNum, strZheng As String    Dim c1, c2, c3 As String    Dim K

原创 VB.NET的阳历与农历转换的算法

   下面是一个关于VB的农历算法    日期数据定义方法如下    前12个字节代表1-12月为大月或是小月，1为大月30天，0为小月29天；    第13位为闰月的情况，1为大月30天，0为小月29天；    第14位为闰月的月份，如果不是闰月为0，否则给出月份，10、11、12分别用A、B、C来表示，即使用16进制；    最后4位为当年家农历新年-即农历1月

原创 从字符串中获得电子邮件数组

    从字符串中获得电子邮件数组    Function GetMailListFromStrStream(ByVal StrStream As String) As ArrayList        Dim Re As System.Text.RegularExpressions.Regex        Dim RegStr As String = "[a-zA-Z0-9]+@

原创 ASP.NET常用函数

Abs(number) 取得数值的绝对值。 Asc(String) 取得字符串表达式的第一个字符ASCII 码。 Atn(number) 取得一个角度的反正切值。 CallByName (object, procname, usecalltype,[args()]) 执行一个对象的方法、设定或传回对象的属性。 CBool(expression) 转换表达式为Boolean 型态。

原创 运用StreamReader从一个标准的文本文件读行信息。

        运用StreamReader从一个标准的文本文件读行信息。        Dim srReadLine As New System.IO.StreamReader("D:/1.txt", System.Text.Encoding.GetEncoding("GB2312"))        srReadLine.BaseStream.Seek(0, System.IO.Se

原创 VB.NET操作SQL Server完全模块

Module ModSql    Function GetIntByStr(ByVal FieldName As String, ByVal TableName As String, ByVal ParaName As String, ByVal ParaValue As String) As Integer         Dim sqlConnection As New SqlCl

原创 制作最清晰缩略图的完整类

Public Class ClassUpPic    Private vPicFile As System.Web.UI.HtmlControls.HtmlInputFile    Private vSmallPicSize, vUpFileSize As Integer    Private vUpPicPath, vNewPicName, vTmpPicName As String