hylang-CSDN博客

原创一个比较规范的VFP主程序，适合初学者参考。

* 程序名：main.prg * 作用：整个系统的入口 * 路径：/你的程序目录/prgs Set Talk off Set Escap off * 开始，程序错误处理 ON ERROR DO Err.PRG With Error(), Message(), Message(1), Program(), Lineno(1) * 第一步，清理环境 Close All && 关闭所有工作

2008-02-25 14:45:00 6707 1

原创 VFP9编写DLL动态库

VF编写DLL动态库我想一般软件都会有一大堆的自定义函数或过程，我一般都会把它封装成DLL文件，这样感觉比较专业一点吧！如何在VFP中设计DLL文件呢？新建一个mydll.prg文件，写入下列代码： *此功能为将4．30（4点30分钟）转为分为单位的函数和过程 DEFINE CLASS mydll as Custom OLEPUBLIC PROCEDURE htom LPAR

2008-02-25 14:44:00 3247

原创下载和上载远程视图数据

从一个远程 ODBC 数据源检索数据时，Visual FoxPro 把每个 ODBC 字段的数据类型转换成结果集合临时表中等价的 Visual FoxPro 数据类型。下表列出 ODBC数据源上提供的数据类型，以及对应的 Visual FoxPro 的数据类型。远程字段的 ODBC 数据类型 Visual FoxPro 临时表中字段数据类型 SQL_CHAR SQL_VARCHAR SQ

2008-02-25 14:41:00 655

原创 FoxPro中Windows API的调用

动态连接函数库（DLLs）可以说是Windows系统的基础，Windows系统或Windows的应用系统在执行过程中，常常通过外部的动态连接函数库支持其所需功能，如控制屏幕、打印机、鼠标、键盘等设备，若在设计过程中，将完成这些功能的程序都重复写在系统中，就会使程序过大。另外一点，就是这些工作函数库具有共享功能，也就是说可以利用Windows程序开发工具，直接使用这些属于Windows函

2008-02-25 14:40:00 829

---目前在我国，有相当一部分正在运行应用程序是用Foxpro 编写的，由于突然断电、程序非法关闭等原因，经常会导致Foxpro数据库.DBF文件被破坏，如果数据库被破坏了，用Foxpro打开数据库.DBF时，会出现"notatable/dbf"错误提示，导致无法用Foxpro打开。 ----首先介绍一下Foxpro数据库.DBF的文件结构: ----Foxpro数据库*.DBF的文件结构由头记录

2008-02-25 14:39:00 805

原创 VFP中实现超链接

超级链接功能可以使程序具备直接访问Internet的能力，不少优秀的软件都提供直接访问Internet的功能。如金山词霸2000在它的系统桌面上提供互联网资源；Microsoft的应用程序在其帮助菜单中提供Microsoft on the Web，这都是在系统内部直接访问Internet的典型例子。　　为了在应用程序中实现直接访问Internet功能，只要能在程序中控制启动Internet浏览器

2008-02-25 14:38:00 1858

原创 VFP中导出数据的几种方法

当VFP处理好数据后，这时你可以用多种方法将这些数据导出，以便被其它应用程序(如Excel等)所用。下面向你简单介绍几种导出数据的方法：　　1.用“导出数据”对话框。你可以从VFP主菜单中选择“文件/导出…”打开“导出”对话框，在该对话框中的“来源”框中输入表名(c:/vfp/students.dbf)，在“类型”中指定要导出数据的类型(Microsoft Excel)，在“到”框中输入导出的路

2008-02-25 14:37:00 6485

原创为FoxPro中的弹出式菜单增加自学习功能

开发过应用系统的人都知道,使用FoxPro for Win-dows在用屏幕生成器进行数据窗口设计的过程中,经常要使用弹出式菜单(POPUP)来设计进行数据输入的数据入口。弹出式菜单平常在屏幕上只会显示一个选项的内容,当您用鼠标选择它或按下空白键、ENTER键时,它就在屏幕上出现一个窗口和一些供用户选择的选项。使用弹出式菜单有两个方面的优点:一个优点是用户可以不在该数据入口中输入数据,而只

2008-02-25 14:35:00 920

原创用拼音输入法字典库实现同音字模糊查询

