由於網站的user來自全世界各地，而我們網站產生的時間卻是Server的時間
因此需要使用javascript來做一些轉換，讓user看到是他當地的時間

1. Server端產生具有時區的時間字串，用特定的span + class把它包起來, 時間格式 DateTime.ToUniversalTime().ToString("r")
     

<span class="timeString">Fri, 31 Aug 2012 10:57:04 GMT</span>

2. Client端利用jQuery於網頁load的時候將所有時間轉換成當地時間
    這個地方我用了  date.format.js 來轉換成當地時間 (參考  http://blog.stevenlevithan.com/archives/date-time-format  )
   

     $(".timeString").each(function () {
            var content = $(this).text();

            var d = new Date(content);

            if (!isNaN(d)) $(this).text(d.format("yyyy-mm-dd hh:MM tt"));

        }); 
    

這樣user看到的時間就不會錯了

從 http://blog.ie-soft.de/post/2007/12/globalasax-events.aspx  抄來的. 留作參考

HttpApplication Events:

Application_AcquireRequestState
Occurs when ASP.NET acquires the current state (for example, session state) that is associated with the current request. 

Application_AuthenticateRequest
Occurs when a security module has established the identity of the user. 

Application_AuthorizeRequest
Occurs when a security module has verified user authorization. 

Application_BeginRequest
Occurs as the first event in the HTTP pipeline chain of execution when ASP.NET responds to a request. 

Application_Disposed
Adds an event handler to listen to the Disposed event on the application. 

Application_EndRequest
Occurs as the last event in the HTTP pipeline chain of execution when ASP.NET responds to a request. 

Application_Error
Occurs when an unhandled exception is thrown. 

Application_PostAcquireRequestState
Occurs when the request state (for example, session state) that is associated with the current request has been obtained. 

Application_PostAuthenticateRequest
Occurs when a security module has established the identity of the user. 

Application_PostAuthorizeRequest
Occurs when the user for the current request has been authorized. 

Application_PostMapRequestHandler
Occurs when ASP.NET has mapped the current request to the appropriate event handler. 

Application_PostReleaseRequestState
Occurs when ASP.NET has completed executing all request event handlers and the request state data has been stored. 

Application_PostRequestHandlerExecute
Occurs when the ASP.NET event handler (for example, a page or an XML Web service) finishes execution. 

Application_PostResolveRequestCache
Occurs when ASP.NET bypasses execution of the current event handler and allows a caching module to serve a request from the cache. 

Application_PostUpdateRequestCache
Occurs when ASP.NET completes updating caching modules and storing responses that are used to serve subsequent requests from the cache. 

Application_PreRequestHandlerExecute
Occurs just before ASP.NET begins executing an event handler (for example, a page or an XML Web service). 

Application_PreSendRequestContent
Occurs just before ASP.NET sends content to the client. 

Application_PreSendRequestHeaders
Occurs just before ASP.NET sends HTTP headers to the client. 

Application_ReleaseRequestState
Occurs after ASP.NET finishes executing all request event handlers. This event causes state modules to save the current state data. 

Application_ResolveRequestCache
Occurs when ASP.NET completes an authorization event to let the caching modules serve requests from the cache, bypassing execution of the event handler (for example, a page or an XML Web service). 

Application_UpdateRequestCache
Occurs when ASP.NET finishes executing an event handler in order to let caching modules store responses that will be used to serve subsequent requests from the cache. 

Application_Init
This method occurs after _start and is used for initializing code. 

Application_Start
As with traditional ASP, used to set up an application environment and only called when the application first starts.

Application_End
Again, like classic ASP, used to clean up variables and memory when an application ends.

Session Events:

Session_Start
As with classic ASP, this event is triggered when any new user accesses the web site.

Session_End
As with classic ASP, this event is triggered when a user's session times out or ends. Note this can be 20 mins (the default session timeout value) after the user actually leaves the site.

Profile Events:

Profile_MigrateAnonymous
Occurs when the anonymous user for a profile logs in.

Passport Events:

PassportAuthentication_OnAuthenticate
Raised during authentication. This is a Global.asax event that must be named PassportAuthentication_OnAuthenticate.
 

Possibly more events defined in other HttpModules like:

System.Web.Caching.OutputCacheModule
System.Web.SessionState.SessionStateModule
System.Web.Security.WindowsAuthentication
System.Web.Security.FormsAuthenticationModule
System.Web.Security.PassportAuthenticationModule
System.Web.Security.UrlAuthorizationModule
System.Web.Security.FileAuthorizationModule
System.Web.Profile.ProfileModule

Client Side 的 HTML 如下: (若要在 CKEditor 中使用, 請參考: CKEditor 中貼上剪貼簿(clipboard) 中的圖片)

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">



<html xmlns="http://www.w3.org/1999/xhtml">

<head>

<title></title>

<script type="text/javascript" src="/Scripts/jquery-1.7.1.min.js"></script>



<script type="text/javascript">

$(document).ready(function () {

$(window).bind("paste", function () {

if (event.clipboardData) {

var clipboardData, found;

found = false;

clipboardData = event.clipboardData;



Array.prototype.forEach.call(clipboardData.items, function (item, i) {

if (item.type.indexOf("image") !== -1) {

var blob = clipboardData.items[i].getAsFile();

var URL = window.URL || window.webkitURL;

var source = URL.createObjectURL(blob);



pastedImage = new Image();

pastedImage.src = source;

pastedImage.onload = function () {

var canvas = document.createElement("canvas");

var ctx = canvas.getContext("2d");



canvas.width = pastedImage.width;

canvas.height = pastedImage.height;

ctx.drawImage(pastedImage, 0, 0);



var base64 = canvas.toDataURL();

base64 = base64.substring(base64.indexOf("iVBOR"));



$.ajax({

url: "/API/AddTaskImages.aspx",

async: false,

type: "POST",

data: ({

Image: base64

}),

dataType: "html",

success: function (msg) {

var oRes;

try {

oRes = eval(msg);

}

catch (err) {

alert("無法解析傳回資料 !");

alert(msg);

alert(err);

}

if (oRes.success) {

alert("Upload Success..");

//alert(oRes.msg);

$("#MyImageDataLoadDemo").attr("src", oRes.msg);

} else {

alert(oRes.msg);

}

},

error: function (xhr, ajaxOptions, thrownError) {

alert(xhr.status);

alert(thrownError);

}

})

};



return false;

}

});

}

});

});

</script>

</head>

<body>







<div id="hold">

<div id="imgHold"><img src="" id="MyImageDataLoadDemo"></div>

<div>Click on the area above and ctrl+p an image to paste</div>

</div>

</body>

</html>

Server Side 的程式碼如下:

Partial Class API_AddTaskImages

Inherits System.Web.UI.Page



Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load

'DB.sysconfig.Path.TaskAttachment



Dim Base64 As String = Me.Request("Image")

'UW.JSON.WriteErrorMessage(Base64)



'Return





Dim imageBytes As Byte() = Convert.FromBase64String(Me.Request("Image"))



Dim ms As System.IO.MemoryStream = New System.IO.MemoryStream(imageBytes, 0, imageBytes.Length)



ms.Write(imageBytes, 0, imageBytes.Length)

Dim image As System.Drawing.Image = System.Drawing.Image.FromStream(ms, True)



Dim map As Bitmap





Dim Filename As String = Now.ToString("yyyyMMddHHmmssfff") & ".png"



Try

System.IO.Directory.CreateDirectory(DB.sysconfig.Path.TaskAttachment & "UploadImages")

image.Save(DB.sysconfig.Path.TaskAttachment & "UploadImages\" & Filename, System.Drawing.Imaging.ImageFormat.Png)



UW.JSON.WriteSuccessMessage(DB.sysconfig.URL.TaskAttachment & "UploadImages/" & Filename)

Catch ex As Exception

UW.JSON.WriteErrorMessage(ex.ToString)

End Try



End Sub

End Class

狀況

手札的圖片共享目錄約三~四天會無法開啟(\\192.168.0.7 直接掛掉)
對應的服務 Server 會無法重新開啟

在 Windows 2008 Server 將 SMB2.0 => SMB 1.0 方法
參考連結 http://www.petri.co.il/how-to-disable-smb-2-on-windows-vista-or-server-2008.htm

Client  關閉
sc config lanmanworkstation depend= bowser/mrxsmb10/nsi
sc config mrxsmb20 start= disabled

Client 重開
sc config lanmanworkstation depend= bowser/mrxsmb10/mrxsmb20/nsi
sc config mrxsmb20 start= auto

Server
HKLM\System\CurrentControlSet\Services\LanmanServer\Parameters\Smb2 => 設為 Dword 0
需重開機，開機完後 Client 連不到也需重開

設好後，這些背後靈又出現要設了。
HKLM\System\CurrentControlSet\Services\LanmanWorkstation\Parameters\MaxCmds => 500 以上
HKLM\System\CurrentControlSet\Services\LanmanServer\Parameters\MaxMpxCt =>500 以上
HKLM\System\CurrentControlSet\Services\LanmanServer\Parameters\MaxWorkItems => 5000以上

設完後有以下現象。
系統管理工具=>共用與存放管理=>管理工作階段  
每個連線的開啟檔案數是會增加減少跳動的，在SMB2.0下僅會緩慢增加
 

兩個問號相連可以處理原物件是 null 的情況簡潔寫法

// 當Form沒有傳入 ArticleCategory, 則回傳空值

string strCategoryIDs = Request.Form["ArticleCategory"] == null ? string.Empty : Request.Form["ArticleCategory"];

-->

string strCategoryIDs = Request.Form["ArticleCategory"] ?? string.Empty;

最近遇到客戶的電腦三不五時無法連接檔案分享的問題, 查了一下 Windows 2008 和 Win 7 很多網路問題都可能和 Auto Tuning 有關, 以下是關閉的方法.

顯示網路狀態:

netsh interface tcp show global

關閉 Auto Tuning:

netsh interface tcp set global autotuning=disabled

開啟 Auto Tuning:

netsh interface tcp set global autotuningl=normal

2012/05/19
嘿嘿 .. 問題又發生了, 看來沒什麼效果..

在 SVN 中, 對大型開發案而言, Commit  時的 Memo (log message) 會是很重要的東西. 但常常會忘了寫, 事後要修改才發現, 預設是不能改的. 若要修改, 在 D:\Repositories\Project Name\hooks 底下新增一個的 pre-revprop-change.bat 檔案, 只是每個 Project 都要分開加, 還滿討厭的...

pre-revprop-change.bat 的內容如下:

if "%4" == "svn:log" exit 0

echo Property '%4' cannot be changed >&2

exit 1

 

主要是使用 Printing.PreviewPrintController 的產生預覽圖片的功能來儲存列印內容, 再把圖片送到印表機, 以保証列印內容和儲存的圖檔是一致的. 值得一提的是, 在預覽時可以使用不同的印表機, 以便讓產生較小的圖檔, 否則有時會發生 GDI+ 的錯誤.

Sample 如下:

Imports System.Drawing.Printing

Namespace X

    Partial Public Class PrintSomething

        Dim PD As PrintDocument

        Dim ppc As New Printing.PreviewPrintController()

        Dim TotalPage As Int32 = 0

        ''' <summary>

        ''' 第幾次列印, 用來控制寫出的圖檔

        ''' </summary>

        ''' <remarks></remarks>

        Dim PrintCount As Int32 = 1

        Dim PageCount As Int32 = 1

            :

            :

            :

      

        Sub New(ByVal oPM As DB.PackingListMain, ByVal dtDetail As DataTable, dtUsedCoupon As DataTable)

            '初始化資料

            :

            :

            :

        End Sub

        Sub InitPrintDocument()

            '在這裡設定 PrintDocument 的紙張, 印表機, 邊界, 橫印或直印

            PD = New PrintDocument

            :

            :

            :

        End Sub

        Sub print()

            InitPrintDocument()

            PD.PrintController = ppc

           

            ' 第一次先把列印結果存在 Printing.PreviewPrintController 中

            AddHandler PD.PrintPage, AddressOf GeneratePreview

            '再來儲存圖片

            AddHandler PD.EndPrint, AddressOf SaveImage

            PD.Print()

        End Sub



        Dim ppi() As Printing.PreviewPageInfo

        Dim PrintPage As Int32 = 0

        Sub SaveImage(ByVal sender As Object, ByVal ev As PrintEventArgs)

            PrintDebug("Save Image Start, " & Now.ToString("yyyy-MM-dd HH:mm:ss.fff"))

            '把圖檔存起來

            Dim TF As String = Now.ToString("yyyyMMddHHmmss") ' DB.SysConfig.Path.LocalDataRoot

            Dim PathLocal As String = "C:\PrintLog\" & TF.Substring(0, 4) & "-" & TF.Substring(4, 2) & "\"

            Dim PathPackingListSheetImage As String = DB.SysConfig.PackingListSheetImage & TF.Substring(0, 4) & "-" & TF.Substring(4, 2) & "\"

            System.IO.Directory.CreateDirectory(PathLocal)

            System.IO.Directory.CreateDirectory(PathPackingListSheetImage)

            Dim LatestImages As String = ""

            ppi = ppc.GetPreviewPageInfo()

            For x As Integer = 0 To ppi.Length - 1

                Dim Filename As String = TF & "_" & Me.oPM.Id & "_" & x & ".png"

                ppi(x).Image.Save(PathLocal & Filename, System.Drawing.Imaging.ImageFormat.Png)

            Next



            '把圖檔印出來

            For x As Integer = 0 To ppi.Length - 1

  '建立新的 PrintDocument

                InitPrintDocument()

                If CST.WebConfig.Server_NAME = "測試主機" Then

                    UW.WU.DebugWriteLine("PrinterName: " & Me.PD.PrinterSettings.PrinterName)

                    UW.WU.DebugWriteLine("PaperSize: " & PD.DefaultPageSettings.PaperSize.PaperName)

                    PD.DocumentName = "PackingList"

                    PD.PrinterSettings.PrintFileName = "C:\PDF\PackingList" & Now.ToString("yyyyMMddHHmmss") & "_" & PrintPage & ".prn"

                    PD.PrinterSettings.PrintToFile = True

                    'PD.PrinterSettings.

                End If

                '很奇怪, 這裡不會分頁, 所以要一張一張印   

                AddHandler PD.PrintPage, AddressOf pd_PrintPage2

                PD.Print()



               PrintPage += 1

            Next

        End Sub

        Private Sub pd_PrintPage2(ByVal sender As Object, ByVal ev As PrintPageEventArgs)

            '很奇怪, 這裡不會分頁, 所以要一張一張印           

            ev.Graphics.DrawImage(ppi(PrintPage).Image, 0, 0)

            ev.HasMorePages = False

        End Sub



        Private Sub GeneratePreview(ByVal sender As Object, ByVal ev As PrintPageEventArgs)

            ' 列印內容

        End Sub

        End Class

    End Class

End Namespace

在 Select 指令後, 依據結果做一些工作, 即使有 Transaction, 但還是有可能發生一致性的問題:

Ex:

        Dim Conn As SqlConnection = UW.SQL.GetOpenedConnection

        Dim Tran As SqlTransaction = Conn.BeginTransaction

        Try

            Dim C As Int32 = UW.SQL.GetSingleValue("Select Counter From TableA Where Id = 1", Tran)

            C = C + 1

            UW.SQL.executeSQL("Update TableA Set Counter = " & C & " Where  Id = 1", Tran)

            Tran.Commit()

        Catch ex As Exception

            Tran.Rollback()

            UW.WU.DebugWriteLine(ex.ToString, True, True)

        Finally

            If Conn.State <> ConnectionState.Closed Then

                Conn.Close()

            End If

        End Try

以上的程式由兩個 Session 同時執行時, 並不能保証 Counter 會被加 2

若是要保証兩個 Session 都會把 Counter 加一(總共加 2), 要把以下這一行

Dim C As Int32 = UW.SQL.GetSingleValue("Select Counter From TableA Where Id = 1", Tran)

改為

Dim C As Int32 = UW.SQL.GetSingleValue("Select Counter From TableA With(XLock) Where Id = 1", Tran)

※windows元件


※framework 1.1
※IIS未出現1.1選項，註冊1.1

cmd

cd C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322

Aspnet_regiis.exe -u

Aspnet_regiis.exe -i

※aspx no work
開始=>執行=>

regsvr32 C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll

※framework 2.0
※註冊2.0

cmd

cd C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727

Aspnet_regiis.exe -u

Aspnet_regiis.exe -i