Protected Sub Page_PreLoad(sender As Object, e As EventArgs) Handles Me.PreLoad

        SHOPUNT.GN.WSC.CheckLogin()                                     '檢查是否有登入、否則導回Login

        SHOPUNT.GN.WSC.CheckRightOrStop(SHOPUNT.EN.AuthCode.廣告管理)   '檢查是否有廣告編輯的權限

    End Sub



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

        HandleAction()

    End Sub



    Sub HandleAction()

        If UW.WU.IsNonEmptyFromQueryStringOrForm("Action") Then

            Dim Action As String = UW.WU.GetValueFromQueryStringOrForm("Action")

            Select Case Action

            End Select

        End If

    End Sub



    Protected Sub Page_PreRender(sender As Object, e As EventArgs) Handles Me.PreRender

        'Me.Master.strTitle = "目錄管理"

        'Me.Master.IsListItemScript = True

        LoadPageContext()

    End Sub



    Sub LoadPageContext()



    End Sub

Smooth Gestures 

是這裡分享的>>​幸運草的吉光片羽

他還有分享其他很好用的套件,大家可以安裝來用用唷~

        Dim d As Date = Now

        Dim n As Decimal = 86400.99

        Dim Cultures() As String = {"zh-TW", "pt-BR", "pt-PT", "en-US", "en-GB", "fr-FR", "de-DE", "es-ES", "ja-JP", "zh-CN", "ko-KR", "en-IN"}

        For i As Integer = 0 To Cultures.GetUpperBound(0)

            Dim c As New Globalization.CultureInfo(Cultures(i))

            Response.Write(Cultures(i) & "<br/>" & d.ToString("D", c) & " <br/>" & d.ToString("d", c) & "<br/>" & n.ToString("C", c))

            Response.Write("<hr/>")

        Next

zh-TW

2013年12月25日

2013/12/25

NT$86,400.99



pt-BR

quarta-feira, 25 de dezembro de 2013

25/12/2013

R$ 86.400,99



pt-PT

quarta-feira, 25 de Dezembro de 2013

25-12-2013

86.400,99 €



en-US

Wednesday, December 25, 2013

12/25/2013

$86,400.99



en-GB

25 December 2013

25/12/2013

£86,400.99



fr-FR

mercredi 25 décembre 2013

25/12/2013

86 400,99 €



de-DE

Mittwoch, 25. Dezember 2013

25.12.2013

86.400,99 €



es-ES

miércoles, 25 de diciembre de 2013

25/12/2013

86.400,99 €



ja-JP

2013年12月25日

2013/12/25

¥86,401



zh-CN

2013年12月25日

2013/12/25

￥86,400.99



ko-KR

2013년 12월 25일 수요일

2013-12-25

₩86,401



en-IN

25 December 2013

25-12-2013

₹ 86,400.99

-- To allow advanced options to be changed.開啟進階選項

EXEC sp_configure 'show advanced options', 1

GO

-- To update the currently configured value for advanced options.執行動作

RECONFIGURE

GO

-- To enable the feature.開啟xp_cmdshell功能

EXEC sp_configure 'xp_cmdshell', 1

GO

-- To update the currently configured value for this feature.執行動作

RECONFIGURE

GO





DECLARE @DBPath nvarchar(120)

--指定磁碟機Z的路徑為\\192.168.8.201\SQLBackupLeon

exec master..xp_cmdshell 'net use z: \\192.168.8.201\SQLBackupLeon 密碼 /user:帳號'

--指定備份路徑檔名

SET @DBPath = 'Z:\' + 'ReikoTEST' + '_' + Convert(varchar(10),Getdate(),112) + Replace(Convert(varchar(8),Getdate(),108),':','') + '.bak'

--DATENAME(Weekday,GETDATE())=>會顯示為"星期N"

--SET @DBPath = 'Z:\' + 'Leon' + '_' + DATENAME(Weekday,GETDATE()) + '.bak'

--備份資料庫ReikoTEST到路徑檔名

BACKUP DATABASE ReikoTEST TO DISK = @DBPath

--刪除磁碟機Z

exec master..xp_cmdshell 'net use Z: /delete'

GO





-- To enable the feature.關閉xp_cmdshell功能

EXEC sp_configure 'xp_cmdshell', 0

GO

-- To update the currently configured value for this feature.執行動作

RECONFIGURE

GO

-- To allow advanced options to be changed.關閉進階選項

EXEC sp_configure 'show advanced options', 0

GO

-- To update the currently configured value for advanced options.執行動作

RECONFIGURE

GO