熊哥的大哥-优快云博客

原创 xUtitls3 在创建表时出现错误：missing no-argument constructor for the table: user

package com.sms.xutitls;/**************************************************************---- Create By 熊哥 On 2020/10/4 ----***************************************************************/import org.xutils.db.annotation.Column;import org.xutils...

2020-10-04 18:22:01 687

原创在网页中动态改变图片大小

script type="text/javascript">function OK() ...{ //document.write (alert(OK)); //if(document.getElementByid){document.getElementById("IMG").height="200"} if (document.getElementById("IMG"

2007-11-28 20:06:00 907

原创详细讲解JavaScript脚本语言的 document 对象

对象属性 document.title //设置文档标题等价于HTML的标签 document.bgColor //设置页面背景色 document.fgColor //设置前景色(文本颜色) document.linkColor //未点击过的链接颜色 document.alinkCo

2007-10-21 17:43:00 782

转载 vb.net的数组的基类是 System.Array

vb.net的数组的基类是 System.Array 学过编程的人都会对数组有一定的了解，毕竟任何一门计算机开发语言都会有数组的概念。数组就是存储了一组数的对象。数组中比较重要的概念包括维度（也叫只秩） Rank每维的长度 GetLength ,GetLongLength 上下标 GetLowerBound

2007-10-07 19:58:00 2513

转载 vb.net 封装组件成com的方法

　方法如下：　　新建一个　项目　，选择　Visual Basic / Window / 类库　，假设项目名为ClassLibrary1　　然后在　solution manager(解决方案资源管理器）中，　将　新创建的　Class1.vb　文件删除。　　然后　在　　solution manager(解决方案资源管理器）中　的项目上点击右键　，在弹出的菜单上　点击　添加 / 类　，在弹

2007-10-07 19:34:00 1843

原创 vb.net2005 LinkLabel1的使用

With Me.LinkLabel1 .AutoSize = True .Text = "百度，谷歌，新浪" .LinkBehavior = LinkBehavior.HoverUnderline .LinkColor = Color.BlueViolet .LinkArea = Ne

2007-10-07 16:45:00 2298

原创对按钮重新绘制

Private Sub Button2_Paint()Sub Button2_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Button2.Paint Dim MyGp As New System.Drawing.Drawing2D.Grap

2007-10-07 12:58:00 558

原创 vb.net2005资料收集（数据库篇）

一、数据库链接1、使用OleDbConnection、OleDbCommand、OleDbDataReader连接读取数据库 Dim MyConnection As New OleDbConnection("Provider= Microsoft.Jet.OLEDB.4.0;Data Source=" + Application.StartupPath + "Nor

2007-10-06 22:13:00 1326

原创 vb.net2005资料收集（系统篇）

一、浏览文件夹，并选择文件Imports System.IOPublic Class Form1Class Form1 浏览文件夹 Private Sub Button1_Click()Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Cl

2007-10-06 21:56:00 725

原创 vb.net2005 获取网页链接，并提示

＝用按钮设置WEBBROWSER的内容＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝Private Sub Button1_Click()Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim s As St

2007-10-04 23:00:00 1429

原创 vb.net2005 网页自动填写并提交

if request("B1")="提交" thenresponse.write "姓名:"&request("Name")end if%> 请填写下面表单注册（*项为必添项） *姓名 *昵称电子邮件 *密码＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝ Dim NAME As Windows.Forms.HtmlElement

2007-10-03 11:17:00 1902

原创如何在 Internet Explorer 中以编程方式更改 Internet Explorer 和 WebBrowser 控件的打印设置

转自 http://support.microsoft.com/kb/236777/zh-cn概要loadTOCNode(1, summary);本文介绍如何以编程方式为从 Internet Explorer 和 WebBrowser 控件进行打印设置页边距、页眉和页脚信息及默认打印机。下面是 Microsoft Internet Explorer 访问打印设置的

2007-10-03 09:46:00 1483

原创 vb.ne访问有密码的ACCESS数据库

MyConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Password=HCbg3721k;User ID=admin;Data Source=E://WindowsApplication1/bin/bardb.mdb Persist Security Info=true " 奇怪,上面不能访问,下面就可以访问

2007-09-12 21:55:00 1191

原创 windows server 2003下安装 php5.0.3

windows server 2003下安装 php5.0.3 1、下载php5.0.3最新版安装程序。分手动安装版php5.0.3-win32.zip for windows，和自运安装版 php 5.0.3 installer for windows（此为自动下载安装程式，可能会造成本地系统不稳定或者崩溃）。这里建议你下载手动安装版。2、解压 php-5.0.3-Win32.zip ，并复制整

2007-09-01 23:51:00 1406

原创在安装PHP论坛时提示　您的服务器不支持MySql数据库,无法安装论坛程序

您的服务器不支持MySql数据库,无法安装论坛程序2007-07-30 18:14 转“思想加油站”贴熬到两点解决了这个问题，拿来与大家分享。不多闲话了，下面是我最后解决的办法，希望对同样遇到这个问题的朋友有帮助。

2007-09-01 23:50:00 13176 1

原创 MSSQL2000中存储过程返回值及TOP在存储过程中的用法

一、存储过程返回值例子一：CREATE PROCEDURE [TotalUser]@UserName varchar(40) output,@ID int as set nocount on begin if @ID is null return select @UserName=姓名 from 用户 where id=@ID

2007-08-29 09:00:00 1450

转载动网数据库Access 转成SQL Server2000 数据库的一个绝对成功的好方法：

动网数据库Access 转成SQL Server2000 数据库的一个绝对成功的好方法：步骤如下: 1、必须先安装Microsoft Office Access 2003,和SQL Server2000。2、把旧的动网数据库备份，备份完成后，用Access 2003打开动网旧数据库，在打开时会出现一个警告，不要理会它（安全警告），按打开键，打开后按工具栏——数据库实用工具——转换数据库—

2007-08-26 18:28:00 929

原创 mssql2000中使用datediff

sql="select top 30 * from 用户 where DATEDIFF(month,lasttime,"& now &")=0 order by 粪库 desc" 或sql="select top 30 * from 用户 where DATEDIFF(month,lasttime,getdate)=0 order by 粪库 desc"

2007-08-25 17:39:00 959

转载 VB.NET 抓屏截屏

’Author:wgscd ’功能：抓屏 ’QQ153964481 ’Date:2005-4-12 ’********************************* Public Class Form1 Inherits System.Windows.Forms.Form #Region " Windows 窗体设计器生成的代码 " Public Sub New()

2007-08-02 17:46:00 4469 1

转载 .net里对图片文件进行质量压缩以及即时预览

2007-08-02 17:44:00 1183

转载 asp使用mysql数据库

准备要弄个查询页,数据库是mysql,在网上搜索才看到两篇文章关于asp使用mysql数据库,都是很久以前的了需要配置odbc,今天自己测试过,根本不需要,安装mysql的时候它会自己在系统dsn添加了,而且数据库连接语句也不需要写说明dsn=mysql之类的,这样就可以了:connstr="driver={mysql odbc 3.51 driver};server=127.0.0.1;uid=

2007-07-22 18:38:00 877

原创水晶报表公式使用

公式包含两个关键部分：组件和语法。组件是创建公式所添加的部分，而语法是组织组件所遵循的规则。在 Crystal Reports 中有几种不同种类的公式：报表、格式化、选定、搜索、运行总计条件和警报公式。报表中的多数公式为报表公式和条件格式化公式。一、公式组件在 Crystal Reports 中创建公式与在任何电子数据表应用程序中创建公式类似。可以在公式中使用下列组件：字段示例：{客户

2007-07-20 17:49:00 2605

转载 NET环境下水晶报表使用总结

水晶报表是一个优秀的报表开发工具，本人在开发通用管理系统的时候，所有报表都使用水晶报表，其简单、易用和强大的功能令笔者倍加喜爱，现将水晶报表使用手记呈现给大家。一、在使用自带的水晶报表时，请注册，否则只能使用30次水晶报表注册码注册号:6707437608密码:AAP5GKS0000GDE100DS 二、使用CrystalReportViewer进行预览Cryst

2007-07-20 17:47:00 998 2

转载 VB.NET环境下的Socket编程举例

VB.NET环境下的Socket编程举例一直以来很想学习Socket编程方面的应用，比如怎样通过Socket编程实现单片机与PC的TCP连接通信。在单片机嵌入网卡芯片与PC进行连接通信，实现PC的web方式对单片机所控制的设备的状态管理，例如智能家居方面的应用。下面通过例子来学习VB.NET中Net.Sockets类的应用，下面的程序分别分服务器和客户端两部分

2007-05-20 16:12:00 1991

原创身份证号码15-18

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Label1.Text = s15to18(TextBox1.Text) End Sub Function s15to18(ByVal str15 As

2007-05-20 12:19:00 1369

原创 ORACLE自动编号

SQL> select * from scott.admin; ID USERNAME PASSWORD---------- ---------- ---------- 1 admin admin 2 tom tomSQL> create sequence scott.admin_seq;序列已创建。SQL>

2007-05-18 15:55:00 1001 1

原创 vb.net2005 读取 excel 表格数据填充 datagridview

创建虚拟表 Dim TelTable As DataTable = New DataTable("Tel") Dim tt As DataRow TelTable.Columns.Add("主叫号码", System.Type.GetType("System.String")) TelTable.Columns.Add("被叫号码",

2007-05-18 11:43:00 2693 1

原创 ASP连接ORACLE代码

连接数据库 dim conn dim connstr Set conn=Server.CreateObject("ADODB.Connection") connstr="Driver={Microsoft ODBC for Oracle};server=mysw;uid=system;pwd=system;" startime=timer()%> 测试 Conn.ope

2007-05-12 21:58:00 1421

原创 VB.NET2005 AxWindowsMediaPlayer1连续播放问题解决

实际上就是先定义一个WMP的播放列表: Dim CurrentList As WMPLib.IWMPPlaylist = Me.AxWindowsMediaPlayer1.currentPlaylist Dim Media As WMPLib.IWMPMedia 这里可以使用数组循环,从而得到播放列表 Media = Me.AxWindowsMe

2007-04-30 14:52:00 2664

转载经典正则表达式

正则表达式用于字符串处理，表单验证等场合，实用高效，但用到时总是不太把握，以致往往要上网查一番。我将一些常用的表达式收藏在这里，作备忘之用。本贴随时会更新。匹配中文字符的正则表达式： [/u4e00-/u9fa5]匹配双字节字符(包括汉字在内)：[^/x00-/xff]应用：计算字符串的长度（一个双字节字符长度计2，ASCII字符计1）String.prototype.len=

2007-04-25 15:51:00 589

转载聊天一对一 Socket

本例只适合初学用Socket编程的人，因而力求简单，让老鸟见笑了J另本示例用的是vs20051、服务端Imports System.NetImports System.Net.SocketsImports System.ThreadingImports System.TextImports System.DiagnosticsPublic Class frmServ

2007-04-25 15:49:00 838

原创 VB.NET常用的一些基本函数

判断该窗体是否已经打开 Public Function OpenForm(ByVal myform As Form, ByVal MdiForm As Form) As Boolean Dim form As Form For Each form In MdiForm.MdiChildren If form.Text = myfor

2007-04-25 15:45:00 967

原创 vb.net2005里 webclient实现文件下载

Private WithEvents myWebclient As WebClient Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim remoteUri As String = "http://offi

2007-04-25 15:41:00 1730

原创向 ListView 控件添加搜索功能

使用文本查找项创建一个 ListView，View 属性设置为 Details 或 List，然后用项填充该 ListView。调用 FindItemWithText 方法，向其传递要查找的项的文本。下面的代码示例演示如何创建基本 ListView，用项进行填充并使用由用户输入的文本来在列表中查

2007-04-23 16:27:00 1923

原创创建未绑定的 Windows 窗体 DataGridView 控件

Imports SystemImports System.DrawingImports System.Windows.FormsPublic Class Form1 Inherits System.Windows.Forms.Form Private buttonPanel As New Panel Private WithEvents songsDataGridView

2007-04-23 16:20:00 815

原创 VB.NET的示例使用 AddressOf 运算符来指定线程的启动函数(多线程)

Public Sub CountSheep() Dim i As Integer = 1 Sheep do not count from 0. Do While (True) Endless loop. Console.WriteLine("Sheep " & i & " Baah") i = i + 1 Syste

2007-04-23 11:21:00 2782

原创使用设计器创建带有 ListView 和 TreeView 控件的资源管理器样式的界面 [无限级treeview]

http://msdn2.microsoft.com/zh-cn/library/ms171645(VS.80).aspx#Mtps_DropDownFilterText

2007-04-19 11:29:00 931

原创使用 RichTextBox 控件链接到网页

Public p As New System.Diagnostics.ProcessPrivate Sub RichTextBox1_LinkClicked _ (ByVal sender As Object, ByVal e As _ System.Windows.Forms.LinkClickedEventArgs) _ Handles RichTextBox1.L

2007-04-19 10:36:00 1151

原创 listview怎样连接数据库并显示表中的内容?

listview怎样连接数据库并显示表中的内容?所属分类：.NET技术 VB.NET----------------------------------------------------------------------listview怎样连接数据库并显示表中的内容? 急呀,谢谢 ---------------------------------------------------------

2007-03-31 22:06:00 4418 1

原创 VB2005中的WebBrowser1打开新窗口的问题

先用NewWindow事件捕获新窗口要打开的URL，然后把它设置为自定义新窗口的URL，并打开自定义新窗口，接着取消用系统默认浏览器打开新窗口的动作。示例代码： Private Sub WebBrowser1_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles

2007-03-30 22:18:00 1916

关于VB的常用函数，不明白的可以下载

VB模拟鼠标键盘动作

空空如也