- 博客(65)
- 资源 (4)
- 收藏
- 关注
RSS订阅原创 Windows 任务计划程序 【不管用户是否登录都要运行】执行时不显示CMD或程序窗口
Windows 任务计划程序 【不管用户是否登录都要运行】执行时不显示CMD或程序窗口
2024-04-17 17:07:24
227
原创 VB.Net 使用Semaphore信号量进行多线程同时并行的出力文件，异步且控制并发数量,并兼容.NET Framework 4.0
VB.Net 使用Semaphore信号量进行多线程同时并行的出力文件，异步且控制并发数量,并兼容.NET Framework 4.0
2023-06-13 11:00:52
220
原创 C#(VB.NET) 压缩成zip包的两种方式SharpZipLib和System.IO.Packaging。
C#(VB.NET) 压缩成zip包的两种方式SharpZipLib和System.IO.Packaging。
2023-02-14 14:54:38
1369
原创 CMD 查找指定日期前的文件数量和删除指定日期前的文件。
1.直接看代码。@echo offset f=0for /f %%i in ('forfiles /p D:\TEST /d -60 /m "*.csv"') do set /a f=f+1forfiles /p D:\TEST /d -60 /m "*.csv" /c "cmd /c del @file"echo %date:~0,4%/%date:~5,2%/%date:~8,2% %f%件>>D:\TEST\文件件数.txt" 2.详细说明。1.设置变量。set
2022-05-31 14:05:22
2210
原创 在IE和Edge中用JS判断只能输入数字，字母，日期型。
IE的HTML：ime-mode:disabled限制不能输入文字，只有IE有效。//ime-mode:disabled限制不能输入文字，只有IE有效。<input style="ime-mode:disabled" onkeypress="fncNum();return true;" />IE的JS ：只能输入数字，并且按回车时转换成Tab。keyCode48~57:数字，keyCode13:回车，keycode9:Tab。//IE只能输入数字，并且按回车时转换成Tab
2022-04-21 17:18:24
522
原创 JS在Edge中点击回车焦点移动到下一个控件，获取画面中的所有可编辑的项目，排除属性「readonly,disabled,hidden」的控件。
Edge中点击回车焦点移动到下一个控件，代码。//Edge対応document.onkeydown = function enterToTab(event) { //获取画面中的所有能入力的input和submit按钮。 var inputs = document.querySelectorAll("input[type='text']:not(:disabled):not([readonly]):not([type=hidden]),input[type='submit']");
2022-04-21 12:54:56
354
原创 CSS样式给不可编辑的按钮设置颜色。
CSS代码：input[type="submit"]:disabled { color: lightgray;}input[type="submit"]是提交按钮，可以设置别的type属性。比如：input[type="button"],input[type="image"]color可以设置颜色，实例是灰色。如果资源学习了，可以点赞支持！...
2022-04-21 12:38:10
1006
原创 ODP.NET(Oracle.ManagedDataAccess) 中 select中多个相同参数名报错(ORA-01008)。
ODP.NET(Oracle.ManagedDataAccess) 中 select中多个相同参数名报错(ORA-01008)。
2022-04-11 17:31:20
491
原创 javac 循环编译子目录里所有.java文件成.class文件。
新建一个test.bat文件，放入下面的代码内容。然后放在出力的.java的顶层目录。双击bat文件应该就可以了。dir /s /B *.java > sources.txtjavac @sources.txt如果资源学习了，可以点赞支持！
2022-03-10 19:36:25
1180
原创 Oracle BLOB类型 用SQL出力txt或jpg文件
1.在Oracle服务器上创建出力文件的路径和设置对应权限--服务器上cmd运行sqlplus sys/test@ORA12 as sysdba--设置目录位置create or replace directory BLOBDIR as 'E:\BLOBDIR';--目录设置可以使用的用户Grant read,write on directory BLOBDIR to sys;Grant read,write on directory BLOBDIR to TEST;--设置出力文
2022-01-27 09:49:42
1240
原创 System.Runtime.InteropServices.COMException (0x800A03EC):无法访问文件。
1.运行comexp.msc -32注意因为excel 是32 位的，所以这里用的32位的操作， 如用64位的操作命令：dcomcnfg.exe，将找不到excel com组件。2.在DCOM里找到[Microsoft Excel Application],右键属性。ID属性里选择这个用户，然后输入登录的用户名和密码（只因作业需求用的是日文系统，所以图片是日文的）3.如果还是不可用再设置第3个tab里的权限设置，在编辑里加入对应的用户（Everyone用户或者NEWWORK SERVI.
2021-12-26 20:45:05
2503
原创 System.Exception: ActiveX 无法创建组件
解决方法：web.config里添加权限设置。'Web.config里<system.web> <identity impersonate ="true" userName="登录用户名" password="登录用户密码"/></system.web>
2021-12-26 20:30:58
888
原创 ClosedXML.Excel 多个Excel之间复制sheet
'基础文件Dim book As XLWorkbook = New XLWorkbook("D:test.xlsx")'从tempbook复制到book。Dim tempbook As XLWorkbook = New XLWorkbook("D:temptest.xlsx")'防止sheetName重复Dim newSheet As Integer = 0'sheet索引是从1开始。For sheetIdx = 1 To tempbook.Worksheets.Count newSh.
2021-12-23 18:02:27
434
原创 ORA-43853: SECUREFILE lobs cannot be used in non-ASSM tablespace “SYSTEM“解决方法
ORA-43853
2021-12-08 14:52:20
695
原创 解决System.Reflection.ReflectionTypeLoadException mscorlib.dll
1.应该是部分DLL没有找到。先出力详细错误信息。 try { //这里的内容是出错的代码。 var controllers = AppDomain.CurrentDomain.GetAssemblies().DefinedTypes } catch (ReflectionTypeLoadException ex) {
2021-11-17 13:39:52
2130
原创 用BAT 文件启动Oracle数据库和执行SQL
1.新建DB启动.bat文件。文件内容：sqlplus / as sysdba @startup.sql>startup.logsqlplus / as sysdba @selectdual.sql>selectdual.logPAUSE内容说明：这个bat文件是在Oracle服务器端放置。sqlplus / as sysdba(这个是连接oracle数据库)@startup.sql>startup.log(这个是执行[selectdual.s...
2021-07-23 12:58:10
1738
原创 SQLServer 索引碎片清理(数据量少执行很慢)
1.查找索引碎片大于50%SELECT OBJECT_NAME(IND.OBJECT_ID) AS TABLENAME ,IND.NAME AS INDEXNAME ,INDEXSTATS.INDEX_TYPE_DESC AS INDEXTYPE ,INDEXSTATS.AVG_FRAGMENTATION_IN_PERCENT FROM SYS.DM_DB_INDEX_PHYSICAL_STATS(DB_ID() ,NULL ,NULL
2021-07-13 12:18:06
2306
原创 DataGridView设置复选框，滚动或列拖拽可以自动移动。
1.在工具栏拖拽一个Checkbox放到画面上。2.做一个方法设置checkbox的位置。Private Sub checkboxSet() '取得grid的指定列的位置。(参数：0是列数) Dim rect As System.Drawing.Rectangle = datagridview.GetCellDisplayRectangle(0, -1, True) '有可能列有文字，所以checkbox需要微调一下位置。 rect.Offset(15, 35)
2021-06-29 14:41:19
395
原创 Oracle 修改单个用户密码永不过期。
用户的密码期限是PROFILE文件控制的。1.查询用户对应的PROFILE文件(一般是DEFAULT)： SELECT username,PROFILE FROM dba_users;2.查看一下DEFAULT文件的各种属性。 select distinct * from dba_profiles order by profile,RESOURCE_NAME3.因为只想修改单个用户的，所以不能修改DEFAULT文件。所以根据DEFAULT的属性创建一个新的TEST_U...
2021-06-22 10:11:43
188
原创 ORACLE IMPDP 只导入存储过程PROC。
ORACLE IMPDP 只导入存储过程PROC。impdp TEST/TEST@ORA12 DIRECTORY=dir_ora12 DUMPFILE=TEST.DPDMP logfile=TEST.log schemas=TEST Include=PROCEDURE:\"IN ('PROC_GET','PROC_PUT')\"下面的连接是一个参照的关于INCLUDE的详细的说明。https://blog.csdn.net/fw0124/article/details/7280129..
2021-05-07 11:05:02
1577
原创 Oracle impdp 导入方法时不指定导入数据库名称和表空间，让数据库自动创建。
指定导入数据库impdp test/test@test DIRECTORY=dir_dmp_ora19 DUMPFILE=test.DMP logfile=test.log schemas=test替换指定数据库impdp test/test@test DIRECTORY=dir_dmp_ora19 DUMPFILE=test.DMP logfile=test.log remap_schema=test:test不指定导入数据库impdp test/test@test DIRECTORY
2021-03-10 14:42:39
1086
原创 Window10 106日文键盘和101英文键盘的追加方法
1.确认电脑两个键盘驱动都安装。比如电脑是101英文键盘 想用106日文键盘。那就追加106键盘。如图：系统的控制面板->键盘设置点击属性。点击设定。点击驱动更新。选择参照检索。选择从电脑的一览中选择。互换性checkbox不选。然后选择日本语PS/2键盘。点击下一步，弹出框选择是就可以了。这样驱动就安装了。2.修改注册表Win+R->regedit->HKEY_LOCAL_MACHINE->SYSTE..
2021-03-03 14:33:18
1529
原创 Oracle IMP，EXP和IMPDP，EXPDP导入方式详细说明
Oracle IMP,EXP和IMPDP,EXPDP导入方式详细说明1.创建表空间（IMP和IMPDP相同）一般数据库需要3个表空间，DATA，TEMP，INDEX，具体看项目需求。（TEST是数据库）CREATE默认表空间大小512M。alter是自动增长表空间大小，表空间不够自动增长50M。CREATE TABLESPACE "TEST_DATA" DATAFILE 'D:\DATA_FILE\TEST_DATA_01.DBF' SIZE 512M AUTOEXTEND ON N.
2020-12-30 14:32:50
952
原创 VB.NET 画面PictureBox中显示网络图片的多种方式。
1.获取网络动态图片的api，设置图片显示。 Dim wr As WebRequest = WebRequest.Create("https://uploadbeta.com/api/pictures/random/?key=BingEverydayWallpaperPicture") Dim res As WebResponse = wr.GetResponse Dim bmp As Bitmap = New Bitmap(res.GetResponseStream) Me.P
2020-09-27 18:17:52
1676
原创 VB.NET 画面关闭按钮设置不可用
1.设置关闭按钮为最小化的样式。 Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message) Dim SC_CLOSE As Integer = 61536 Dim WM_SYSCOMMAND As Integer = 274 If m.Msg = WM_SYSCOMMAND AndAlso m.WParam.ToInt32 = SC_CLOSE Then ...
2020-09-27 17:55:27
788
原创 SQLserver TEST_log.ldf日志文件清空
日志文件格式： TEST_log.ldf1.更新数据库RECOVERY属性 ALTER DATABASE TEST(数据库)SET RECOVERY SIMPLE;2.清空日志文件 DBCC SHRINKFILE ('TEST_log', 1);3.恢复数据库RECOVERY属性 ALTER DATABASE TEST(数据库)SET RECOVERY FULL;如果资源学习了，可以点赞支持！...
2020-09-23 14:56:27
282
原创 SVN的Cleanup出现错误，项目地址显示不出来，可以用SQLite.exe这个工具。
1.安装SQLite.exe工具。2.打开SQLLite工具，点击【Open Database】,选择对应项目中的【.svn】中的【wc.db】文件。3.WORK_QUEUE的数据需要删除。可以右键点击【Empty Table WORK_QUEUE】操作。4.在项目文件夹中右键Cleanup操作，应该就可以了。5.SQLLite.exe下载地址：https://download.csdn.net/download/ningyingjun/12827096如果资..
2020-09-09 16:33:00
136
原创 WindowServer2019安装Oracle18c 点击安装没有反应。
需要建立对于oracle版本的文件夹【D:\app\administrator\product\18.3.0】，然后将安装文件放进文件夹。参考图片：如果资源学习了，可以点赞支持！
2020-05-12 13:53:03
788
原创 .NET "未能加载文件或程序集“log4net, Version=1.2.10.0, Culture=neutral,..."的错误
程序中用到了水晶报表（Crystal Reports）在服务器配置时出现的错误。1.水晶报表如果只装运行环境有【CRRuntime_64bit_13_0_21.msi】和【CRRuntime_32bit_13_0_21.msi】的版本。在服务器中都要装上，不用看电脑系统的环境。两个版本的都需要安装。2.Web.config中有log4net的内容。 <compilation debug="true" targetFramework="4.5"> <a
2020-05-09 18:09:38
5415
原创 水晶报表的等待框卡顿的问题（Crystal Reports）
框架中添加Crystal Reports，画面使用时有等待框卡顿的情况，在代码的内存清空之后加上「GC.Collect() 」。程序应该等待框卡顿问题会改善。 With reportDoc '指定通常的打印机 Dim localPrinter As System.Drawing....
2020-03-03 16:31:38
423
原创 Oracle的NLS_LANG设置详细说明（日语系统）
查找Windows的NLS_LANG信息： 开始 -> 运行输入 -> “regedit”, 点击 “ok” HKEY_LOCAL_MACHINE\SOFTWARE\ORACLE 版本 10g 及以上: HKEY_LOCAL_MACHINE\SOFTWARE\ORACLE\KEY_<oracle_home_name> 这个目录里会有属性为NLS...
2020-03-03 15:10:00
1875
原创 BAT文件查询指定目录下的文件名，并且调用BAT文件可以传参数。
A.bat查询指定目录下的文件，并且调用B.bat文件可以传获取的文件名。A.bat@echo off:: 指定路径set dirpath=C:\test:: 搜索的后缀名set ext=txtfor /r "%dirpath%" %%a in (*."%ext%") do (echo %%a:: 带路径的文件，获取文件名，再调用BAT传指定参数for %%b in ...
2020-02-27 22:17:39
761
原创 c#中未能加载CrystalReport的crdb_adoplus.dll文件的问题
CrystalReport的问题描述： 未能加载文件或程序集“file:///C:\Program Files\SAP BusinessObjects\Crystal Reports for .NET Framework 4.0\Common\SAP BusinessObjects Enterprise XI 4.0\win32_x86\dotnet1\crdb_adoplus.dll”或它...
2019-10-08 15:43:14
574
原创 asp.net 里配置WebConfig 解决401.2和403.14的问题
IIS的401.2:拒绝访问webConfig设置 <!--<authorization> <deny users="?"/> </authorization>--> <authorization> <allow users="?"/> </authoriza...
2019-08-08 13:44:16
314
原创 Oracle 创建 DBLink 的方法 （Oracle12可以调用Oracle11的表）
1.tnsnames.ora文件内容ORCL = (DESCRIPTION = (ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(HOST = 127.0.0.1)(PORT = 1521)) ) (CONNECT_DATA = (SERVICE_NAME = orcl) ) )2.相同版...
2019-03-22 16:40:47
1183
原创 Window中office的dll使用 复制sheet和模板使用（Microsoft.Office.Interop.Excel）
'Excel Dim app As Microsoft.Office.Interop.Excel.Application = Nothing Dim workbook As Microsoft.Office.Interop.Excel.Workbook = Nothing Dim sheet As Microsoft.Office....
2019-03-19 14:31:39
1110
原创 Windows 控件 Microsoft.Office.Interop.Excel 复制sheet
Dim app As New Microsoft.Office.Interop.Excel.Application() app.Visible = False app.DisplayAlerts = False Dim wbks As Microsoft.Office.Interop.Excel.Workbooks = app.Wo...
2019-03-14 17:40:16
1834
原创 Oracle 测试存储过程返回的结果集
--返回结果集类型CREATE OR REPLACE PACKAGE PKG IS TYPE T_CURSOR IS REF CURSOR;END;/--存储过程CREATE OR REPLACE PROCEDURE TEST( IN_TBLNM IN VARCHAR2, OUT_CURSOR OUT PKG.T_CURSOR) ISBEGIN IF IN_TBLN...
2019-03-06 16:42:01
1584
原创 Excel出力CreateObject("Excel.Application")
Dim xlApplication = CreateObject("Excel.Application") Dim xlBooks = xlApplication.Workbooks.Add Dim xlSheet = xlBooks.Worksheets(1) Dim strFilePath = comSaveFileDialog(Me, , ,...
2019-01-23 14:41:28
5644
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人