博客园 - Red Huuuid:24b78886-0ed1-41c2-8670-e3f31dcf42c4;id=1511172018-01-08T22:31:23ZRed Huhttps://www.cnblogs.com/hclred/feed.cnblogs.comhttps://www.cnblogs.com/hclred/archive/2006/11/23/570319.html3种创建数据库的方法 - Red Hu-------还原数据库RESTORE DATABASE [" + 新数据库名 + "] FROM DISK = N'" + 备份文件路径+ "' WITH FILE = 1, NOUNLOAD , STATS = 10, RECOVERY , MOVE N'" + Data文件名 + "' TO N'" + 存放DATA文件的绝对路径+ "', MOVE N'" + Log文件名 ...2006-11-23T13:10:00Z2006-11-23T13:10:00ZRed Huhttps://www.cnblogs.com/hclred/【摘要】-------还原数据库RESTORE DATABASE [" + 新数据库名 + "] FROM DISK = N'" + 备份文件路径+ "' WITH FILE = 1, NOUNLOAD , STATS = 10, RECOVERY , MOVE N'" + Data文件名 + "' TO N'" + 存放DATA文件的绝对路径+ "', MOVE N'" + Log文件名 ... <a href="https://www.cnblogs.com/hclred/archive/2006/11/23/570319.html" target="_blank">阅读全文</a>https://www.cnblogs.com/hclred/archive/2006/11/23/570294.html通用对话框 - Red HuDim openFileDialog_ScriptFile As New System.Windows.Forms.OpenFileDialog '通用对话框,选择文件 If openFileDialog_ScriptFile.ShowDialog() = DialogResult.OK Then 'DialogResult.OK 确定 ...2006-11-23T12:55:00Z2006-11-23T12:55:00ZRed Huhttps://www.cnblogs.com/hclred/【摘要】Dim openFileDialog_ScriptFile As New System.Windows.Forms.OpenFileDialog '通用对话框,选择文件 If openFileDialog_ScriptFile.ShowDialog() = DialogResult.OK Then 'DialogResult.OK 确定 ... <a href="https://www.cnblogs.com/hclred/archive/2006/11/23/570294.html" target="_blank">阅读全文</a>https://www.cnblogs.com/hclred/archive/2006/11/23/570290.htmlInvoke("stop", Nothing)关闭某端口 - Red HuTry Dim root As DirectoryEntry = New DirectoryEntry("IIS://localhost/W3SVC") Dim siteID As Integer = 1 Dim e As New DirectoryEntry For Each e In root.Chil...2006-11-23T12:52:00Z2006-11-23T12:52:00ZRed Huhttps://www.cnblogs.com/hclred/【摘要】Try Dim root As DirectoryEntry = New DirectoryEntry("IIS://localhost/W3SVC") Dim siteID As Integer = 1 Dim e As New DirectoryEntry For Each e In root.Chil... <a href="https://www.cnblogs.com/hclred/archive/2006/11/23/570290.html" target="_blank">阅读全文</a>https://www.cnblogs.com/hclred/archive/2006/11/23/570283.html循环修改WEB.CONFIG - Red HuFor Each Node In XmlDocument.Item("configuration").Item("appSettings") If Node.Name = "add" Then If Node.Attributes.GetNamedItem("key").Value = "SQLConnString" Then ...2006-11-23T12:49:00Z2006-11-23T12:49:00ZRed Huhttps://www.cnblogs.com/hclred/【摘要】For Each Node In XmlDocument.Item("configuration").Item("appSettings") If Node.Name = "add" Then If Node.Attributes.GetNamedItem("key").Value = "SQLConnString" Then ... <a href="https://www.cnblogs.com/hclred/archive/2006/11/23/570283.html" target="_blank">阅读全文</a>https://www.cnblogs.com/hclred/archive/2006/11/23/570282.html安装目录写入注册表(不知道有简单方法没..脑子不好使) - Red HuDim regist As RegistryKey = Registry.LocalMachine Dim reg As RegistryKey Dim regkey As String = "SOFTWARE" reg = regist.OpenSubKey(regkey, True) reg.CreateSubKey("TCKJ")...2006-11-23T12:47:00Z2006-11-23T12:47:00ZRed Huhttps://www.cnblogs.com/hclred/【摘要】Dim regist As RegistryKey = Registry.LocalMachine Dim reg As RegistryKey Dim regkey As String = "SOFTWARE" reg = regist.OpenSubKey(regkey, True) reg.CreateSubKey("TCKJ")... <a href="https://www.cnblogs.com/hclred/archive/2006/11/23/570282.html" target="_blank">阅读全文</a>https://www.cnblogs.com/hclred/archive/2006/11/23/570279.htmlShowMyDialogBox - Red HuPublic Sub ShowMyDialogBox() Dim testDialog As New Form2() ' Show testDialog as a modal dialog and determine if DialogResult = OK. If testDialog.ShowDialog(Me) = System.Windows.Forms.Dial...2006-11-23T12:44:00Z2006-11-23T12:44:00ZRed Huhttps://www.cnblogs.com/hclred/【摘要】Public Sub ShowMyDialogBox() Dim testDialog As New Form2() ' Show testDialog as a modal dialog and determine if DialogResult = OK. If testDialog.ShowDialog(Me) = System.Windows.Forms.Dial... <a href="https://www.cnblogs.com/hclred/archive/2006/11/23/570279.html" target="_blank">阅读全文</a>https://www.cnblogs.com/hclred/archive/2006/11/23/570275.html你让我痛快,我才让你爽!(呵呵仗义的兄弟) - Red Hu(转:http://chinapcc1978.spaces.live.com/PersonalSpace.aspx?_c02_owner=1) 你让我痛快,我才让你爽! 我去换50张20的人民币,用来发小红包。 于是拿了1000去银行换,那小子态度极其不好的说“没有,不能换给你”呵!态度实在恶劣啊。 我十分凶恶的反问“你再说一次” 那...2006-11-23T12:42:00Z2006-11-23T12:42:00ZRed Huhttps://www.cnblogs.com/hclred/【摘要】(转:http://chinapcc1978.spaces.live.com/PersonalSpace.aspx?_c02_owner=1) 你让我痛快,我才让你爽! 我去换50张20的人民币,用来发小红包。 于是拿了1000去银行换,那小子态度极其不好的说“没有,不能换给你”呵!态度实在恶劣啊。 我十分凶恶的反问“你再说一次” 那... <a href="https://www.cnblogs.com/hclred/archive/2006/11/23/570275.html" target="_blank">阅读全文</a>https://www.cnblogs.com/hclred/archive/2006/11/23/570265.html C#操作注册表(不错的东东) - Red Hu(转...) C#操作注册表 以下从‘读’‘写’‘删除’‘判断’四个事例实现对注册表的简单操作 1.读取指定名称的注册表的值 程序代码private string GetRegistData(string name) { string registData; RegistryKey hkml = Registry.LocalMachine; RegistryKey software = hkm...2006-11-23T12:36:00Z2006-11-23T12:36:00ZRed Huhttps://www.cnblogs.com/hclred/【摘要】(转...) C#操作注册表 以下从‘读’‘写’‘删除’‘判断’四个事例实现对注册表的简单操作 1.读取指定名称的注册表的值 程序代码private string GetRegistData(string name) { string registData; RegistryKey hkml = Registry.LocalMachine; RegistryKey software = hkm... <a href="https://www.cnblogs.com/hclred/archive/2006/11/23/570265.html" target="_blank">阅读全文</a>