工作上遇到，必需把vb6制成的dll放入Win2008R2 64bit 中運行在IIS7+ASP上，

但總是無法正常運作，而在搜尋各解答過程中，

總是沒有一個完整的解決辦法，所以特此記錄完整的解決辦法，

首先如何使註冊一個 32bitDLL 至 Win2008R2 64bit，

步驟1.先把 DLL copy 至 C:\Windows\SysWOW64 底下

步驟2.切換目錄至 C:\Users\Administrator>cd c:\windows\syswow64

步驟3.註冊DLL C:\Windows\SysWOW64>regsvr32 YOUR_DLL.dll

以上就完成了，不過要注意的是要用『管理者模式』才能註冊成功，

接下來就要驗証註冊是否成功(客戶常常會問這句話)，

先開啟 regedit，

(繼續閱讀...)

【吉恩雜七雜八】 發表在 痞客邦 留言(0) 人氣()

▲top

用LINQ來組條件，只能透過Where來組合，有兩大缺點，

1.每一個條件都必需使用if來判斷是否為空值或null

2.每組合一次都必需查詢一次，

為了解決以上這兩個缺點，

所以我在網上找到一個利用泛型與foreach，來組合Where條件。

   1:   
   2:  using System;
   3:  using System.Collections.Generic;
   4:  using System.Linq;
   5:  using System.Text;
   6:  using System.IO;
   7:  using System.Data.Linq.Mapping;
   8:  using System.Reflection;
   9:  using System.Linq.Expressions;
  10:  //using EnterpriseTester;
  11:   
  12:  namespace MvcBancas.DynamicExtensions
  13:  {
  14:      //動態組合 LINQ 條件語法
  15:      //EX：
  16:      //    ////取得條件
  17:      //    //vwTargetao test = new vwTargetao();
  18:      //    //test.target_ym = vw.target_ym;
  19:      //    //test.id_no = vw.id_no;
  20:      //    //test.comm_line_code = vw.comm_line_code;
  21:      //    ////執行
  22:      //    //var Query = db.vwTargetao.AsExpandable().Find<vwTargetao>(test, true);
  23:      //    TEntity obj： 查詢條件
  24:      //    bool isAnd ： true：AND  false：OR
  25:      public static class DynamicExtensions
  26:      {
  27:          public static IQueryable<TEntity> Find<TEntity>(this IQueryable<TEntity> source, TEntity obj, bool isAnd) where TEntity : class
  28:          {
  29:              if (source == null)
  30:                  throw new ArgumentNullException("Source can't be null!!");
  31:              //獲得所有property的信息
  32:              PropertyInfo[] properties = obj.GetType().GetProperties(BindingFlags.Public | BindingFlags.Instance);
  33:   
  34:              Expression condition = null;
  35:              //先構造了一個ParameterExpression對象，這裡的c，就是Lambda表達中的參數。（c=>）  
  36:              //本變量被移出了foreach循環
  37:              ParameterExpression param = Expression.Parameter(typeof(TEntity), "c");
  38:              //遍歷每個property
  39:              foreach (PropertyInfo p in properties)
  40:              {
  41:                  if (p != null)
  42:                  {
  43:                      Type t = p.PropertyType;
  44:                      //只支持value型和string型的影射
  45:                      if (t.IsValueType || t == typeof(string))
  46:                      {
  47:                          //不為null才算做條件
  48:                          if (p.GetValue(obj, null) != null)
  49:                          {
  50:                              //SQL Server does not support comparison of TEXT, NTEXT, XML and IMAGE ,etc
  51:                              ///Only support BigInt,Bit,Char,Decimal,Money,NChar,Real,
  52:                              ///Int,VarChar,SmallMoney,SmallInt,NVarChar,NVarChar(MAX),VarChar(MAX)
  53:                              Attribute attr = Attribute.GetCustomAttribute(p, typeof(ColumnAttribute));
  54:                              if (attr != null)
  55:                              {
  56:                                  string dbType = (attr as ColumnAttribute).DbType;
  57:                                  if (dbType.Contains("Text") || dbType.Contains("NText")
  58:                                      || dbType.Contains("Xml") || dbType.Contains("Image")
  59:                                      || dbType.Contains("Binary") || dbType.Contains("DateTime")
  60:                                      || dbType.Contains("sql_variant") || dbType.Contains("rowversion")
  61:                                      || dbType.Contains("UniqueIdentifier") || dbType.Contains("VarBinary(MAX)"))
  62:                                  {
  63:                                      continue;
  64:                                  }
  65:                              }
  66:   
  67:                              if (p.Name == "EntityState") continue; //排除EntityState，執行會發生錯誤
  68:                              
  69:                              //此兩種型態NULL會代入最小預設值
  70:                              if (p.PropertyType.FullName == "System.Decimal" || p.PropertyType.FullName == "System.DateTime") //continue;  
  71:                              {
  72:                                  //if (p.GetValue(obj,0) == 0)
  73:                                  continue;                            
  74:                              }
  75:   
  76:                              if (p.PropertyType.FullName == "System.Int32" || p.PropertyType.FullName == "System.Int16")
  77:                              {
  78:                                  //if (p.GetValue(obj,0) == 0)
  79:                                  continue;
  80:                              }
  81:   
  82:                              //構造表達式的右邊，值的一邊
  83:                              Expression right = Expression.Constant(p.GetValue(obj, null), p.PropertyType);
  84:   
  85:                              //構造表達式的左邊，property一端。
  86:                              Expression left = Expression.Property(param, p.Name);
  87:                              
  88:                              //生成篩選表達式。即c.CustomerID == "Tom"
  89:                              Expression filter = Expression.Equal(left, right);
  90:                              if (condition == null)
  91:                              {
  92:                                  condition = filter;
  93:                              }
  94:                              else
  95:                              {
  96:                                  if (isAnd)
  97:                                      condition = Expression.And(condition, filter);
  98:                                  else
  99:                                      condition = Expression.Or(condition, filter);
 100:                              }
 101:                          }
 102:                      }
 103:                  }
 104:              }
 105:              if (condition != null)
 106:              {
 107:                  Expression<Func<TEntity, bool>> pred = Expression.Lambda<Func<TEntity, bool>>(condition, param);
 108:                  return source.Where(pred);
 109:              }
 110:              return source;
 111:   
 112:          }
 113:   
 114:   
 115:          public static IQueryable<TEntity> Find<TEntity>(this IQueryable<TEntity> source, TEntity obj) where TEntity : class
 116:          {
 117:              return Find<TEntity>(source, obj, true);
 118:          }
 119:   
 120:   
 121:          //EX：db.Customers.WhereOr("City", new List<string> { "London", "BeiJing" }).ToList();
 122:          //類似於 in 的用法
 123:          public static IQueryable<TEntity> WhereOr<TEntity, OrType>(this IQueryable<TEntity> source, string propertyName, IEnumerable<OrType> values)
 124:          {
 125:              if (source == null)
 126:                  throw new ArgumentNullException("Source can't be null!!");
 127:              ParameterExpression param = Expression.Parameter(typeof(TEntity), "p");
 128:              Expression left = Expression.Property(param, propertyName);
 129:              Expression condition = null;
 130:              foreach (OrType value in values)
 131:              {
 132:                  Expression filter = Expression.Equal(left, Expression.Constant(value));
 133:                  if (condition == null)
 134:                      condition = filter;
 135:                  else
 136:                      condition = Expression.Or(condition, filter);
 137:              }
 138:              if (condition != null)
 139:                  return source.Where((Expression<Func<TEntity, bool>>)Expression.Lambda(condition, param));
 140:   
 141:              return source;
 142:          }
 143:   
 144:   
 145:   
 146:      }
 147:  }

