说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

自动更新工作站的应用程序-VB资料

HTML文档下载 WORD文档下载 PDF文档下载
自动更新工作站的应用程序-VB资料

Private Sub Form_Load()
On Error GoTo errorhandler
' Command 函数返回
' 命令行的字符串信息
' 该程序需要两个参数
' 如:(thisprog.exe c:\localdir\prgcopied.exe
' k:\servrdir\prgtocopy.exe)
If FileDateTime(Left(Command$, _
InStr(Command$, " ") - 1)) < _
FileDateTime(Mid$(Command$, _
InStr(Command$, " ") + 1)) Then
Top = (Screen.Height - Height) / 2
Left = (Screen.Width - Width) / 2
label1 = "拷贝 " & Mid$(Command$, InStr_
(Command$, " ") + 1) & _
" 到你的硬盘..."
Visible = True
Refresh
FileCopy Mid$(Command$, _
InStr(Command$, " ") + 1), _
Left(Command$, InStr(Command$, " ") - 1)
End If
'开始程序
x = Shell(Left(Command$, InStr(Command$, " ") - 1), 3)
End
Exit Sub
errorhandler:
If Err = 53 Then '文件没有
Resume Next '还是要拷贝
Else
MsgBox "错误 # " & Err & Chr(10) & Error _
& Chr(10) & "结束"
End
End If
Exit Sub
End Sub

ADO三大对象的属性、方法、事件及常数(三)-VB资料 ADO三大对象的属性、方法、事件及常数(一)-VB资料 Data 控件使用有密码的 Access 数据库 -VB资料 Excel、Access、VB的结合应用 Microsoft SQL Server 7.0安装问题(二)-VB资料 想问下:用ADO返回一个记录集,和用ADO执行一个存储过程可以返回一个数据集的代码,谢谢 请教Oracle的安装 简单问题大家帮看看,ASP里找开加密的数据库怎么不一样啊? ==delphi中的class的问题? 桌面上Internet Explorer被删。。怎么搞回来?? 在VB中控制WORD? 太难找到自己发的问问题的贴了? ****始何使MainFrame主窗口无系统菜单,但仍有最大化最小化关闭按钮**** 请教各位高手,一个简单的搜索功能设计,怎么做? 如果6x=42,那么1.3x+2.7x的值是多少? 先化简再求值3x³-[x³+( 化简:3x²-【7x-(4x-3)-3x 若方程3x-4=4x+3和方程2(x+1)—m=- 用配方法解方程3x平方-x-6=0 用配方法解方程3x的平方+x-9=0 解方程:3x的平方+x+2=0 用配方法 用配方法解方程 (1)1/3x-x-4=0 (2) 利用换元法解分式方程2x-1/x + x/2x-1 快讯:浙江黄岩一企业起火 2人跳窗逃嘉兴国际名品城工地脚手架坍塌 工人1当代女画家王玮百幅弥勒造像回乡展在浙日本一老妇睡梦中手脚被绑 300万日俄罗斯兴起“护花行动”保护夜行年轻女儿子吃灭蚊片自尽我们是父子也是哥们抢报纸海岛戏水需要一只怎样的表?象甲联赛广东队继续领跑万界天王逆袭的死后世界战线剑气凝神法奥系凤穿残汉相国寺旅游张自忠将军墓旅游沐王府旅游玻璃台旅游平谷九曲十八弯旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