共134篇 首页 上一页 下一页 尾页 页次:12/14页  10篇/页 转到:
未知 信息技术一个简单的VB串口发送程序(源码)   [ 2004-03-02 00:00:00  星期二 ]
'-----发送按钮Click事件子程序-----------
Private Sub Fasong_Click()
Dim JIHAO(0) As Byte ’机号
Dim head_data(4) As Byte ’5 Byte控制字
Dim end_data(0) As Byte '1 Byte 结束字
JIHAO(0) = Val(Text3.Text)
head_data(0) = Val(Text4.Text)
head_data(2) = &HEE 'TIMH
head_data(3) = &HEE 'TIML
head_data(4) = Val(Combo1.Text) 'INMOD
end_data(0) = &HFF
If Combo2.Text = "增加" Then head_data(1) = &H99
If Combo2.Text = "清空" Then head_data(1) = &H33
If Combo2.Text = "删除" Then head_data(1) = &H32
Ready = 0: ErrCount = 0
On Error GoTo ERRORCOM ’打开错误处理
'----------------------------------------------------------
If com1.Value Then MSComm1.CommPort = 1 'Use com1
If com2.Value Then MSComm1.CommPort = 2 'Use com2

MSComm1.Settings = FORM1.Combo3.Text + ",M,8,2" '设定波特率和置校验和位为1
MSComm1.InputLen = 0 '
MSComm1.PortOpen = -1 'Open the port
MSComm1.OutBufferCount = 0
MSComm1.Output = JIHAO ‘发送机号
MSComm1.PortOpen = False ’关闭串口
MSComm1.Settings = FORM1.Combo3.Text + ",S,8,2" '设定波特率和置校验和位为空
MSComm1.OutBufferCount = 0
MSComm1.PortOpen = True
MSComm1.Output = head_data
MSComm1.Output = Text2.Text
MSComm1.Output = end_data
MSComm1.PortOpen = False
Text1.Text = "发送成功!" + Chr(13) & Chr(10) + "发送至" + Text3.Text + "屏体," + "信息编号:" + Text4.Text + Chr(13) & Chr(10) + Chr(13) & Chr(10) + Text1.Text
GoTo comend
ERRORCOM:
Text1.Text = "ERROR!请重新选择COM口!" + Chr(13) & Chr(10) + Chr(13) & Chr(10) + Text1.Text
comend:
On Error GoTo 0
End Sub
……

  阅读全文>>

阅读全文 | 编者:haiyun.net  | 评论:0 | 查看:11850  
未知 信息技术一个非常好的串口程序   [ 2004-03-02 00:00:00  星期二 ]
#include <iom128v.h>
#include <macros.h>
#include "uart.h"

/* USART Buffer Defines */
#define USART_RX_BUFFER_SIZE 16 /* 1,2,4,8,16,32,64,128 or 256 bytes */
#define USART_RX_BUFFER_MASK ( USART_RX_BUFFER_SIZE - 1 )
#define USART_TX_BUFFER_SIZE 16 /* 1,2,4,8,16,32,64,128 or 256 bytes */
#define USART_TX_BUFFER_MASK ( USART_TX_BUFFER_SIZE - 1 )

#if ( USART_RX_BUFFER_SIZE & USART_RX_BUFFER_MASK )
#error RX buffer size is not a power of 2
#endif

/* Static Variables */
static unsigned char USART_RxBuf[USART_RX_BUFFER_SIZE];
static volatile unsigned char USART_RxHead;
static volatile unsigned char USART_RxTail;
static unsigned char USART_TxBuf[USART_TX_BUFFER_SIZE];
static volatile unsigned char USART_TxHead;
static volatile unsigned char USART_TxTail;

