博文
Server Application Error解决方法(2006-11-07 16:45:00)
摘要：今天因为IIS有点问题，所以把IIS卸载之后重装了，结果重装之后，再访问asp文件，就出现下面的错误。
------------------------------------
Server Application Error
The server has encountered an error while loading an application during the processing of your request. Please refer to the event log for more detail information. Please contact the server administrator for assistance.
------------------------------------
花了很长时间，找了很多资料，终于解决了。
解决方法：
1。更改iwam_myserver账号的密码
右键我的电脑--管理--本地用户和组，点击用户，给IUSR_机器名和IWAM_机器名两个用户设置密码，我都给他们设置成一样的了。设置方法都是右击，修改密码，然后输入两次密码就可以了。
2。同步iis metabase中iwam_myserver账号的密码
开始--运行--cmd，
然后cd C:\Inetpub\AdminScripts
然后cscript.exe adsutil.vbs set w3svc/wamuserpass “你的密码”，这个是上一步IWAM_机器名设定的密码。
然后cscript.exe adsutil.vbs set w3svc/anonymoususerpass “你的密码”，这个是上一步IUSR_机器名设定的密码。
这里我都设置成一样的密码了。
设置到这里，看一下，还是不行。接着往下做
3。同步IWAM账号和脚本synciwam.vbs的密码
cscript.exe synciwam.vbs -v，
然后重启IIS
一般的问题到这里都解决了，但是我改完之后，一看，还是不行，郁闷死了。继续。
4.同步com+应用程序所用的iwam_myserver的密码
同步com+应用程序......
VFP9.0中怎样修改菜单中默认打开的路径(2006-11-04 16:46:00)
摘要：先打开VFP9.0，然后"File"---"Open"，会出现一个Open对话框，然后默认选择了一个路径，一般默认情况下的路径是C:\Documents and Settings\Administrator\My Documents\Visual FoxPro Projects，那么有时候我们并不希望打开的是这个路径，那怎样修改呢？下面说方法：
在VFP 9.0中，"Tools"---"Options..."，会出现Options对话框，选择“File Locations”标签页，在下面的列表中找到“Default Directory”，双击或者点击“Modify...”按钮，出现“Change File Location”对话框，在该对话框中，选中“Use default directory”复选框，这样就可以点击上面的“...”按钮，选择你想设置的默认打开路径了。路径设置好了之后，点击“Set As Default”，就可以了。
这种情况在用户安装了两种版本的VFP的时候特别实用，比如我这里同时安装了9.0和8.0两个版本，那么在打开9.0并且不编译项目而是直接运行项目的时候，如果使用原来的默认路径，就会出现一些 比如 某某文件找不到 等类似的提示，而不能直接运行项目，使用上面的方法改了默认打开路径之后，就不会有这样的提示了，项目直接运行就没有问题了。......
VFP怎样分割字符串(2006-11-01 12:07:00)
摘要：在VFP中如果要分割字符串，就要用到ALINES函数，下面先将该函数的具体用法帖一下，然后举例说明其用法和注意事项。
ALINES( ) 函数
将一个字符表达式的或备注字段中的每一行复制到一个数组相应行。
ALINES(ArrayName, cExpression [, lTrim] [cParseChar, ,?,cParseChar])
返回值
数值型
参数
ArrayName
指定数组的名称,将字符表达式或备注字段中的每一行复制到该一个数组中。如果所指定的数组不存在,Visual FoxPro 会自动创建该数组。如果该数组存在, 但是大小不足以容纳备注字段中的每一行,则 Visual FoxPro 自动增加该数组的大小。如果该数组比所需的要大,则 Visual FoxPro 会截短该数组。
cExpression
指定字符表达式或备注字段,其中包含要复制到数组中的行。如果cExpression 是空字符串或 null 值,会创建一个具有单行的数组,并且该行包含空字符串。
lTrim
指定是否从复制到数组的行中删除前导和后缀空格。如果 lTrim 为“真”(.T.),则从行中删除前导和后缀空格。如果 lTrim 为“假” (.F.) 或省略,则不删除前导和后缀空格。
cParseChar
指定一个或多个由 ALINES() 返回的 cExpression 中的分隔元素的字符。cParseChars 的最大值是 23。各 cParseChars 串的最大长度是 11 字符。
备注
ALINES()返回数组的行数(或者,同样地返回字符表达式或备注字段的行数) 。字符表达式或备注字段的第一行复制到数组的第一行,字符表达式或备注字段的第二行复制到数组的第二行, 依次类推。
所有字符表达式是大小写敏感的。
一个换行符 (CHR(10)) 或回车符 (CHR(13)) 表明了一行的结束。也可以使用这些字符的组合 (CHR(10) + CHR(13)或CHR(13) + CHR(10)) 表明一行的结束。
ALINES()提供了分析字符表达式或备注字段中各行的简单方法。虽然 MLINES() 也用来分析字符表达式或备注字段,但是 ALINES()更快......
VFP函数系列教程－－－FWRITE( ) 函数(2006-05-16 10:00:00)
摘要：FWRITE( ) 函数
向低级文件函数打开的文件或通信端口写入字符串。FWRITE(nFileHandle, cExpression [, nCharactersWritten])
返回值
数值型
参数
nFileHandle
文件句柄号，或要写入字符串的通信端口。
cExpression
指定 fwrite( ) 函数写入的字符表达式。
nCharactersWritten
除非包含 nCharacterWritten，否则 fwrite( ) 函数向文件或端口写入整个字符表达式。当包含 nCharacterWritten 时，向文件或端口写入 nCharacterWritten 个字符。如果 nCharacterWritten 小于 cExpression 中字符的数目，只向文件或端口写入 nCharacterWritten 个字符；如果 nCharacterWritten 等于或大于 cExpression 中字符的数目，将把 cExpression 中的所有字符都写入文件或端口。
备注
与 FPUTS( ) 函数不同，fwrite( ) 函数并不在字符串的尾部放置回车和换行符。
fwrite( ) 函数返回向文件或端口写入的字节数。如果由于某种原因，fwrite( ) 函数不能向该文件或端口写入数据，则函数的返回值为 0。
请参阅
FCHSIZE() | FCLOSE() | FCREATE() | FEOF() | FFLUSH() | FGETS() | FOPEN() | FPUTS() | FREAD() | FSEEK() | STRTOFILE()
......
VFP函数系列教程－－－FREAD( ) 函数(2006-05-16 09:56:00)
摘要：FREAD( ) 函数
从低级文件函数打开的文件或通信端口返回指定数目的字节。FREAD(nFileHandle, nBytes)
参数
nFileHandle
文件句柄号或要返回数据的通信端口。可以从成功的 FOPEN() 或 FCREATE() 语句的返回值获得 nFileHandle。
nBytes
fread( ) 函数返回的字节数。FREAD( ) 从文件指针的当前位置开始，返回 nBytes 个字节的数据，或是遇到文件尾为止。
返回值
字符串类型
示例
下面的示例用 fread( ) 函数显示文件内容。如果文件为“空”，则提示相应信息。在使用该示例前, 你必须创建一个名为 Test.txt 的示例文本文件。Local gnFileHandle,nSize,cString
gnFileHandle = FOPEN("test.txt")
* Seek 到文件尾部来确定文件中的字节数。
nSize = FSEEK(gnFileHandle, 0, 2) && 移动指针到 EOF
IF nSize <= 0
* 如果文件是空的, 显示错误信息。
WAIT WINDOW "文件是空的!" NOWAIT
ELSE
* 如果文件不空, 保存文件的内容到内存
* 并显示文本到 Visual FoxPro 主窗口中。
= FSEEK(gnFileHandle, 0, 0) && 移动指针到 BOF
cString = FREAD(gnFileHandle, nSize)
? cString
ENDIF
= FCLOSE(gnFileHandle) && 关闭文件
请参阅
FCHSIZE() | FCLOSE() | FCREATE() | FEOF() | FFLUSH() | FGETS() | FILETOSTR() | FOPEN() | FPUTS() | FSEEK() | FWRITE()......
VFP命令系列教程－－－ON SHUTDOWN 命令(2006-05-15 15:34:00)
摘要：最近看到好多网友问退出Visual FoxPro的问题，现将该命令的用法显示如下：
ON SHUTDOWN 命令
指定当试图退出 Visual FoxPro ，Microsoft Windows 时所要执行的命令。ON SHUTDOWN [Command]
参数
不带 Command 发出 ON SHUTDOWN 命令，将释放当前的 ON SHUTDOWN 命令。
备注
在 Visual FoxPro 中，当您试图退出 Visual FoxPro 时，将执行 ON SHUTDOWN 中指定的命令。如果在 Visual FoxPro 打开的情况下，试图从“程序管理器”退出 Microsoft Windows，控件权将返回给 Visual FoxPro 并执行 ON SHUTDOWN 中指定的命令。
ON SHUTDOWN 命令一般用 DO 命令执行某个例程。该例程显示一对话框，询问是否确定要退出当前应用程序和 Visual FoxPro。如果您要退出应用程序，该例程将关闭打开的文件并清理 Visual FoxPro 环境，然后执行 QUIT 命令。如果您不想退出当前的应用程序，例程将把控件权返回给应用程序。
请参阅
QUIT | exit 命令 | On Exit menu 命令......
获取某一路径下所有文件的文件名以及创建、修改时间(2006-05-11 09:43:00)
摘要：程序主体是从论坛里面的帖子得来，只是我自己稍加改进，得到如下程序，获取某一文件夹下面的文件总数、各个文件的创建时间、访问时间、改写时间。如果要获取某一种类型的文件，只需要判断文件名的扩展名是否是你想要的就可以了，有兴趣的朋友可以自己实现一下。
CLEAR
#Define BYTE_2 256
#Define OF_READ 0
#Define OF_SHARE_DENY_NONE 64
#Define HFILE_ERROR -1
#Define dwordPlus 4294967296
Declare Integer GetFileTime In kernel32 ;
Integer hFile, ;
string @lpCreationTime, ;
string @lpLastAccessTime, ;
string @lpLastWriteTime
Declare Integer FileTimeToLocalFileTime In kernel32 ;
string lpFileTime, ;
string @lpLocalFileTime
Declare INTEGER FileTimeToSystemTime IN kernel32 ;
STRING......
VFP中连接SQL数据库的一个小经验(2006-05-09 16:27:00)
摘要：今天写程序的时候，用到了使用字符串连接到SQL数据库，开始的时候，使用以下语句：
lcDSNLess1="DRIVER = {SQL Server};" ;
+ "SERVER="+servername+";" ;
+ "UID="+uid+";" ;
+ "PWD="+pwd+";" ;
+ "DATABASE="+databasename
在命令窗口执行 vconn1=SQLSTRINGCONNECT(m.lcDSNLess1)，总是弹出一个选择DNS的对话框，百思不得其解，后来改成以下：
lcDSNLess1="DRIVER={SQL Server};" ;
+ "SERVER="+servername+";" ;
+ "UID="+uid+";" ;
+ "PWD="+pwd+";" ;
+ "DATABASE="+databasename
再运行 vconn1=SQLSTRINGCONNECT(m.lcDSNLess1)，就OK了，也许和我一样粗心的朋友要问了，这两段代码有什么不同吗？不过相信细心的朋友或者有经验的朋友已经看出来了，就是 DRIVER={ ，其中的 = ，前后都没有空格的时候，才可以运行正确；
如果前面没有空格，但是后面有空格，执行 vconn1=SQLSTRINGCONNECT(m.lcDSNLess1)，返回值总是-1；
如果前面有空格，后面没有空格，也会弹出一个选择DNS的对话框，由此也知道了SQLSTRINGCONNECT函数在执行的时候，是以 = 为依据，取其前面和后面的值，来进行判断，连接以及返回值。
以上只是一个小经验，也许有的朋友早就知道了，现在写出来，只是为了让以前不知道的朋友不要和我犯同样的错误。其实以前也用过字符串连接字符串，只不过以前写的=前后都刚好没有空格，所以没有发现这个问题。......
VFP命令系列教程－－－BLANK 命令(2006-04-30 12:46:00)
摘要：BLANK 命令
如果发出该命令时不带任何参数，则清除当前记录中所有字段的数据。
BLANK [FIELDS FieldList] [Scope] [FOR lExpression1] [WHILE lExpression2]
[NOOPTIMIZE] [IN nWorkArea | cTableAlias]
参数
FIELDS FieldList
仅清除在 Fieldlist 中指定的字段。默认情况下，如果省略了 FIELDS 子句，则清除该记录的所有字段的数据。在非选定工作区中指定的任何字段名都必须以工作区别名开始。
注意 如果记录指针已指向当前工作区的文件末尾，那么 BLANK 命令不清除另一个相关工作区中记录的字段数据。要使 BLANK 命令能够作用在其他相关记录的字段上，记录指针必须指向当前工作区中一个已排序的记录。
Scope
指定要清除的记录范围，只有在范围之内的记录才被处理。Scope 子句包括：ALL、NEXT nRecords、RECORD nRecordNumber 及 REST。
有关 Scope 子句的详细内容，请参阅 scope(作用域)子句 命令, 包含 Scope 子句的命令仅对活动工作区中的表进行处理。
有关 Scope(作用域)子句的详细信息, 参见 语言概述. 命令, 包含 Scope 子句的命令仅对活动工作区中的表进行处理。
BLANK 默认的作用域范围为当前记录 (NEXT 1)。
FOR lExpression1
清除使条件 lExpression1 为“真”(.T.) 的记录中的字段数据。若 lExpression1 为可优化表达式，则 Rushmerc 优化 BLANK FOR。有关 Rushmcre 优化的详细内容，请参阅 用 Rushmore 查询优化数据访问速度。
WHILE lExpression2
指定要清除的记录字段数据应满足的条件，即令逻辑表达式 lExpression2 为“真”(.T.)。
NOOPTIMIZE
禁止 BLANK 进行 Rushmore 优化。有关的详细内容，请参阅 SET ......