用VF识别硬盘的物理序列号(转载)

作者:Tiger5392 转载:https://bbs.bccn.net/thread-210804-1-1.html oWMI=CREATEOBJECT("WbemScripting.SWbemLocator") oLocal=oWMI.ConnectServer(".", "root\cimv2") oHardware=oLocal.ExecQuery("SELECT * FROM Win32_PhysicalMedia") FOR EACH object1 IN oHardware lcHDID=object1.Properties_('Serial...
bccn201203 发布于 2021-05-13 16:23 | 阅读 25 次 | 评论 0 条

邮箱合法验证功能代码

<?php $email = 'test@126.c.om'; function testEmail($email) { //格式验证 if (!filter_var($email, FILTER_VALIDATE_EMAIL)) { return '邮箱格式有误!'; } //dns验证 $mail = explode('@', $email); $email = $mail[1]; if (!checkdnsrr($email,'ANY')) { return '无效邮箱!请核对邮箱地址'...
yunmoon 发布于 2021-05-13 08:17 | 阅读 24 次 | 评论 0 条

如何判断电脑上是否安装了 Excel(转载)

来源:https://bbs.csdn.net/topics/340141130 作者:十豆三 * VFP8.0 Or VFP9.0 m.llExit=.T. Try m.Excel=Createobject("Excel.Application") m.Excel=Null Catch m.llExit=.F. Endtry If m.llExit=.F. Messagebox("没有安装 Excel!",48,"信息提示") Return Endif
bccn201203 发布于 2021-05-04 14:50 | 阅读 88 次 | 评论 0 条

ssl_trusted_certificate从firefox下载证书

在查看证书的页面点“R3”标签,然后向下拉点击如图的链接,即可下载证书 此证书文件就可以作为nginx中ssl_trusted_certificate的证书
静夜思 发布于 2021-05-02 02:42 | 阅读 80 次 | 评论 0 条

PHP验签JWT RS256

踩坑 PHP验签JWT RS256 使用openssl_verify验签时总是报错 error:04091077:rsa routines:int_rsa_verify:wrong sart line 或者 error:04091077:rsa routines:int_rsa_verify:wrong signature length 对比一圈类库,发现需要满足如下几个条件: 1. 公钥必须按64位换行 $pubkey = file_get_contents("./pubk...
fulltimelink 发布于 2021-04-30 14:52 | 阅读 60 次 | 评论 0 条

低代码平台如何能带来生态化创新?

当前,新一轮科技革命和产业变革正在重构全球创新版图、重塑全球经济结构,中国的产业企业正走向数字化、智能化的新时代,而商业创新是新时代中企业的关键竞争力所在。随着企业数智化进程的不断加速,单一企业、单一产品逐渐难以满足客户更高层次的需求,生态创新已经成为当今企业商业创新的重要模式。 生态创新是指由大量多类型的服务提供商汇聚于平台,共同服务企业客户的商业创新。用友网络董事长兼CEO王文京,在2021用友生态大会发表演讲,指出数智商业时代,所有企业都是生态化的企业,平台化、生态化是新的生产和社会运行方式。 ...
卡Q因 发布于 2021-04-22 21:20 | 阅读 178 次 | 评论 0 条

libsass的Windows安装包

来自非官方发行包: http://libsass.ocbnet.ch/installer/
静夜思 发布于 2021-04-22 20:42 | 阅读 155 次 | 评论 0 条

URL编码(转载)

来源:https://bbs.csdn.net/topics/390991766 作者:回马枪 Clear ? UrlEncode(' test,这是一个测试', .F.) &amp;&amp; .F. --> "+", .F. --> "%20" Function UrlEncode(tcString, tlNoPlus) Local lcReturn, lcChar, lnCounter m.lcReturn="" For m.lnCounter = 1 To Len(m.tcString) m.lcChar ...
bccn201203 发布于 2021-04-20 20:00 | 阅读 92 次 | 评论 0 条

VFP中DBF表批量导出到EXCEL(转载)

来源:https://bbs.csdn.net/topics/391962702 作者:都市夜猫 Local cCurDir, cNewDir, cDbf, cXls, ii Local array aDbfs[1] m.cCurDir = Sys(5) + Curdir() m.cNewDir = GetDir('', '选择要被转换的 Excel 文件所在的文件夹。', '选择文件夹', 1+64) If Empty(m.cNewDir) *-- Else Clear ChDir (m.cNewDir) ...
bccn201203 发布于 2021-04-20 11:47 | 阅读 107 次 | 评论 0 条

将EXCEL工作表中日期型数据转换为文本后变成数值型的数据转换为VFP中可识别的日期

在EXCEL中,将日期型数据:2021-04-20 转换为文本数据后,其值变为 44306,如何在VFP中将44306 转换为日期型数据:2021-04-20 解决方案: ? DATE(1899, 12, 30) + 44306 转换结果:2021-04-20 下面代码由都市夜猫提供:https://bbs.csdn.net/topics/392189538 nn = 14993.48827 IF nn < 60 日期 = {^1900-1-1} + INT(nn) - 1 ELSE 日期 ...
bccn201203 发布于 2021-04-20 09:30 | 阅读 112 次 | 评论 0 条

python 学习第一周

第一天学习python的基础 记意义记不住 放弃死记硬背 粗略了解 两种循环 第二天学习python爬虫编写一边听一边翻书 了解requests 与bs4 beautifulsoup库使用 第三天实际联系爬取小说网站排行榜 第四天重复第三天 。。。。。。。 初见成效 只能爬取还未能保存到指定文件 下周目标可以将爬取小说的名字保存到指定文件里 和学习scrapy的使用
python0001 发布于 2021-04-20 03:07 | 阅读 146 次 | 评论 0 条

C Primer Plus 第6版 编程练习答案(第八章)

8.1.c #include <stdio.h> int main(void) { int ch; int ct = 0; while ((ch = getchar()) != EOF) ++ct; printf("%d characters read\n", ct); return 0; } 8.2.c #include <stdio.h> int main(void) { int ch, ct; ct = 0; while((ch = getchar()) != EOF) { if(c...
夏天q 发布于 2021-04-17 23:00 | 阅读 141 次 | 评论 0 条

获取指定数据库中所有表的名称

OPEN DATABASE "DATA1.DBC" LNTABLES=ADBOBJECTS(ATABLE,"TABLE") FOR LNI=1 TO LNTABLES ?ATABLE(LNI) ENDFOR
bccn201203 发布于 2021-04-14 12:20 | 阅读 122 次 | 评论 0 条

字符串转换为日期时间型数据

a='20210414173928' b= TRANSFORM(INT(VAL(a)),"@ 9999,99,99,99,99,99") ?DATETIME(&amp;b)
bccn201203 发布于 2021-04-14 11:57 | 阅读 117 次 | 评论 0 条

分别提取“-”两边的数字,并分别求和

CLEAR TEXT TO lcText NOSHOW TEXTMERGE 62B19B11-B12A9B 62B19B11-A2B 62B19B10-B11J 62B19B10-0B 62B19B4-B10J 62B19B4-A2B 62B19-B25J 62B19-B4J 62B17-B19J 62B17-B2B 62B16A16B3A3-A4B18B 62B16A16B3A3-A7B 62B16A16B3-B4B14J 62B16A16B3-A3J 62B16A16-A17B 62B16A16-B3J 88B5-A3A4J ENDTEXT ...
bccn201203 发布于 2021-04-14 10:02 | 阅读 121 次 | 评论 0 条

统计首字母的个数

TEXT TO lcStr NOSHOW TEXTMERGE Cryopreservation is the most efficient method for long-term preservation of mammalian sperm. However, freeze-thawing procedures may strongly impair the sperm function and survival and thus decrease the reproductive performance. ENDTEXT ALINES(laStr, lcStr, 4 + ...
bccn201203 发布于 2021-04-14 10:00 | 阅读 116 次 | 评论 0 条

(汇总)C Primer Plus 第6版 编程练习答案

(汇总)C Primer Plus 第6版 编程练习答案 C Primer Plus 第6版 电子书下载链接:https://down.bccn.net/10742.html C Primer Plus 第6版 编程练习答案(第一章):https://blog.bccn.net/%E5%A4%8F%E5%A4%A9q/67573 C Primer Plus 第6版 编程练习答案(第二章):https://blog.bccn.net/%...
夏天q 发布于 2021-04-13 20:35 | 阅读 148 次 | 评论 0 条

判断 EXCEL 程序是否启动

LOCAL lOldSetOpt,mChanNum lOldSetOpt = DDESetOption("SAFETY") = DDESetOption("SAFETY",.F.) mChanNum = DDEInitiate('Excel', 'SYSTEM') &amp;&amp;EXCEL是否已经打开 IF mChanNum # -1 = MESSAGEBOX('程序 EXCEL 已经打开,请先将其关闭!', 64, '系统提示!') = DDETerminate(mChanNum) = DDESetOption("SAFETY",lOldSe...
bccn201203 发布于 2021-04-11 21:04 | 阅读 145 次 | 评论 0 条

C Primer Plus 第6版 编程练习答案(第七章)

7.1.c #include <stdio.h> int main(void) { char ch; int sp_ct = 0; int nl_ct = 0; int other = 0; while ((ch = getchar()) != '#') { if (ch == ' ') sp_ct++; else if (ch == '\n') nl_ct++; else other++; } printf("spaces: %d, newlines: %d, others: %d\n", sp_ct,...
夏天q 发布于 2021-04-11 17:07 | 阅读 199 次 | 评论 0 条

C Primer Plus 第6版 编程练习答案(第六章)

6.1.c #include <stdio.h> int main(void) { char letter[26]; int i; for(i = 0; i < 26; i++) { letter[i] = 'a' + i; printf("%c ", letter[i]); } return 0; } 6.2.c #include <stdio.h> int main(void) { int rows, chars; for(rows = 0; rows < 5; rows++) ...
夏天q 发布于 2021-04-11 12:41 | 阅读 143 次 | 评论 0 条