在开发各类应用管理系统中，一般都要实现各种查询功能，如何准确、快速查找到符合条件的记录，是实现各种查询功能的重点。系统的实际开发过程中，查询功能一般都是通过对字符进行比较、判断等方法来实现。我们开发一个人事管理系统中过程中，系统要具有新的查询方式，即只要知道一个人姓名的读音，并不知道每个字的具体写法，通过检索数据库，就能把所有符合这个读音的记录内容全部显示出来。由于汉字存在着大量的同音字，采用常用

2008-02-25 14:34:00 4194

原创 VFP程序常见问题集

：如何让程序自动设定路径？答：一般运行程序的目录并非固定不变，因此一般在程序启动时都要查询当前运行程序的目录。下面这段程序给出当前路径的查询方法： Function SetPath() LOCAL lcSys16, lcProgram lcSys16 = SYS(16) &&查询当前运行程序名 lcProgram = SUBSTR(lcSys16, AT(

2008-02-25 14:32:00 3496

原创微软公司软件开发模式简介

北京大学出版社96年底所出的《微软的秘密》一书是目前我所见到的对微软公司软件产品开发过程介绍的最专业、最深入的一本书。通过本书，我们可以看到微软公司是如何对科学地对软件产品开发进行有效地管理，我想这些经验对于中国的广大软件开发人员，尤其是关心中国软件产业发展的各位朋友是大有益处的。所以特将此书中涉及软件产品开发的部分内容摘录出来（第四章“产品定义与开发过程”），加上我在微软中国工作的实际经验总结出

2008-02-25 14:32:00 1040

原创需求分析的20例法则

（转）客户与开发人员交流需要好的方法。下面建议20条法则，客户和开发人员可以通过评审以下内容并达成共识。如果遇到分歧，将通过协商达成对各自义务的相互理解，以便减少以后的磨擦（如一方要求而另一方不愿意或不能够满足要求）。 1、分析人员要使用符合客户语言习惯的表达　　需求讨论集中于业务需求和任务，因此要使用术语。客户应将有关术语（例如：采价、印花商品等采购术语）教给分析人员，而客户不

2008-02-25 14:31:00 575

原创 VFP&Dll注册外部 Windows 32 位动态链接库 ( .DLL ) 中的一个函数。

注册外部 Windows 32 位动态链接库 ( .DLL ) 中的一个函数。DECLARE [cFunctionType] FunctionName IN LibraryName [AS AliasName] [cParamType1 [@] ParamName1, cParamType2 [@] ParamName2, ...]参数cFunctionType 表明 32 位 Window

2008-02-25 14:29:00 1696

原创在VFP中定制自己的工具栏

在用Visual Foxpro(简称VFP)进行应用程序开发时，你一定被它那功能强大、漂亮简捷的工具栏所吸引，陶醉着有一天在应用程序中也加入自己的工具栏。其实这对VFP来说并非难事，请君往下看： 1 定义工具栏类要创建自定义工具栏，必须首先为它定义一个类。VFP提供了一个工具栏基类，在此基础上，你可以创建自己的工具栏类。创建工具栏类有以下几种方法： *在“文件

2008-02-25 14:28:00 2503

原创 FoxPro在网络环境下开发数据库管理软件的一些经验

1、多用户环境下文件的共享和独占的实现（1）、当你要访问的文件或记录不想再让其他用户访问时(一般是对数据库的更新操作)，可在真正访问前地对其进行“加锁”，访问结束后再立即“解锁”；或者以独占方式打开该数据库文件进行访问。笔者在此以数据追加入库为例,简述采用按钮形式实现“加锁”-“解锁”的方法。此方法的优点在于：当加锁失败后，程序可自动返回数据编辑屏幕（不需要编程干预），这样用户可根据需要，再适时地

2008-02-25 11:54:00 995

原创读取一个任意的 INI 文件到游标中(RMH)

* select an existing INI fileLOCAL lcFileNamelcFileName = getWindowsDir() + "/winsight.ini"CREATE CURSOR csResult (section C(50), keyname C(50),; keyvalue C(200))lcSections = getSections (lcFileNa

2008-02-25 11:51:00 562

原创读取 Win.ini 文件是的指定节中的键 (RMH)

lcSection = "Mail" && section namelcKeys = getKeysString (lcSection)CREATE CURSOR csWinIni (keyname C(30), keyvalue C(200))lcKey = ""FOR ii=1 TO Len(lcKeys) ch = SUBSTR (lcKeys, ii,1) IF ch =

2008-02-25 11:51:00 545

原创创建 INI 文件并添加串到其中 (RMH)

DO declLOCAL lcFilenamelcFilename = "c:/Temp/test.ini"= createFile (lcFilename)*** Technique 1* adding empty sections= WritePrivateProfileSection ("General", "", lcFilename)= WritePrivateProfileSectio

2008-02-25 11:50:00 681

原创判断控件是否注册

*!* 把这些文件放在程序目录下，在主程序里加入以下代码,*!* 就会在第一次启动程序时注册： If Directory("ocx")Set Default To ("./ocx")If !File("regsvr32.txt") nfiles=Ad

2008-02-25 11:49:00 1475

原创谈谈VFP和SQL SERVER搭配做C/S系统方案

谈谈VFP和SQL SERVER搭配做C/S系统方案（转载）1.CLIENT/SERVER 到底是什么? C/S属于2-TIER系统，适合于中小型应用系统。大系统一般都用3-TIER了。打个比方单机数据库系统(比如VFP), 相当于前店后库.店里需要什么东西,得自己去库房找,库房管理也是有你自己进行. 而C/S系统下,店和库是相对独立的,有一个专门的库房管理(数据SERVER),店里

2008-02-25 11:48:00 1705

原创 SPT指令介绍

一指令介绍 1.SQLCONNECT([DataSourceName,cUserID,cPassword|cConnectionName]) 异步建立与数据源的连接。 2.SQLSTRINGCONNECT([cConnectString]) 异步通过连接字符串建立与数据源的连接。3.SQLDISCONNECT(nConnectHandle) 异步断开数据源连接。 4.SQL

2008-02-25 11:47:00 3314

原创远程连接局域网内的sql server (转)

下面我们依次介绍如何来解决这三个最常见的连接错误。　　第一个错误"SQL Server 不存在或访问被拒绝"通常是最复杂的，错误发生的原因比较多，需要检查的方面也比较多。一般说来，有以下几种可能性：　　1、SQL Server名称或IP地址拼写有误；　　2、服务器端网络配置有误；　　3、客户端网络配置有误。　　要解决这个问题，我们一般要遵循以下的步骤来一步步找出导致错误的原因。　　首

2008-02-25 11:46:00 720

原创使用SPT建立SQL数据库

***************************************** 使用SPT建立SQL数据库 ** 1.0 2003.06.07 **　　雅狐论坛 www.yafox.com ****************************

2008-02-25 11:45:00 618

原创 Sql Server 常用日期格式

SQL Server中文版的默认的日期字段datetime格式是yyyy-mm-dd Thh:mm:ss.mmm 例如: select getdate() 2004-09-12 11:06:08.177 整理了一下SQL Server里面可能经常会用到的日期格式转换方法: 举例如下: select CONVERT(varchar, getdate(), 120 ) 2004-09-12 11:

2008-02-25 11:44:00 529

原创红雨的容错代码(转)

Local lcOldError, lcLogPathlcLogPath = [C:/Temp/]lcOldError = On([Error])On Error Do ErrHand With Error(), LineNo(), Message(), Message(1), Program(), lcLogPath, .T.Select 错误日志测试On Error &lcOldError.R

2008-02-25 11:43:00 842

原创数据导入:VFP(visual foxpro)表文件导入SQL

关键字:.dbf，SQL2000，visual foxpro 6.0，数据导出，数据导入近日，遇到一visual foxpro 6.0数据库中.dbf格式数据导入到SQL200问题。此数据库是一学生成绩管理数据库，在网上查了若干种方法，导入时总是会出现这样或那样的问题。当然了，我没有试使用ODBC数据源的方法，总感觉使用ODBC数据源有难度，我是初学者，没有处理过那么复

2008-02-25 11:42:00 5033

原创用vfp与sql server构建Client/Server应用程序(远程视图)(1)

本文是《用 Visual FoxPro 与 SQL Server 构建 Client/Server 应用程序》系列的一部分，照例“远程视图”应不是开篇章节，但我们发现:在我们为网站准备的文章中有太多的理论性的东西，为了缓解这一矛盾，我们决定把“远程视图”提上来先写。当下最流行的 ADO 脱胎于 Visual FoxPro，在实际使用中两者各有特色，所以不要小看 Visual FoxPro 在远

2008-02-25 11:41:00 1322

原创用vfp与sql server构建Client/Server应用程序(远程视图)(2)

通过工具建立连接以上我们都是通过命令的方式建立连接，现在我们将使用Visual FoxPro提供的连接设计器建立连接。上文我们讲到：连接对象分为两类：“基于 DSN 的连接对象”和“基于字符串的连接对象”。图5：在连接设计器中选择“数据源、用户标识、密码”就说明在建立“基于 DSN 的连接对象”，在“数据源”列表框中可选择当前可用的用户型、系统型 DSN。

2008-02-25 11:41:00 1178

原创 vfp spt sql/access　连接串

在程序段中使用spt1、建立连接：myconnect=sqlstringconnect("driver=sql server;server=local;uid=sa;pwd=;database=pubs")2、调用存储过程：iret=SQLEXEC(myconnect,exec myproc ?para,cursor)（注意myproc ?para之间有一空格.　多参数间也需要空

2008-02-25 11:39:00 2321 1

原创 CursorAdapter 起步（2）

【译者注】附带的示例文件是一个PRG，实在太简单了，我就直接把内容贴在这里了。 local lcConnString, ; loCursor as CursorAdapter, ; laErrors[1] lcConnString = driver=SQL Server;serv

2008-02-25 11:38:00 666

转载在vfp中备份、恢复 SQL数据库

*数据备份 LOCAL BFBF = OSERVER = CREATEOBJECT(sqldmo.sqlserver)OSERVER.CONNECT(XINGXIAO02,sa,)OBACKUP = CREATEOBJECT(sqldmo.backup)OBACKUP.DATABASE = kcjhOBACKUP.FILES = c:/temp/kcjh_back.d

2008-02-25 11:38:00 1183

原创 CursorAdapter 起步（1）

CursorAdapter 类是 VFP 8 中最重要的新功能之一，因为它提供了一种简单易用、接口统一的访问远程数据源方式。在这个月的文章里，Dung Hennig 将向你展示 CursorAdapter 及它的工作方式。下个月，我们将再学习一些高级的用法。

2008-02-25 11:37:00 402

原创 vfp如何使用spt

spt的全称为sql pass through，它是和远程视图构成了vfp处理远程数据的利器。和远程视图比较，它的主要好处在于灵活，可以直接连接远程数据库，并在服务器上执行代码代码，当然它也可以和远程视图一样，通过一个光标cursor来更新远程数据，缺点主要是非图形化，代码量大。实际上远程视图是SPT的一个子集。步骤： 1、建立连接，或者连接句柄如连接服务器为aa,用户名为bb，密码为cc，

2008-02-25 11:34:00 1135 1

原创 VFP+SQL编程方法讨论与经验分享

VFP是一个简单实用的编程工具,但数据库一般用其本身的DBF数据库,对于SQL可能每个人都用不同的看法,各位高手有什么好的方法、经验、建议全都拿出来，供大家分享，谢谢！以下是我平时对SQL的使用点滴，欢迎各位指点！ ************************************************************** *-- vf

2008-02-25 10:51:00 3671 1

原创 VFP操作SQL数据库

现在用SPT方式比较灵活吧，不过我也才刚刚接触，看过些示例自己没真正去实践过一整套的完整操作。下面的一些说明和示例对初学SPT应该有点用的：SPT 起跳熟悉 Fox 的朋友都知道，在 VFP 里我们可以使用远程视图 (Remote View) 和 SPT(SQL Pass Through) 技术控制远程异构数据库。这些技术其实是 VFP 对 ODBC 的 API 的封装，所以对于用户来说访

2008-02-25 10:13:00 3585 1

原创在VFP里操作和管理SQL SERVER(介绍SQL-DMO)

在论坛混了这么多年，看到的一个很明显的趋势是，用VFP和SQL SERVER来做系统的网友越来越多。怎么从VFP里来操作或者管理SQL SERVER也成为很多人关心的问题。对SQL SERVER的数据操作，可以用视图，SPT或者ADO来做，但对服务器本身的管理，似乎只有用SPT来发送一些命令了。其实，微软为客户端操作SQL SERVER开发了一套完整的工具，这就是SQL - DMO (D

2008-02-25 10:04:00 1433

转载在 VFP 中控件 Excel 的小小经验集

获取工作表名称在以下示例中，创建了一个 microsoft excel 实例，添加了一个新的工作簿。使用 foreach 语句显示工作簿中每个工作表的名称。此示例要求在运行示例的机器上正确安装 microsoft excel。oExcel = CREATE("Excel.Application")oExcel.Workbooks.ADDFOR EACH oMyVar IN oExcel.s

2006-04-14 18:30:00 3073