本站首页    管理页面    写新日志    退出


«June 2017»
123
45678910
11121314151617
18192021222324
252627282930


公告
暂无公告...

我的分类(专题)

日志更新

最新评论

留言板

链接


Blog信息
blog名称:VFP及Sql Server拙笔
日志总数:46
评论数量:107
留言数量:0
访问次数:351621
建立时间:2005年5月12日




[编程及数据库]VFP日期时间转中文日期时间
原创空间,  日后处理,  软件技术,  电脑与网络,  其他

老瓷 发表于 2015-4-9 13:05:02

本函数原为VFP中取日期转中文日期方式,后增加日期时间处理,并改用Iif及ICase修改原代码。
Function DateTime2CHN
Parameters pdDate,plTime
*!* pdDate -- 日期 或 日期时间;  plTime -- 取时间否,1--取时间,0--不取时间(默认),此参数为空时取默认值
*!* By HeQiang  2003-04-01  Edit:2010-07-12
If VarType(plTime, .T.)<>'N' Or IsNull(plTime) Or !Between(plTime, 0, 1) Or VarType(pdDate,.T.)='D'
   plTime = 0
EndIf
Local lcYMD
Local lnYear,lnMonth,lnDay
lnYear = Year(pdDate)
lnMonth = Month(pdDate)
lnDay = Day(pd


阅读全文(933) | 回复(0) | 编辑 | 精华 | 删除
 


[编程及数据库]VFP9利用_GdiPlus类处理图片分辨率及缩放
原创空间,  随笔,  心得体会,  事件记录,  软件技术,  电脑与网络

老瓷 发表于 2015-2-7 14:39:14

Local lcFile_S, lcFile_T, lnW_T, lnH_T, lnXDpi_T, lnYDpi_T m.lcFile_S = 'D:\Temp\Source.jpg'
m.lcFile_T = 'D:\Temp\Target.jpg' m.lnW_T = 160       && 目标图宽、高度
m.lnH_T = 240
m.lnXDpi_T = 72     && 目标图分辨率
m.lnYDpi_T = 72 Set Classlib To "_GDIPlus.Vcx" Additive oGraphics=CreateObject("gpGraphics")      && 创建工作图像 oImage=CreateObject("gpImage") 


阅读全文(1158) | 回复(0) | 编辑 | 精华 | 删除
 


[编程及数据库](转)设置在64位机器上的IIS(IIS6/IIS7)兼容32位程序(64位ODBC和32位ODBC的问题同样适用)
文章收藏,  网上资源,  事件记录,  软件技术,  电脑与网络

老瓷 发表于 2014-3-25 11:33:06

64位操作系统不支持Microsoft OLE DB Provider for Jet驱动程序,也不支持更早的Microsoft Access Driver (*.mdb)方式连接。所以用于 Access 和 Excel 数据库的 Microsoft OLE DB Provider for Jet 在 64 位版本中不可用,也就是说,如下两种连接字符串都已经无法正常工作了: “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=”&Server.mappath(db) “driver=Microsoft Access Driver (*.mdb);DBQ=”&Server.MapPath(db) 既然这样,就只能使用一个办法,将IIS的运行环境设置为32位: IIS6上的做法: 1.命令行键入: cscript.exe %SYSTEMDRIVE%\inetpub\adminscripts\adsutil.v

阅读全文(1353) | 回复(0) | 编辑 | 精华 | 删除
 


[VFP与SQL](转摘)VFP调用API来控制USB摄像头,实现拍照或录像
文章收藏,  网上资源,  软件技术,  电脑与网络

老瓷 发表于 2014-3-21 13:30:50

*--前提:VFP7.0以上;Windows 2K及以上
*--定义:一般放到主程序或表单(集)的Load事件中
Public WM_CAP_DRIVER_DISCONNECT
Public hwndc,WM_CAP_SAVEDIB,WM_CAP_FILE_SET_CAPTURE_FILEA,WM_CAP_SEQUENCE,WM_CAP_STOP
Declare Integer capCreateCaptureWindowA In "AVICAP32.DLL" String lpszWindowName ,Integer dwStyle ,;
    Integer x, Integer Y, Integer nWidth ,Integer nHeight,Integer ParentWin,Integer nId
Declare Integer SendMessage In "user32" Integer HWnd, Integer wmsg,Integer wpar1, Integer

阅读全文(1543) | 回复(1) | 编辑 | 精华 | 删除
 


[编程及数据库]VFP9.0的GDI+类的使用
文章收藏,  网上资源,  事件记录,  软件技术

老瓷 发表于 2013-2-2 23:54:09

GDI+你应该不会陌生吧,然而,在VFP里要使用这一技术,可不是一件容易的事,你得学习一大堆API函数。或许,一想到这,你已经望而却步了。不过,从现在起,这一技术不再是豪门旺族的专宠了,我们每一位Foxer都可以让它成为我们得心应手的好工具了。下面就跟我一起来领略它的风采吧。
在9.0的版本里,有个叫_GDIplus的类,它位于VFP的安装目录下:Home(1) + “FFC\_GDIplus.vcx”,是的,这是API函数的封装类,既然已经是封装的类了,那么,我们就不用关心底层的API了,所心,我们完全可以像用普通的VFP类一样,就这么方便:
这个类里有很多成员,但我们不必奢望太多,只须一部分,一部分就足够了。
VFP9的GDI+类库:_gdiplua.vcx
阅读全文(3062) | 回复(0) | 编辑 | 精华 | 删除
 


[电脑应用杂烩]快速启动栏中的显示桌面图标的恢复
文章收藏,  网上资源,  随笔,  心得体会,  事件记录,  软件技术,  电脑与网络,  生活百科,  数码玩家

老瓷 发表于 2013-1-15 1:34:48

在适当的文件夹(如C:\WINDOWS)新建一个文件名为“显示桌面.scf”的文件,其内容为:
[Shell]
Command=2
IconFile=explorer.exe,3 [Taskbar]
Command=ToggleDesktop 保存文件后将其拉入快速启动栏即可。   资源管理的恢复类似,其文件内容为:
[Shell]
Command=2
IconFile=explorer.exe,1 [Taskbar]
Command=Explorer

阅读全文(1997) | 回复(0) | 编辑 | 精华 | 删除
 


[休闲杂记]新年拜年拱手礼姿式
文章收藏,  随笔,  休闲娱乐,  生活百科,  情感绿洲,  人文艺术

老瓷 发表于 2013-1-9 14:43:46

    拱手礼就是两手相合,一般左手在上右手在下姿式。上下摆动,向对方以示敬意。中国是一个礼仪之邦,在人际关系中,无论相见、分别、感谢、谦让、致歉等等的场面都少不了一些礼节形式,否则就会失礼,没有礼貌。     从古至今,中国几千年来,从来没有失去过一些传统的礼仪。就在当代,我们仍然在各种应酬、集会、社交活动之中,保留着这些礼仪形式。而这些礼仪,主要就是拱手礼、握手礼和鞠躬礼。

阅读全文(2138) | 回复(0) | 编辑 | 精华 | 删除
 


[编程及数据库]MSSql访问远程数据库
文章收藏,  网上资源,  软件技术,  电脑与网络

老瓷 发表于 2012-12-29 15:05:15

--第一部分(要点)
--永久访问方式(需对访问远程数据库进行经常性操作)时设置链接数据库
Exec sp_addlinkedserver 'MyLinkServer','','SQLOLEDB','远程服务器名或ip地址'
--或:
Exec sp_addlinkedserver '远程服务器',N'SQL Server'
Exec sp_addlinkedsrvlogin 'MyLinkServer','false',null,'用户名','密码' --返回本地服务器中定义的链接服务器列表
Exec sp_linkedservers
--返回表的字段中,其中对MSSQL而言:SRV_NAME(链接服务器的名称),SRV_DATASOURCE(与指定链接服务器对应的服务器名) --访问表时以四部分名称形式
--查询示例
Select * From MyLinkServer.数据库名.dbo.表名 --导入示例
Select * Into 表 From MyLinkServ

阅读全文(2203) | 回复(0) | 编辑 | 精华 | 删除
 


[VFP与SQL]VFP检测SQL Server的五个实例代码
文章收藏,  网上资源,  心得体会,  事件记录,  软件技术

老瓷 发表于 2011-12-19 15:31:49

** 需要指出的是,无论下面哪种方式的代码,都需要打开本机的网络共享,否则找不到SQL服务器
** 例一 ***************************************************
* Use MyFll.Fll
Set Library To MyFll
lcLocalName = Left(Sys(0),At("#",Sys(0))-2)
lcLocalIP = DomainToIP(lcLocalName)
? '本机名:'+ lcLocalName
? '本机的 IP 为:'+ lcLocalIP
IF lcLocalIP == '127.0.0.1'
   ? '本机现在处于单机状态,未联接网络,或网络适配器停用!'
ENDIF cStr=GetSqlServer()
nCount=ALines(aServer,cStr,",")   &&切分生成数组
?
? "可连接的 SQL Server

阅读全文(2884) | 回复(0) | 编辑 | 精华 | 删除
 


[VFP与SQL]VFP中OCX控件注册检测及自动注册
原创空间,  文章收藏,  网上资源,  日后处理,  电脑与网络

老瓷 发表于 2011-12-7 22:22:15

这是原来从网上搜集、整理后编制用于自己的小程序使用的OCX是否注册及未注册控件的自动注册函数。 CheckCtrlFileRegist("ctToolBar.ctToolBarCtrl.4")  && 检测与注册DBI工具条控件(ctToolBar) ****************************** 控件注册函数
Function CheckCtrlFileRegist
Parameters lcCheck && 调用形如:CheckCtrlFileRegist("ctGrid.ctGridCtrl.3")
&& 其中,经常用到的控件如下:
&& MS日期控件 MSComCt2.OCX 版本2-("MSComCtl2.DTPicker.2")(MS Date and Time Picker Control 6.0 (SP4))
&& 视频头控件 AVCap.OCX 版本1-("AVCap.AVCapture.1")<

阅读全文(4484) | 回复(0) | 编辑 | 精华 | 删除
 


« 1 2 3 4 5 »



站点首页 | 联系我们 | 博客注册 | 博客登陆

Sponsored By W3CHINA
W3CHINA Blog 0.8 Processed in 0.203 second(s), page refreshed 143743478 times.
《全国人大常委会关于维护互联网安全的决定》  《计算机信息网络国际联网安全保护管理办法》
苏ICP备05006046号