08
2012
06

获取计算机硬件信息的VB.NET代码范例

得到显示器分辨率


   本文相关代码如下:
Dim X As Short = System.Windows.Forms.Screen.PrimaryScreen.Bounds.Width
...
02
2012
06

三种东西永远不要放到数据库里

 我已经在很多演讲里说过,改进你的系统的最好的方法是先避免做“蠢事”。我并不是说你或你开发的东西“蠢”,只是有些决定很容易被人们忽略掉其暗含 的牵连,认识不到这样做对系统维护尤其是系统升级带来多大的麻烦。作为一个顾问,像这样的事情我到处都能见到,我还从来没有见过做出这样的决定的人有过好 的结果的。图片,文件,二进制数据既然数据库支持BLOB

01
2012
06

一个SQL 语句

Select 酒菜编号,点单类型,case 点单类型 when '点单' then sum(数量) end as 点单数量,case 点单类型 when '退单' then sum(数量) end as 退单数量,sum(数量) as 总数 from 表名 group by 酒菜编号,点单类型

运行测试

SELECT inno, inout, CASE inout WHEN '入库' THEN SUM(QTY) END AS 入库数量, CASE inout WHEN '出库' THEN SUM(QTY) END AS 出库数量
...

28
2012
05

串口控制继电器程序

#include <reg51.h>
#include <intrins.h>
#include < stdio.h >

//定义继电器的管脚
sbit     K0_0 =  P0^0;   //对应继电器
sbit     K0_1 =  P0^1;   //对应继电器
...

28
2012
05

软驱步进电机测试程序

N年前自己写的一个测试程序 用于3.5软驱的 那个小小步进电机驱动

#include <reg51.h>
#include <intrins.h>
//亮灯测试程序
char np;
char motortb[]={0x11,0x99,0x88,0xcc,0x44,0x66,0x22,0x33};//步进电机运行数据表

void delay(char t)// 每步延时的子程序
...

24
2012
05

ASP远程调用的演示代码.

如果想执行服务器端代码而又不转变当前页面,可以用如下代码解决:
这是default.asp文件
<%@ Language=VBScript %>
<%
response.expires=0
RsEnable=true
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
...

24
2012
05

导出的数学函数

导出的数学函数


以下为非基本数学函数的列表,皆可由基本数学函数导出:

函数 由基本函数导出之公式
Secant(正割) Sec(X) = 1 / Cos(X)
Cosecant(余割) Cosec(X) = 1 / Sin(X)
Cotangent(余切) Cotan(X) = 1 / Tan(X)
Inverse Sine
(反正弦)
Arcsin(X) = Atn(X / Sqr(-X * X + 1))
...

24
2012
05

☆ASP中生成动态图表☆

以前在这里也曾经有一些文章谈到了在ASP中生成动态图表的问题,但那些文章中所谈到的一些方法都有某些方面的限制,如需要在客户端安装office2000或安装OWC,有些则可能在Intranet中使用时没什么问题,但在通过Internet访问的时候,就可能出现无法正常工作的现象(这主要和SQL Server的安全设置有关)。那么,我们如何来避免这些问题呢?有一个很好的方法,就是将在ASP中生成的图表转换成图片文件保存在服务器上,这样用户最终看到的是GIF图片格式的图表,我想现在的任何一种浏览器在观看GIF图片的时候都没什么问题吧。:)也许唯一可能的问题就是如何对这些生成的临时图片文件的处理问题,关于这个问题在最后我们会讨论。
...

24
2012
05

☆把数据库里BASE64编码的图片显示出来☆

<!--#include file="Condata.asp"-->

<%

sBASE_64_CHARACTERS = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"
...

24
2012
05

asp存储过程使用大全【转帖】

存储过程使用大全

 

1,调用没有参数的存储过程

 

<%

 

set conn=server.CreateObject("adodb.connection")

...