诗情寻知己 - 博客园

2020年12月7日

摘要： //创建验证码 public static string CreateValidateCode() { string checkCode = string.Empty; Random rnd = new Random(DateTime.Now.Millisecond); char[] chr = { 阅读全文

posted @ 2020-12-07 15:19 诗情寻知己阅读(92) 评论(0) 推荐(0)

2020年9月14日

VB Aspose.Pdf 字体变小方格问题处理

摘要：宋体是这样写的：SimSun原先以为是：宋体先定义字体，在PDF中无法设置，这个找了很久，原来是使用：FontRepository.FindFont方式，这个坑了很久，很多都说是setFont，压根找不到这个方法 Dim font As Aspose.Pdf.Text.Font = Aspose. 阅读全文

posted @ 2020-09-14 16:00 诗情寻知己阅读(867) 评论(0) 推荐(0)

2020年9月3日

C#中使用swagger小技巧

摘要： C#中使用swagger小技巧 swaggerUI显示的接口内容主要用于开发阶段便于与前端联调，不适合发布到对外的站点。有以下两种方式，让接口不显示在SwaggerUI中 1.使用属性 [ApiExplorerSettings(IgnoreApi = true)]设置接口不显示到swaggerUI 阅读全文

posted @ 2020-09-03 11:33 诗情寻知己阅读(3847) 评论(0) 推荐(2)

2019年12月10日

VB 老旧版本维护系列---尴尬的webapi访问返回json对象

摘要：尴尬的webapi访问返回json对象首先Imports Newtonsoft.Json Imports MSXML2（Interop.MSXML2.dll） Dim URLEncode As System.Text.Encoding = System.Text.Encoding.GetEncod 阅读全文

posted @ 2019-12-10 16:05 诗情寻知己阅读(703) 评论(0) 推荐(0)

VB 老旧版本维护系列---兜兜转转有点晕：从服务器通过URL不中转保存的下载

摘要：从服务器通过URL不中转保存的下载首先引用System.dll 然后新开一个页面，空的，在后台Page_Load方法里写 Dim docPath As String =”” Dim fileName As String = Dim myWebClient As New Net.WebClient( 阅读全文

posted @ 2019-12-10 16:04 诗情寻知己阅读(138) 评论(0) 推荐(0)

2019年12月6日

VB 老旧版本维护系列---有点懵逼的webserver访问

摘要：有点懵逼的webserver访问 ‘定义webserver地址 Dim postUrl As String = "" ‘定义webserver所需xml字符串参数 Dim xmlRequest As String = "" ‘获取webserver返回信息 Dim responseText As S 阅读全文

posted @ 2019-12-06 13:32 诗情寻知己阅读(180) 评论(0) 推荐(0)

VB 老旧版本维护系列---读取xml某个节点的值

摘要：读取xml某个节点的值 ‘定义xml字符串内容地址 Dim xmlFileStr As String = "" ‘定义所需读取节点的名称 Dim readNodeName As String = "" Function readXMl(ByVal xmlFileStr As String, ByVa 阅读全文

posted @ 2019-12-06 13:32 诗情寻知己阅读(414) 评论(0) 推荐(0)

VB 老旧版本维护系列---迷之集合- dataTable

摘要：迷之集合- dataTable ‘定义一个datatable，并声明一个空对象 Dim data As DataTable = New DataTable() ‘获取行数 Dim rows As Integer = data.Rows.Count ‘获取每行列名以及值 For Each row As 阅读全文

posted @ 2019-12-06 11:06 诗情寻知己阅读(298) 评论(0) 推荐(0)

VB 老旧版本维护系列---迷之集合- ArrayList

摘要：迷之集合- ArrayList ‘定义一个字符串 Dim dataType_ImageStr As String = "2023,2091,2092,2096,2212" ‘将字符串转化为数组 Dim dataType_Image() As String = dataType_ImageStr.Sp 阅读全文

posted @ 2019-12-06 10:05 诗情寻知己阅读(295) 评论(0) 推荐(0)

2019年10月12日

sql server where case when

摘要： declare @startDate datetime='2019-10-12'declare @endDate datetime ='2019-10-13'declare @SyncType intdeclare @IsSuccess bit SELECT [Id] ,[UpdateBy] ,(c 阅读全文

posted @ 2019-10-12 16:40 诗情寻知己阅读(2872) 评论(0) 推荐(0)