/* 串口初始化 */
void InitUSART(INT8U baudrate)
{
INT8U x;
UBRR0L = baudrate;
UCSR0B = ( (1<<RXCIE0) | (1<<RXEN0) | (1<<TXEN0) );/*RX Complete
Interrupt Enable, Receiver Enable and Transmitter Enable*/
x = 0; /* flush……

  阅读全文>>

阅读全文 | 编者:haiyun.net  | 评论:0 | 查看:9718  
  摘要 在Visual Basic开发环境下,运用VB提供的通信控件,实现PC机与89C51单片机之间的串行通信。
  关键词 Visual Basic 89C51单片机 串行通信 A/D D/A转换

Serial Communication between PC
and 89C51 with Visual Basic

  Abstract:Serial communication between PC and 89C51 single-chip-computer by MSCOMM control box of Visual Basic is introduced.
  Key Words:Visual Basic 89C51 Serial communication A/D D/A

1 系统简介
  在中科院等离子体物理研究所受控核聚变物理实验装置控制系统中,我们开发设计了以计算机控制为基础的各种信号予置系统,系统原理如图1所示。

图1 系统原理图

  系统上位机由一台(PC586)微机构成,软件采用Visual Basic编程,作出十分直观的人机界面,并通过串行口将所需的各种予置信号(数字信号)传给单片机系统,再由单片机系统产生实际的模拟信号经线性光电隔离器送到现场。予置数值可以分别显示在PC机软件……

  阅读全文>>

阅读全文 | 编者:haiyun.net  | 评论:0 | 查看:11787  
未知 信息技术网页色彩搭配的设计艺术   [ 2004-02-29 00:00:00  星期日 ]
打开一个网站,给用户留下第一印象的既不是网站丰富的内容,也不是网站合理的版面布局,而是网站的色彩。色彩对人的视觉效果非常明显,一个网站设计成功与否,在某种程度上取决于设计者对色彩的运用和搭配。因为网页设计属于一种平面效果设计,在排除立体图形、动画效果之外,在平面图上,色彩的冲击力是最强的,它很容易给用户留下深刻的印象。因此,在设计网页时,我们必须要高度重视色彩的搭配。

一、色彩的基础知识

色彩五颜六色、千变万化,我们平时所看到的白色光,经过分析在色带上可以看到,它事实上包括红、橙、黄、绿、青、蓝、紫等七色,各颜色间自然过渡。其中,红、黄、蓝是三原色,三原色通过不同比例的混合可以得到各种颜色。色彩有冷暖色之分,冷色(如蓝色)给人的感觉是安静、冰冷;而暖色(如红色)给人的感觉是热烈、火热。冷暖色的巧妙运用可以让网站产生意想不到的效果。

色彩与人的心理感觉和情绪也有一定的关系,利用这一点可以在设计网页时……

  阅读全文>>

阅读全文 | 编者:haiyun.net  | 评论:0 | 查看:6980  
未知 信息技术了解子网掩码   [ 2004-02-17 00:00:00  星期二 ]
 你一定对IP地址有所了解吧?我们知道在INTERNET中广泛使用的TCP/IP协议就是利用IP地址来区别不同的主机的。如果你曾经进行过TCP/IP协议设置,那么你一定会遇到子网掩码(Subnet mask)这一名词,那么你知道什么是子网掩码吗?它有什么作用呢?

 我们知道IP地址是一个4字节(共32bit)的数字,被分为4段,每段8位,段与段之间用句点分隔。为了便于表达和识别,IP地址是以十进制形式表示的如210.52.207.2,每段所能表示的十进制数最大不超过255。IP地址由两部分组成,即网络号(Netgwork ID)和主机号(Host ID)。网络号标识的是Internet上的一个子网,而主机号标识的是子网中的某台主机。网际地址分解成两个域后,带来了一个重要的优点:IP数据包从网际上的一个网络到达另一个网络时,选择路径可以基于网络而不是主机。在大型的网际中,这一点优势特别明显,因为路由表中只存储网络信息而不是主机信息,这样可以大大简化路由表。IP地址根据网络号和主机号的数量……

  阅读全文>>

阅读全文 | 编者:肖秋涛  | 评论:0 | 查看:7277  
未知 信息技术黑客攻击手段及反黑措施   [ 2004-01-06 00:00:00  星期二 ]
“黑客”(洋名为Hacker)指的是喜欢挑战难度、寻找各类服务器漏洞、破解各种系统密码的电脑高手,但他们中大部分人并不搞破坏,所以他们强烈反对别人把“Hacker”和“Cracker”(破坏者,黑客们常称他们为“骇客”)混为一谈。但无论是“黑客”也好,“骇客”也罢,他们都会对网络上的目标主机发起攻击,是网络安全的头号“杀手”。
  除了常见的政治、经济或个人报复等方面的因素外,单从技术上说,黑客入侵的动机是成为目标主机的主人。众所周知,只有获得了一台网络主机的超级用户权限后才能在该主机上修改资源配置、安置“特洛伊”程序、隐藏行踪、执行任意进程等等。并且如果拥有了一台主机的超级用户权限后,对入侵与之相连的其他主机也有莫大裨益。

  此外,主机上的文件或主机与主机之间的传输数据通常也是黑客们下手的目标。例如主机上的密码文件、主机列表文件等。

  一、黑客入侵的步骤

  黑客们究竟为什么要入侵某一目标?除非本身就是……

  阅读全文>>

阅读全文 | 编者:haiyun.net  | 评论:0 | 查看:7846  
未知 信息技术网管必读-常用网络命令   [ 2003-11-14 00:00:00  星期五 ]
如果你玩过路由器的话,就知道路由器里面那些很好玩的命令缩写。例如,"sh int" 的意思是 "show interface"。 现在 Windows 2000 也有了类似界面的工具,叫做 netsh。

我们在 Windows 2000 的 cmd shell 下,输入 netsh就出来:netsh> 提示符,输入 int ip 就显示:interface ip> 然后输入 dump ,我们就可以看到当前系统的网络配置:

# ----------------------------------
# Interface IP Configuration
# ----------------------------------
pushd interface ip

# Interface IP Configuration for "Local Area Connection"
set address name = "Local Area Connection" source = static addr = 192.168.1.168
mask = 255.255.255.0
add address name = "Local Area Connection" addr = 192.1.1.111 mask = 255.255.255.0
set address name = "Local Area Connection" gateway = 192.168.1.100 gwmetric = 1
set dns n……

  阅读全文>>

阅读全文 | 编者:海运.Net  | 评论:0 | 查看:8189  
未知 信息技术Casl汇编语言辅导   [ 2003-10-05 00:00:00  星期日 ]
一、Casl汇编语言语法介绍

学习一个汇编语言需要掌握3个要点:CPU 的可编程寄存器结构、寻址方式及指令系统、伪指令。

1、COMETCPU 的可编程寄存器

COMETCPU 字长 16 位,采用从左到右的编号。bit0 在最左边(最高位),bit15 在最右边(最低位)

0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

1)16 位通用寄存器五个:

GR0、GR1、GR2、GR3、GR4

通用功能:各种算术逻辑运算

特殊功能:除 GR0 外都可作变址寄存器(地址指针)XR,GR0 可看成累加器。

GR4 兼作堆栈指针(SP)

2)指令计数器 PC 一个(16位)

存放正在执行的那条指令的第 1 个字的地址(一条指令占二个字),指令结束时,PC 中存放下一条指令的地址(一般为原指令地址 +2 )。

3)状态寄存器 FR 一个(二位)

运算结果 FR0 FR1
大于 0 0
等于 0 1
小于 1 0

 

可以把 FR0 看成 SF(符号位),FR1 看成 ZF(零位位)

除了算术逻辑运算指令(包括移位指令)外,LEA 指令也会影响 FR

2、符号指令写法与寻……

  阅读全文>>

阅读全文 | 编者:海运.Net  | 评论:0 | 查看:45042  
未知 信息技术在PowerPoint2000中插入flash动画   [ 2003-09-25 00:00:00  星期四 ]
首先,在PowerPoint中使用FLASH要求系统安装FLASH ActiveX控制。如果系统有Explorer4.0或更高版本并可播放FLASH电影,则ActiveX控制已被安装。 检查系统system目录里是否有“SWFLASH.OCX”文件可知道FLASH ActiveX是否已被安装。

将FLASH嵌入PowerPoint
第一,打开PowerPoint 2000。

第二,选择View(视图) > Toolbars(工具栏) > Control Toolbox(控件工具箱)。这将打开ActiveX控制的工具条。

第三,在工具条的底部有一“other controls”的按钮。选择该按钮,打开系统上已安装的ActiveX控制的清单。


第四,选择“Shockwave Flash Object”。

第五,选择Shockwave Flash Object之后光标将变成十字型。用十字标在幻灯片上拖出一块FLASH电影播放的场地。FLASH电影能随意占用荧幕的任意大小或位置。

第六,拖好FLASH窗口后,右击该窗口。选择弹出菜单里的“Properties(属性)”项。

第七,选择“Custom(自定义)”右边的“…”项。打开FLASH的页面属性对话框。

第八,在页面属性对话框中键入SWF格式电影文件的URL或路径。如果SWF电影文件在PowerPoint文件的同一目录下,则键入SWF文件名即可。SWF文件也可是网路上任一地址。

第九,点击OK,万事大吉。

阅读全文 | 编者:海运.Net  | 评论:0 | 查看:7073  
未知 信息技术网吧管理软件十大漏洞曝光   [ 2003-09-14 00:00:00  星期日 ]
  上网吧的人多了,管理也难了,于是网吧管理软件也来了,网管软件来了,于是网管就轻松了,每天打开电脑,启动软件,仿佛也就没事了。不过真是这样吗?也许只是轻点几下鼠标,就会找到几个漏洞,网管软件也就如玻璃般的碎掉。不信?

  本报网络安全阵线块编辑特意走访了数十家网吧,这些网吧的管理员大多使用诸如《美萍》之类的网吧管理软件来管理系统,同时还通过修改系统注册表的方法来禁止用户进行诸如删除文件、修改参数的危险操作。但在没有使用任何工具软件的前提下,以一些简单的方法就轻易突破了网吧管理软件的限制,原本被禁止的系统功能全部复活,不仅可以删除文件,还可以对系统注册表进行随意修改,整个系统可任意使唤。这次,我们将在网吧发现的十大致命漏洞全部曝光,以此警示每一位网吧管理员。

  十大漏洞看过来

  一、IE菜单漏洞

  找回菜单轻松微软老大的补丁越打越多,这样倒不是说比尔大叔的漏洞越来越多了,而是正应了那句“上有政……

  阅读全文>>

阅读全文 | 编者:haiyun.net  | 评论:0 | 查看:7825  
共134篇 首页 上一页 下一页 尾页 页次:12/14页  10篇/页 转到:

免责申明 | 版权申明 | 联系我们 | 关于
Copyright © 2001-2025 Haiyun.Net All Rights Reserved
地址:深圳市南山区南油天安工业区1栋3楼 邮编:518000
有我可以帮您的吗?QQ:12457275  
粤ICP备05017321号-1