WorldMobile-CSDN博客

原创 Oracle关于时间区间的合并

2021-09-10 11:24:47 382

转载 datawindow 如何根据鼠标位置取得行号和列号信息

datawindow 如何根据鼠标位置取得行号和列号信息datawindow 鼠标响应事件中，根据鼠标位置获取所在的行号和列号的未内置未公开方法：function boolean GetRowColUnderPoint)(ulong handle,long x, long y, ref long row, ref int col) library “pbdwe90.dll” alias for “dwGetRowColUnderPoint”具体其他版本，自己修改"pbdwe90.dll"为相应版本DL

2020-12-25 10:43:09 311

转载 C#之Action和Func的用法

以前我都是通过定义一个delegate来写委托的，但是最近看一些外国人写的源码都是用action和func方式来写，当时感觉对这很陌生所以看起源码也觉得陌生，所以我就花费时间来学习下这两种方式，然后发现确实代码简洁了不少。这两种方式我们也可以去实践的过程去慢慢运用。先说一下委托：模拟一下场景：小明最近学习情绪高涨，以前买的书已经满足不了欲望，打算去买本（一个程序员的自我修养）。可是呢以前总是跑...

2019-05-07 18:51:02 299

原创 PB 不规则窗体或按钮

源码下载地址：https://download.csdn.net/download/lzp_lrp/10736390在 CSDN 上，经常有朋友问到不规则窗口或者不规则的按钮如何制作，在这里我介绍几个比较常用的 API 函数，来实现不规则窗口或者不规则按钮的制作。一、先看一下效果：点击一下圆形花边按钮，效果如下：（蓝色的为桌面）CSDN 社区电子杂志—POWERBUILDER 杂...

2018-10-22 13:35:41 710

转载整理一些提高C#编程性能的技巧

整理一些提高C#编程性能的技巧1、使用StringBuilder代替使用string 连接符 “+”说明：String类对象是不可变的（只读），一旦创建该对象，就不能修改该对象的值。对象String对象的重新赋值，本质上是重新创建了一个String对象并将新的值赋值给该对象。如果字符串存在较多次的拼接时候，最后使用StringBuilder类，需要引用命名空间 System.Text。该...

2018-10-08 22:45:29 721 1

转载 c#小技巧总结

c#小技巧总结2017年01月11日 09:14:27 苏门答腊阅读数：1034c#小技巧总结1、时间长度的计算 TimeSpan类。例如：TimeSpan span = dateTime1 - dateTime2 方便啊2、从类（Class)返回一个System.Type类型，用typeof关键字3、从一个对象实例(Object)返回一个System.Type类型，用GetTy...

2018-10-08 22:39:47 405

转载 PB12.5版本的WEBSERVICE部署指南

PB12.5版本的WEBSERVICE部署指南环境：WINDOWS SERVER 2008 R2 + SQLSERVER 2008R21，安装IIS 7.X2，安装Dot.net 4.03，安装SQLSERVER 2008 R2（注意不必要安装SNC了，SQL 2008R2已经带了）4，安装PB12.5的Prerequisites5，安装PB .NET ...

2018-08-31 11:16:39 2459

原创控制另一个程序里的数据窗口

通过测试发现使用Post(ll_dw_handle, 1305, 0, 0) ，可以使数据窗口弹出saveas的对话框，经过进一步的试验，发现wparam和lparam参数的含义分别是：saveas type和 savefilename字符串的地址，所以我们就可以使用发送消息的方式使数据窗口内容保存为文本文件，然后读取文件就可以获取数据了。　　我在pb程序中的测试代码：　　Function

2017-09-07 09:17:30 999 1

原创 Pb10调用Mschart测试

以下为参考图片，下载地址为：http://download.csdn.net/detail/lzp_lrp/9788983

2017-03-21 20:39:23 571

原创关于Wince，原来大部分的Api都可以

关于Wince，原来大部分的Api都可以用的，在Windows系统下,API函数一般存于kernel32.dll和user32.dll中。而在WinCE下,基本上都在coredll.dll里。

2017-03-19 21:44:42 2878

原创从0：4到6：5，巴萨做到了

巴萨史诗性逆转巴黎，从客场0:4，到主场6:1，总比分6:5，上演翻盘好戏。太不可思议了

2017-03-19 21:41:01 2316

转载 ServerXMLHTTP的setTimeouts超时设置

