自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(9)
  • 收藏
  • 关注

原创 通过SQL语句修改服务器时间

1、SQL Server 阻止了对组件 'xp_cmdshell' 的 过程'sys.xp_cmdshell' 的访问 EXEC sp_configure 'show advanced options', 1--;RECONFIGURE WITH OVERRIDE --;EXEC sp_configure 'xp_cmdshell', 1 --;RECONFIGURE WITH OV

2014-11-27 11:31:26 946

原创 VB.NET 读取写入XML文件

Public Class CSysXML Dim mXmlDoc As New System.Xml.XmlDocument Public XmlFile As String Public Sub New(ByVal File As String) MyClass.XmlFile = File MyClass.mXmlDoc.Load(My

2014-11-27 11:14:44 10730

原创 VB.net 文件读取、写入、追加操作

Dim PathUserData As String = Application.StartupPath & "\实操统计sql.txt"TextTB.Text = System.IO.File.ReadAllText(PathUserData)‘或者用 System.IO.File.ReadAllText(PathUserData, System.Text.Encoding.UTF8)上面这

2014-11-27 10:49:46 27337

原创 VB.net 对MSSQL操作 查、删、改 三个常规操作

首先,需引用Imports System.Data.SqlClient.SqlExceptionImports System.Data.SqlClient

2014-11-24 10:00:54 1554

转载 VS2005中文输入法问题的总结

这不是一个新问题了,网上也不乏这方面的讨论,写出来也是为了理清自己的思路,难保以后不会碰到类似的问题。主要有两种表现:1、首次切换输入法失败的问题具体表现如下:比如有一个Form1上有一个TextBox1,两者的ImeMode属性都为NoControl。运行程序,弹出Form1,光标停留在TextBox1中,此时按下Ctrl+Shift或者Ctrl+Space打开输入法,会发现

2014-11-20 09:58:16 621

原创 .net My.Computer.Network 几个秒用

Dim isa As Boolean = My.Computer.Network.IsAvailable If isa = True Then LabelX2.Text = "目前网路连线正常!!" Else LabelX2.Text = "目前网路无法连线!!" End If

2014-11-16 19:04:22 1329

原创 sql server 单主键高效分页存储过程 (支持多字段排序)

Create PROC P_viewPage /* 适用于单一主键或存在唯一值列的表或视图 ps:Sql语句为8000字节,调用时请注意传入参数及sql总长度不要超过指定范围 */ @TableName VARCHAR(200), --表名

2014-11-14 09:10:49 683

原创 VB.net 微信公众平台开发(一) Token验证

登录https://mp.weixin.qq.com/ 后,在公众平台后台管理页面 – 开发者中心页,点击“修改配置”按钮,填写URL、Token和EncodingAESKey,其中URL是开发者用来接收微信服务器数据的接口URL。Token可由开发者可以任意填写,用作生成签名(该Token会和接口URL中包含的Token进行比对,从而验证安全性)。EncodingAESKey由开发者手动填写或随

2014-11-10 12:04:18 7680

原创 VB.net 打印机读取(选择)

’需要引用: Imports System.Drawing.Printing Dim prtdoc As New PrintDocument() Dim strDefaultPrinter As String = prtdoc.PrinterSettings.PrinterName ‘读取的是默认打印机名称 Dim strP

2014-11-07 14:10:49 2284

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除