摘要: 第一步:创建语法CREATE TABLE OLIVER_MAP(ID INT,COM_TYPE VARCHAR(100),COM_NAME VARCHAR(100),SR_UP DECIMAL(18,2),SR_LIM DECIMAL(18,2),RES VARCHAR(100));INSERT INTO OLIVER_MAP(ID,COM_TYPE,COM_NAME,SR_UP,SR_LIM,R... 阅读全文
posted @ 2017-08-10 18:10 OLIVER_QIN 阅读(693) 评论(0) 推荐(0) 编辑
摘要: 如题,报错截图如下:根据以上警告信息我们可以清晰看出,是字段DEFAULT_FLAG出错了!于是我们找到对应的字段,结果一看,导出文件中DS表结构中该字段为DECIMAL(18,2),但是导出文件中为VARCHAR(1),这就尴尬了!于是修改字段类型后,轻松导入!注明:此类错误在DS运行时候,DS运行并不会报错,只会有相应警告,需要查看日志才能找到问题。 阅读全文
posted @ 2017-08-10 17:58 OLIVER_QIN 阅读(610) 评论(0) 推荐(0) 编辑
摘要: Datastage在win10上安装报错如下:这个错误的意思是:。netFramWork的版本不符合要求,于是,我在网上下载了一个版本一致的下载地址为:http://pan.baidu.com/s/1i5kmEfN下载完成以后,就可以开始安装了,但是在win10上安装DataStage时会出现检查不通过,没关系,使用以下命令即可解决问题:setup.exe –force程序正在开始安装......... 阅读全文
posted @ 2017-08-10 17:54 OLIVER_QIN 阅读(6315) 评论(0) 推荐(0) 编辑
摘要: 如何使用VBA获取当前工作表的用户名呢?请看如下代码:Sub 获取当前工作表的用户名() MsgBox "当前工作表的用户名为:" & Application.UserNameEnd Sub点击运行程序后,效果如下:点击下载附件 阅读全文
posted @ 2017-08-10 17:46 OLIVER_QIN 阅读(1733) 评论(0) 推荐(0) 编辑
摘要: 在VBA中,如何获取Excle的安装路径呢?请看以下代码:Sub 获取Excle的安装路径() MsgBox "Excle的安装路径为:" & Application.PathEnd Sub点击运行程序后,执行结果如下:点击下载附件 阅读全文
posted @ 2017-08-10 17:35 OLIVER_QIN 阅读(404) 评论(0) 推荐(0) 编辑
摘要: Excle的窗口分为:最大化,最小化,一般 使用VB代码如何查看窗口的状态呢?代码如下所示: 点击“运行程序”,出现如下: 点击下载附件 说明: 阅读全文
posted @ 2017-08-10 17:03 OLIVER_QIN 阅读(674) 评论(0) 推荐(0) 编辑
摘要: 如何获取Excle库文件地址呢?具体代码如下:Public Sub 获取Excel库文件夹的路径() MsgBox "库文件夹的路径是: " & Application.LibraryPathEnd Sub点击"运行程序",出现如下结果:附件下载 阅读全文
posted @ 2017-08-10 16:46 OLIVER_QIN 阅读(261) 评论(0) 推荐(0) 编辑
摘要: 使用VBA如何获取模板保存的路径呢?具体代码如下: 点击“运行程序”,效果图如下: 附件下载 阅读全文
posted @ 2017-08-10 16:30 OLIVER_QIN 阅读(366) 评论(0) 推荐(0) 编辑
摘要: 点击上图中的"显示Excle内置对话框",显示效果如下:源代码:Public Sub 显示Excel内置对话框() UserForm.ShowEnd Sub附件下载 阅读全文
posted @ 2017-08-10 10:12 OLIVER_QIN 阅读(544) 评论(0) 推荐(0) 编辑
摘要: 数据如上图所示,点击RUN后的运行结果如下: 得到该文件夹,文件夹内容如上图。 代码如下: Private Sub Command_OLIVER() Dim arr arr = Range("A1:C" & [a65536].End(3).Row) Dim i As Long, wName As S 阅读全文
posted @ 2017-08-10 09:32 OLIVER_QIN 阅读(2214) 评论(4) 推荐(1) 编辑