ServerXMLHTTP的setTimeouts超时设置转载▼这个问题困扰了我很长很长的时间，在跨域获取数据的时候就要用到服务器端的对象，以前一直用的是Msxml.XMLHTTP。但是问题太多了，特别严重的就是你在获取数据的时候不知道对方服务器的状态，如果对方挂了那客户端只能傻傻的等待着。今天重点解决了一下，搜了一箩筐关于这方面的信息，终于找到了我朝思暮想的Msxml2.S

2016-01-20 11:51:39 8370

转载 pb web 环境配置及常见错误处理

一、开发环境安装 1、先安装windows的IIS5.0以上 2、再安装asp.net framework 2.0 3、下载(http://www.asp.net/iewebcontrols/download.aspx) ,安装IE Web Control , 解压后运行C:/Program Files/IE Web Controls/build.bat 创建C:/Pr

2016-01-18 16:17:33 5663

转载 PowerBuilder 12.5 RichTextFile()

PowerBuilder 12.5 新增了一個函數，叫做 RichTextFile()，顧名思義，此函數跟 RichText 有關。這篇將說明 RichTextFile()函數的用法，如何將 RichText 的檔案呈現在 DataWindow 中，以便系統有更多樣性呈現的方法。RichText 格式RichText 是一種標準格式，可用來將文字的呈現豐富化，就跟該名稱隱含的意思一樣：豐富文字

2015-09-22 15:00:15 1836

转载 C# 获取当前路径方法

//获取包含清单的已加载文件的路径或 UNC 位置。public static string sApplicationPath = Assembly.GetExecutingAssembly ( ).Location;//result: X:\xxx\xxx\xxx.dll (.dll文件所在的目录+.dll文件名)//获取当前进程的完整路径，包含文件名

2015-08-07 15:53:33 692

原创沪指跌近4%创业板跌超5%

最新消息：沪指跌近4%创业板跌超5%

2015-06-25 17:07:02 257

转载 DSOframer 的简单介绍和资源整理

DSOframer 的简单介绍和资源整理DSOframer dsoframer是微软提供一款开源的用于在线编辑、调用Word、 Excel 、PowerPoint等的ActiveX控件。国内很多著名的OA中间件，电子印章，签名留痕等大多数是依此改进而来的。虽然撸主的公司已经用了新的office控件【NTKO】取代了【dsoframer】，但免费的控件是更多人的选择，所以还是在此和大家分享一下【ds

2015-06-16 08:53:23 4301 3

转载 DSOFramer的使用

DSOFramer的使用 c#

2015-06-16 08:46:58 6437

原创 PB实现工作流引擎

可以定义工作流，支持顺序及分支支持指派类型：部门、岗位、人员与汇聚、或汇聚以及投票汇聚

2015-06-09 10:54:13 2815 2

原创 PB excel 设定某些单元格框格为实线，但发现range()中值获取不到

我用datastore将数据写入了excel, 公式如下： ole_xls.ActiveSheet.Cells[1,2].value=‘xxxxx’但发现设实线的函数为： ole_xls.ActiveSheet.range(beginRowcol+”:”+EndRowCol) 这个range中的beginRowcol格式应为：A2 , 我只知道Cells[1,2] 有没有方法得到Cells

2015-05-28 22:16:39 1356

原创 DDDW重复行只能选择第一个的问题

csdn里一个网友问了这么个问题：出库datawindow明细dw_1,名称列关联子窗口dwc_xmmc，过滤后的子窗口只要有名称重复但规格、编码不同的商品列表，通过上下键或者鼠标单击选择任意一个再选择其他,DW_1数据行都不能相应改变。如何解决？谢谢！如：输入TG,子窗口会出现铁锅 1211 18cm TG 铁锅 1211 24cm TG 铁锅 1212 18cm TG

2015-05-28 22:15:29 1102

原创数据窗口可以接收的消息

Retrieve Post(ll_dw_handle, 1306, 0, 0) Post(ll_dw_handle, 1320, 0, 0)ScrollNextPage Post(ll_dw_handle, 1318, 0, 0) ScrollPriorPage Post(ll_dw_handle, 1319, 0, 0) ScrollToFirstPag

2015-05-28 11:10:13 1176

原创查看运行程序的参数

wmic process get caption,commandline /value

2015-05-16 23:06:25 870

原创 (ORACLE 11g)"未在本地计算机注册“OraOLEDB.Oracle.1”提供程序"问题解决

现象： C#程序中需要以Provider=OraOLEDB.Oracle.1方式访问ORACLE数据库。但程序执行时报异常：未在本地计算机注册“OraOLEDB.Oracle.1”提供程序解决：服务器ORACLE为10g，虽然安装时选择了Oracle Data Provider for .net 和Oracle Provider for OLE DB。但是还是

2015-05-15 14:16:04 42711

原创 PB杂志

以前CSDN出的PB杂志，今天突然看到了，贴出来供大家参考一下另怀念一下以前朋友 http://download.csdn.net/detail/lzp_lrp/8690641

2015-05-12 16:12:07 1633

原创如何在PB中制作特殊形状数据窗口或按钮介绍

在 CSDN 上，经常有朋友问到不规则窗口或者不规则的按钮如何制作，在这里我介绍几个比较常用的 API 函数，来实现不规则窗口或者不规则按钮的制作。一、先看一下效果：点击一下圆形花边按钮，效果如下：（蓝色的为桌面） CSDN 社区电子杂志—POWERBUILDER 杂志创刊号二、下面我介绍一下程序中主要用到的几个 API 函数： 1. 创建一个圆角矩形 CreateR

2015-05-12 13:16:08 4784

原创如何在PB中制作特殊形状数据窗口或按钮

以下是全部源码，感兴趣的朋友可以整个窗口的源代码导入到PBL里自己运行一下试试。PBExportHeaderPBExportHeaderw_button.srw forward global type w_button from window end type type cb_11 from commandbutton within w_button end type type cb_1

2015-05-12 13:09:01 3537

转载 pb9调用WebService

pb9 调用WebService新建应用,这些步骤与pb8一致的。然后建立一个WebService Proxy Wizard,下一步会提示你输入WSDL文件，点击浏览选择，假设是C:/inetpub/wwwroot/的service1.wsdl文件。点击下一步，会自动出现WSDL文件中的Service.点击下一步，系统默认选择ServiceSoap，紧接着输入proxy name(代理对象名)，输入

2015-05-12 08:46:54 3898

原创 Win7应用程序丢失的问题

Win7应用程序丢失的问题pb11.5用了一段时间后图标不见了，快捷方式成了一个没有图标的东西很不舒服。在网上找了段解决方法，供参考：　　按键 “WIN+R” 输入即可cmd　　然后输入分别输入 :　　 taskkill /im explorer.exe /f　　 cd /d %userprofile%\appdata\local　　 del iconcache.db /a　 sta

2015-05-07 13:41:29 1074

原创 PB10及以上版本连接MSSQLServer

PB10及以上版本连接MSSQLServerPB9.0及以前版本都由提供MSSQLServer 的专用接口，但PB10之后，这个接口就被取消了，但可以用ole db或者odbc接口来连接，以下为配置方法： // Profile test SQLCA.DBMS = “OLE DB” SQLCA.LogPass = ‘1’ //这里为密码 SQLCA.LogId = “sa” SQLCA.Au

2015-05-07 13:26:52 2401

转载 powerbuilder操作excel命令大全

1．创建Excel对象　　eole=CREATEOBJECT(′Excel.application′)　　2．添加新工作簿　　eole.Workbooks.add　　3．设置第3个工作表为激活工作表　　eole.Worksheets(″sheet3″).Activate　　4．打开指定工作簿　　eole.Workbooks.Open(″c:\temp\ll.xls″)

2015-04-28 16:39:33 6244

原创 PB实现B/S的几种方式

1.采用pb11以前版本，.net web forms application，采用这个局限性比较大，比如对下拉数据窗口支持的不好，采用回调技术，导致用户体验不好2.采用activeX技术，调用pb的对象，实现在浏览器中运行，客户端需要安装程序。3.直接在浏览器中调用pb的exe，嵌入浏览器中，以前做PB调用VC的程序时用过，主要是采用SetParent来实现。

2015-04-28 12:44:16 4298 1

原创 Powerdesign的ER图里显示简称

Tools-> Model Options -> then un-check 'Use data type full name'

2015-04-28 12:38:32 1004

转载 64位win7下部署web

在64位操作系统下，如何让PDF另存功能好用首先我要声明的是，这个方法在PB9+WIN7 64位下不好用。只适用于 PB12, 12.5。PB9的仍然得安装GhostScript 7.05，不能高于这个版本。1，安装GhostScirpt 8.71注意版本，高过这个版本就有时不好用。。2，安装64位的PS打印机驱动程序，将打印机名称设置为 "Syba

2014-11-19 15:27:02 1341 1

转载 C#如何实现DataGridView到DataGridView的拖拽

C#如何实现DataGridView到DataGridView的拖拽今天工作中遇到一个问题，需要将一个DataGridView中的某一行拖拽到另一个DataGridView中，在网上搜了一遍，大多是从DataGridView拖拽到TextBox等控件，没有拖拽到DataGridView中的。拖拽到TextBox很容易，但拖拽到DataGridView就有一个问题：如何决定拖

2014-09-04 08:55:52 1204

转载 .net序列化及反序列化

序列化是指一个对象的实例可以被保存，保存成一个二进制串，当然，一旦被保存成二进制串，那么也可以保存成文本串了。比如，一个计数器，数值为2，我们可以用字符串“2”表示。如果有个对象，叫做connter，当前值为2，那么可以序列化成“2”，反向的，也可以从“2”得到值为2的计数器实例。这样，关机时序列化它，开机时反序列化它，每次开机都是延续的。不会都是从头开始。序列化概念的提出和实现，

2014-09-04 08:46:36 904

原创 PB12发布SmartClient时需要的文件

问题已经解决。不能将dotnetfx.exe文件直接拷贝到已经发布的虚拟目录下（或者网站下），而是应该在发布前拷贝到安装目录下的：Sybase\PowerBuilder 11.5\DotNET\pbiu\BootStrapper\Packages\0-dotnetfx子目录下，我共拷贝了4个文件：dotnetfx.exe，instmsia.exe，langpack.exe，WindowsInsta

2014-08-28 16:38:41 1298

转载 PowerDesigner建模使用技巧

PowerDesigner建模使用技巧2012-06-14 15:01:57标签：oracle PowerDesigner原创作品，允许转载，转载时请务必以超链接形式标明文章原始出处、作者信息和本声明。否则将追究法律责任。http://mrxiong.blog.51cto.com/287318/8985081.如何打开PowerDesigner 快捷工具栏 pa

2014-08-14 15:49:36 784

转载 PB10.0连接SQL Server

PB10.0连接SQL Server的配置步骤初次使用pb10的朋友无法顺利连接到sql server，一方面没有了mssql server专用接口了，另一方面数据库管理系统(DBMS)换成了“OLE DB”，配置起来有点不顺手！下面就来介绍pb10中用OLE DB连接sql 2000数据库。在安装pb10的时候选择custom/full方式

2014-05-23 12:24:45 1515

转载 pb10连接sqlserver

2014-05-23 12:23:07 1433

datawindow 合并数据

一个DW ，BH 列有如下 BH YJJ00000004 YJJ00000007 YJJ00000002 YJJ00000003 YJJ00000012 YJJ00000013 YJJ00000014 YJJ00000015 如何得到结果 YJJ00000002~YJJ00000004，YJJ00000007，YJJ00000012~YJJ00000015

2015-06-04

CSDN社区PB杂志

CSDN里PB杂志，不经意看到电脑保存的杂志，上传到下载资源，供大家参考

2015-05-12

PB LISTBOX使用

两个列表框，左边里有多列数据，通过鼠标选取将左边列表框里的一些数据添加到右侧列表框

2015-03-18

PB10在win7获取硬盘ID

PB10在win7获取硬盘ID，在pb10下测试通过

2014-12-28

PB去掉mdi里工具栏的边框

PB去掉mdi里工具栏的边框，版本pb11.5 采用api函数

2014-03-17

PB做的记事本

Powerbuilder做的记事本，实现新建、打开、保存、另存等功能简单的记事本，供初学者参考，有经验的就不要下载了

2013-08-04

PB 取本地Mac和IP

//通过域名得到IP Function string GetIp(string name) Library "GetNet.dll" //得到本机IP地址 Function string GetLocalIp() Library "GetNet.dll" //通过ip得到域名 Function string GetName(string ip) Library "GetNet.dll" //得到本机域名 Function string GetLocalName() Library "GetNet.dll" //得到局域网内的计算机名 Function string GetLanComputers() Library "GetNet.dll" //得到局域网内的计算MAC Function string GetMac(string ip) Library "GetNet.dll" //得到本机的计算MAC Function string GetLocalMac() Library "GetNet.dll"

2013-07-18

PB开发的进销存

PB开发的进销存，供初学者参考，具体内容见文件

2013-06-20

pb开发的图片尺寸缩小程序

pb开发的图片尺寸缩小程序可以将大图缩放为小图

2013-05-06

PB 截图 api

PB 截图 api pb8例子 preview打勾后可以看到截图

2013-04-27

PowerBuilder B/S 环境搭建

PowerBuilder B/S 环境搭建详细介绍B/S环境搭建的过程及配置

2013-04-25

powerbuilder10实用教程

powerbuilder10实用教程，可以作为学习用的教程，可以都新人

2012-11-28

PB .NET如何製作REST Client

2012-11-22

PB Classic也能製作甘特圖和雷達圖

2012-11-22

PB11.5 3050 补丁

PB11.5 3050 补丁使用说明：解压后放在pb的安装目录下，然后运行

2012-07-18

PBkiller2.5.18破解版

PowerBuilder6至powerbuilder10反编译工具，破解版

2011-11-30

PowerBuilder6.5_2

PowerBuilder6.5开发工具，第二部分

2011-06-23

PowerBuilder6.5_1

PowerBuilder6.5开发工具，第一部分

2011-06-23

pb11.5开发B/S配置说明

pb11.5开发B/S配置说明需要安装的东东以及配置

2011-06-09

Jmail在pb中的应用

/这个是一个成功的声明 FUNCTION int fsendemail(ref String sSmtpServer, ref String sSenderId, & ref String sPsw, ref String sSenderName, ref String sRcvAddr,& ref String sSenderAddr,ref String sCCAddr, & ref String sBCCAddr, ref String sSubject, & ref String sContent, ref String sAttach) Library "PSdEmail_dll.dll" 代码如下 //mail_url放邮件地址,as_mailtext放邮件内容,mail_cc是邮件的抄送地址 //as_subject是邮件主题,as_filename是附件的文件名,as_pathname是附件的完整路径名 string ls_name mailsession lms_data mailmessage lmms_message mailreturncode lmr_value integer li_i //产生邮件会话对象mses lms_data = create mailsession //邮件登录 lmr_value = lms_data.maillogon(mailnewsession!) if lmr_value mailreturnsuccess! then gnv_base.of_message("真不幸，邮件注册失败") return -1 end if //标题 lmms_message.subject = sle_subject.text //正文 lmms_message.notetext = trim(mle_content.text) + ' ' ////附件 //if as_pathname '' or as_filename '' then // mmsg.attachmentfile[1].pathname=as_pathname // mmsg.attachmentfile[1].filename=as_filename //end if //******************************校验收件人邮件地址是否是合法地址***************************// //原收件人 ls_name = sle_rcv.text lmr_value = lms_data.mailResolveRecipient(ls_name) if lmr_value = mailReturnSuccess! THEN lmms_message.Recipient[1].RecipientType = mailto! lmms_message.Recipient[1].address = "[email protected]" lmms_message.Recipient[1].name = "[email protected]" elseif lmr_value = mailReturnFailure! THEN gnv_base.of_message('收件人地址错误，请检查') return -1 else gnv_base.of_message('收件人地址错误，请检查') return -1 end if //发送邮件 lmr_value = lms_data.mailsend(lmms_message) if lmr_value mailreturnsuccess! then messagebox("邮件发送","邮件发送失败!"+char(10)+char(13)+'请检查:'+char(10)+char(13)+& '1.附件路径和名称是否正确.'+char(10)+char(13)+& '2.本地outlook配置是否正确.'+char(10)+char(13)+& '3.如以上都正确,请与系统管理员联系!') return -1 elseif lmr_value = mailreturnsuccess! then // messagebox("邮件发送","邮件发送完毕!") end if lms_data.maillogoff() //退出登录 destroy lms_data //取消邮件会话 return 1 String ls_RcvAddr //收件人 String ls_CcAddr //转发 String ls_BccAddr //暗送 String ls_Sub //主题 String ls_Content //内容 String ls_Attach = ''//附件,多个附件由ATTACHSPLIT分隔 Constant String ATTACHSPLIT = '|' //附件的分隔符号 Integer li_Rtn //返回值,0:发送成功,1:发送失败 pointer oldpointer // Declares a pointer variable oldpointer = SetPointer(HourGlass!) ls_RcvAddr = sle_Rcv.Text //收件人 ls_CcAddr = sle_CC.Text //转发 ls_BccAddr = sle_BCC.Text //暗送 ls_Sub = sle_Subject.Text //主题 ls_Content = mle_Content.Text //内容 Long ll_Row, ll_RowCnt //把附件用ATTACHSPLIT连接起来 ll_RowCnt = dw_Attach.RowCount() FOR ll_Row = 1 TO ll_RowCnt ls_Attach = ls_Attach + dw_Attach.Object.FilePath[ll_Row] +& dw_Attach.Object.FileName[ll_Row] + ATTACHSPLIT NEXT //发送 li_Rtn = fSendEmail(is_Server, is_SenderId , is_Psw, is_SenderName, is_SenderAddr,ls_RcvAddr, ls_CcAddr, ls_BccAddr, ls_Sub, ls_Content,ls_Attach) if li_rtn = 0 then gnv_base.of_message('邮件发送成功！') else gnv_base.of_message('邮件发送失败！') end if SetPointer(oldpointer) li_Rtn = fSendEmail(is_Server, is_SenderId , is_Psw, is_SenderName, is_SenderAddr, & ls_RcvAddr, ls_CcAddr

2011-06-03

硬件网络拓扑图 C/S

硬件网络拓扑图 C/S 关于硬件的拓扑图

2010-10-26

Oracle时间区间段合并.pdf

Oracle时间区间段合并统计的算法

2021-09-10

智慧城市_顶层设计指南(GBT_36333-2018)

智慧城市_顶层设计指南中化人民共和国国家标准 GB/T 3633-2018 国家标准《智慧城市顶层设计指南》智慧城市建设需求分析智慧城市建设总体设计和架构设计智慧城市建设实施路径规划标准起草单位：中国电子技术标准化研究院北京市长城企业战略研究所华为技术有限公司中电科新型智慧城市研究院有限公司中兴通讯股份有限公司北京航空航天大学智慧神州（北京）科技有限公司建设综合勘察研究设计院有限公司北京清华同衡规划设计研究院有限公司山东省标准化研究院深圳市华傲数据技术有限公司北京初志科技有限公司浙江大华技术股份有限公司西安未来国际信息股份有限公司北京电信规划设计院有限公司北京智城信服科技有限公司

2020-06-10

5G消息白皮书.pdf

5G消息白皮书，共12页 4月8日上午10时，中国移动、中国联通、中国电信联合发布《5G消息白皮书》，宣布将携手生态合作伙伴，全面升级基础短信为5G消息业务。《白皮书》阐述了5G消息的核心理念，明确了相关业务功能及技术需求，提出了对5G消息生态建设的若干构想。中国电信副总经理王国权、中国移动副总经理董昕、中国联通副总经理范云军均出席了本次发布会。

2020-04-09

PB中实现椭圆窗口按钮等

PB中实现椭圆窗口按钮等，采用API函数来实现，具体可见代码，程序在pb10下测试通过

2018-10-22

PB 多行编辑器消息

2017-10-18

PB10调用Mschart例子

PB10调用Mschart例子需要自己下载安装Mschart控件，以上例子在pb10下测试通过

2017-03-21

PB BMP、JPG互转

2017-01-18

PB datawindow保存为bmp

PB12 datawindow保存为bmp 采用api函数来实现

2016-05-23

PB Tree icon显示

PB Tree icon显示可以显示几个图标

2016-05-19

PB listview 转存excel

PB listview 转存excel 在pb10下测试通过

2016-03-08

PB Listview转存Excel

PB listview 转存excel 在pb10下测试通过

2016-03-08

数据窗口对某行拖动的源代码例子

数据窗口对某行拖动的源代码例子，采用pb10开发并测试通过

2016-03-01

PB AVI 调用DEMO

PB AVI 调用DEMO 可以通过代码进行暂停、停止、播放等功能

2016-02-18

Userobject里执行窗口里的按钮

Userobject里执行窗口里的按钮按钮可以不固定，当作参数来传递

2015-11-13

数据窗口另存的Excel文件合并

PB DataWindow Excel 合并把两个导出的数据窗口Excel文件进行合并，生成一个Excel文件

2015-11-02

pb word 文字个数统计

主要代码 string ls_filename, ls_path integer li_value oleobject ole_word long ll_cnt ole_word = create oleobject li_value = ole_word.connecttonewobject("word.application") if li_value <> 0 then messagebox("info", "连接word失败，请检查") return -1 end if if GetFileOpenName("选择文件", ls_filename, ls_path, "Word Files (*.doc), *.doc, All Files(*.*), *.*") <> 1 then ole_word.quit() ole_word.disconnectobject() destroy ole_word return 1 end if if len(trim(ls_filename)) <= 0 then return -1 else ole_word.Documents.open(ls_filename) ll_cnt = ole_word.ActiveDocument.Content.End messagebox('Word total:', ll_cnt) ole_word.quit() ole_word.disconnectobject() destroy ole_word end if

2015-10-21

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人