當然，這也還沒包含『like』的語法，不過依照此架構，其實也不難擴充。

最後，再來介紹，如何使用，範例如下：

   1:  //取得條件
   2:              //targetao
   3:              targetao WhereVw = new targetao();
   4:              WhereVw.target_ym = vw.target_ym;
   5:              WhereVw.id_no = vw.id_no;
   6:              WhereVw.comm_line_code = vw.comm_line_code;
   7:   
   8:              //proj
   9:              proj WherePj = new proj();
  10:              WherePj.proj_name = vw.proj_name;
  11:   
  12:              //channels
  13:              channels WhereCh = new channels();
  14:              WhereCh.chan_name = vw.chan_name;
  15:   
  16:   
  17:   
  18:              TargetaoViewModels ViewModel = new TargetaoViewModels();
  19:   
  20:              //執行
  21:              ////多Table回傳用ViewModels
  22:              var Query = from a in db.targetao.Find<targetao>(WhereVw, true)
  23:                          join b in db.proj.Find<proj>(WherePj, true)         
  24:                                 on a.proj_no equals b.proj_no
  25:                          join c in db.channels.Find<channels>(WhereCh, true) 
  26:                                 on a.comm_line_code equals c.comm_line_code
  27:                          select new TargetaoViewModels
  28:                          {
  29:                              TargetaoM = a,
  30:                              ProjM = b,
  31:                              ChannelsM = c
  32:                          };
(繼續閱讀...)

【吉恩雜七雜八】 發表在 痞客邦 留言(0) 人氣()

  • 個人分類：LINQ
▲top

 

它是在網站上的某些特定網頁需要安全通訊端層 (SSL) 的作法經常良好的安全性。雖然這可以設定透過 [網際網路服務管理員 (ISM) 在 Microsoft 管理主控台 (MMC)，也可以使用動態伺服器網頁 (ASP) 強制特定頁面的 SSL，而不會在 MMC 中進行變更。

必要條件

本文假設下列條件：

· IIS 在標準連接埠上執行：

o HTTP = 連接埠 80

o HTTPS = 連接埠 443

· IIS 有安裝有效的 SSL 憑證。

· 網站或虛擬伺服器，用不使用 HTTP/1.1 主機標頭進行名稱解析。

強迫使用 ASP 的 SSL

(繼續閱讀...)

【吉恩雜七雜八】 發表在 痞客邦 留言(0) 人氣()

▲top

關於連動下拉之議題早就是個很古老的議題，

解決辦法有些是完全使用SERVER端程式來處理，例：ASP，

這樣會讓整個畫面更新一次 ，如此的作法早就不太被人採用，

由其JQUERY出現之後，就更少人會採用如此的作法，

而我原本也是想試看看使用JQUERY+ASP來解決這問題，

但，我並沒有找到太多的資源來協助我(因為我對JQUERY一點也不熟)，

所以我決定採用JS+ASP，來開發。

第一，先準備連動下拉的資料，並把它存入 JS變數中，

把APS的資料存成 CODE1:TEXT1，……，CODEn:TEXTn，

再將整串的字串存放入strOrgType_<%=上一層CODE%>，

(繼續閱讀...)

【吉恩雜七雜八】 發表在 痞客邦 留言(0) 人氣()

▲top