vb学生管理系统源代码部分代码PublicUserNameAsStringPublictxtSQLAsString'usetostorerecordSQLsentencePublicdreamAsADODB.Recordset'usetostorerecordobjectPublicMsgtextAsString'用来存放返回信息PublicOKAsBoolean''PublicdbAsStringPublicSubhighlight()WithScreen.ActiveFormIf(TypeOf.ActiveControlIsTextBox)Then.ActiveControl.SelStart=0.ActiveControl.SelLength=Len(.ActiveControl)EndIfEndWithEndSubSubMain()'DimLoginAsNewLogin'Login.ShowvbModal'fNotLogin.OKThen'LoginFailedsoexitapp'End'EndIf'Unloadstudentmdi'Setlogin=Newloginlogin.ShowEndSubPublicFunctionconnectstring()AsStringconnectstring="Provider=Microsoft.jet.OLEDB.3.51;Datasource=f:\schoolgroup\school.mdb"EndFunctionPublicFunctionExecuteSQL(ByValSQLAsString,MsgstringAsString)AsADODB.RecordsetDimcnnAsADODB.ConnectionDimrstAsADODB.RecordsetDimsTokens()AsStringOnErrorGoToExecuteSQL_ErrorsTokens=Split(SQL)Setcnn=NewADODB.Connectioncnn.OpenconnectstringIfInStr("INSERT,DELETE,UPDATE",UCase$(sTokens(0)))Thencnn.ExecuteSQLMsgstring=sTokens(0)&"querysuccessful"ElseSetrst=NewADODB.Recordsetrst.OpenTrim(SQL),cnn,adOpenKeyset,adLockOptimisticSetExecuteSQL=rstMsgstring="查询到"&rst.RecordCount&"条记录"EndIfexecuteSQL_exit:Setrst=NothingSetcnn=NothingExitFunctionExecuteSQL_Error:Msgstring="查询错误:"&err.DescriptionResumeexecuteSQL_exitEndFunctionPublicFunctionTesttxt(txtAsString)AsBooleanIfTrim(txt)=""ThenTesttxt=FalseElseTesttxt=TrueEndIfEndFunction
2024/4/26 9:34:11 210KB vb 学生 管理系统
1
相对于CnComm1.5的修正版,及将放在CppBlog的勘误放入头文件,版本定位CnComm1.51
2024/4/25 18:56:31 16KB CnComm 1.51 串口
1
郭老师的程序,思路清晰,便于移植,实测很好用。
本程序的主要功能如下: 1、给指定电话号码打电话。
2、挂断电话 3、接听电话 4、给指定电话号码发送英文短信息 5、给指定电话号码发送中文短信息硬件接口定义: 1、单片机采用STC89C52,晶振为11.0592 2、P0.0;//按键1,拨打电话 3、P0.1;//按键2,挂断电话 4、P0.2;//按键3,接听电话 5、P0.3;//按键4,发送一条英文短信息 6、P0.4;//按键5,发送一条中文短信息请注意在本程序中TC35I模块内的SIM卡号码为:13278418479,对方号码为:13101601289,读者可以根据自己的实际情况进行修改。
2024/4/25 12:03:54 25KB GSM 通信 单片机 郭天祥
1
用KeiluVision3开发环境实现的门禁控制系统
2024/4/22 12:07:09 14KB 51单片机 门禁
1
国外最新编辑的ffmpeg-php拓展,适合PHP5.4版本1.下载ffmpeg-php扩展包和ffmpeg.exe(刚开始我以为不需要这个,本地windows测试缺一不可),解压后有以下文件avcodec-51.dllavformat-51.dllavutil-49.dllphp_ffmpeg.dllpthreadGC2.dll2.将四个文件拷贝到windows/system32目录下avcodec-51.dll,avformat-51.dll,avutil-49.dll,pthreadGC2.dll3.将php_ffmpeg.dll拷贝到php的ext目录下。
4.然后需要到apache/bin文件下找到php.ini文件下允许使用dll文件加入extension=php_ffmpeg.dll并确保这三个都是开启状态extension=php_gd2.dll,extension=php_gettext.dllextension=php_gd2.dllextension=php_gettext.dllextension=php_ffmpeg.dll5.重启apache,输出phpinfo();方法查看环境配置,如看到以下信息则说明扩展安装成功。
2024/4/21 1:29:03 5.43MB ffmpeg
1
STC51单片机红外解码,其中代码亲测可用,没有任何问题
2024/4/20 19:26:57 4KB 51单片机 红外 解码
1
蜂鸣器奏乐在单片机上控制一个音符唱多长可采用循环延时的方法来实现
2024/4/19 21:45:18 889KB 单片机
1
51单片机的介绍ppt,比较容易理解,很有使用价值。
强推
2024/4/19 10:40:16 1MB 51
1
做的不太满意,但还是上传了,方便相关设计者使用,仅供参考,共3个文件,有一个是用Protel画的,需用它打开。
设计任务设定输入模拟量在0—5V范围内,按不同的数字键(0、1、2、3、4、5、6、7)依次采集0809相应数据通道的模拟量,并在LED数码管上显示出来。
设计要求1.画出连接线路图或功能模块引脚连接图,对工作原理及各芯片地址应有说明。
2.采用51系列单片机作主控制器,0809作A/D转换器,扩展接口至少应包括按键电路、显示电路、数据采集电路等,I/O口若不够用可采用8255芯片进行扩展。
3.采用3个共阴极型LED动态显示,显示按1位整数和2位小数的形式显示,小数点需显示出来。
4.进行程序设计,对各功能模块进行详细说明,画出主、子程序流程图,写出程序清单并加必要注释。
2024/4/19 8:03:08 252KB 数据采集 单片机 A/D转换
1
基于51单片机的播放器,可播放3首歌,歌名显示在1602液晶显示上。
2024/4/18 9:57:21 71KB 单片机 播放器
1
共 1000 条记录 首页 上一页 下一页 尾页
在日常工作中,钉钉打卡成了我生活中不可或缺的一部分。然而,有时候这个看似简单的任务却给我带来了不少烦恼。 每天早晚,我总是得牢记打开钉钉应用,点击"工作台",再找到"考勤打卡"进行签到。有时候因为工作忙碌,会忘记打卡,导致考勤异常,影响当月的工作评价。而且,由于我使用的是苹果手机,有时候系统更新后,钉钉的某些功能会出现异常,使得打卡变得更加麻烦。 另外,我的家人使用的是安卓手机,他们也经常抱怨钉钉打卡的繁琐。尤其是对于那些不太熟悉手机操作的长辈来说,每次打卡都是一次挑战。他们总是担心自己会操作失误,导致打卡失败。 为了解决这些烦恼,我开始思考是否可以通过编写一个全自动化脚本来实现钉钉打卡。经过一段时间的摸索和学习,我终于成功编写出了一个适用于苹果和安卓系统的钉钉打卡脚本。
2024-04-09 15:03 15KB 钉钉 钉钉打卡