Phoenix的天空
Any Program
摘要: 首先代码创建Activity: 创建Workflow: 在Branch1中创建一个变量myVar, 然后在创建的Activity中设置Result为myVar, 这个myVar会接收这个Activity创建Bookmark时返回的值. 测试: 阅读全文
posted @ 2018-05-21 12:50 Phoenix Huang 阅读(104) 评论(0) 推荐(0) 编辑
摘要: 最近在学习WF, 把自己的一些学习心得放上来 Bookmark允许你以事件驱动的方式与一个Workflow内的Activity进行交互. 如果把启动一个workflow比做开始读一本书, 在Workflow中的Bookmark起到的就是和书中的Bookmark一样的作用, 就是标记现在到哪了, 以后 阅读全文
posted @ 2018-05-21 11:17 Phoenix Huang 阅读(162) 评论(0) 推荐(0) 编辑
摘要: Public Class Form1 '定义委托 Private Delegate Sub MyMsg(ByVal str As String) '实现委托,方法签名与前面定义的委托相同 Private Sub showmsg(ByVal str As String) MessageBox.Show(str & " from showmsg") End Sub '实现另一个委托,,方法签名与前面定义的委托相同 Private Sub shownamemsg(ByVal str As String) MessageBox.Show(str &a 阅读全文
posted @ 2011-06-29 22:41 Phoenix Huang 阅读(244) 评论(0) 推荐(0) 编辑
摘要: 在用Oledb读取Excel时, 如果某一列混和了文本和数字, 会出现后续不同类型数据为空的现象. 这是因为Excel根据前面的数据类型进行了推断, 导致不同类型的数据无法读取.这时候我们需要在connectionstring里加上"Extended Properties='Excel 8.0;HDR=Yes;IMEX=1'".HDR=Yes是指第一行包括列名IMEX=1是指对于混了文本和数字的列, 咱们统一用文本来进行处理. 阅读全文
posted @ 2011-06-09 19:58 Phoenix Huang 阅读(805) 评论(0) 推荐(0) 编辑
摘要: 在app.config中修改: <startup useLegacyV2RuntimeActivationPolicy="true"> <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.0" /> </startup>然后: Dim SQLconnect As New SQLite.SQLiteConnection() Dim SQLcommand As SQLiteCommand SQLconnect.Connection 阅读全文
posted @ 2011-06-08 17:27 Phoenix Huang 阅读(1782) 评论(4) 推荐(0) 编辑
摘要: 在xtragrid inline编辑模式中使用RepositoryItemDateEdit时, Editformat和DisplayFormat都是只读的. 想要修改, 需要用下面的代码:RepositoryItemDateEditri=newRepositoryItemDateEdit();ri.EditMask="yyyy-MM-dd HH;mm:ss";ri.Mask.UseMaskAsDisplayFormat=true; 阅读全文
posted @ 2011-06-01 19:47 Phoenix Huang 阅读(851) 评论(0) 推荐(0) 编辑
摘要: 为公司写的管理程序. 最开始用的是纯SQL, Spgen生成存储过程.后来想想, 不方便使用, 想看看用NetTiers如何.NetTiers不方便使用手动拼接的SQL. 因为公司的某些要求又不能放弃, 只好弃用NetTiers.后来看到EF支持调用手动拼的SQL, 又动了心思.今天花了几个小时把程序改过来了, 没有碰到什么难点, 很顺利, 体会到了EF的好处, 以后就靠它了. 阅读全文
posted @ 2011-05-29 16:57 Phoenix Huang 阅读(335) 评论(0) 推荐(0) 编辑
摘要: '主要是执行ExecuteStoreQuery. 但是这货返回的是实体....如果你想返回部分数据, 还得再来一次.... Dim x As New IVOEntities Dim y = x.ExecuteStoreQuery(Of Interviewers)("select * from interviewers") '在内存中再挑一次, 坑爹呢.... Dim z = From a In y Select a.IntId, a.IntName Me.DataGridView1.DataSource = z.ToList 阅读全文
posted @ 2011-05-28 22:38 Phoenix Huang 阅读(897) 评论(0) 推荐(0) 编辑
摘要: 1)DataLayout可以自动根据绑定的数据生成需要的label和Text. 不过它需要设计时支持.我研究了下如何动态绑定, 上代码: x = New InterviewersService Dim t As Interviewers = x.GetByIntid("100002") Dim y As New BindingList(Of Interviewers) y.Add(t) Me.DataLayoutControl1.DataSource = y Me.DataLayoutControl1.RetrieveFields()2)那么在修改后如何写回去呢?继续上: 阅读全文
posted @ 2011-05-27 16:41 Phoenix Huang 阅读(2380) 评论(0) 推荐(0) 编辑
摘要: 今天开始尝试使用NetTiers, 记下一些注意事项.1)Codesmith生成NetTiers, 这个就不说了. 生成后直接打开VS, build2)建立一个新的项目. 把生成报告中的config, data, connectionstring加进app.config中3)引入XX.data, XX.entities,XX.data.sqlclient4)保存项目, 把编译选项中的target改成.net framework 4.0, 不是client profile, 不然XX.data的引用会报错5)如果要取得某些表, 要用DataRepository.XXXProvider.getAl 阅读全文
posted @ 2011-05-24 17:17 Phoenix Huang 阅读(331) 评论(0) 推荐(0) 编辑