
2008年2月19日 星期二
要修改系統資料表,無法修改的處理方法
-- 修改前 先設定允許修改更新
sp_configure 'allow updates','1'
go
reconfigure with override
go
----- 開始修改系統資料表---
go
-- 修改完後再設定不允許修改更新
sp_configure 'allow updates','0'
go
reconfigure with override
go
sp_configure 'allow updates','1'
go
reconfigure with override
go
----- 開始修改系統資料表---
go
-- 修改完後再設定不允許修改更新
sp_configure 'allow updates','0'
go
reconfigure with override
go
2008年2月18日 星期一
2008年1月27日 星期日
動態建立DataGrid Column
Function CreateBoundColumn(ByVal DataFieldValue As String, ByVal HeaderTextValue As String) As BoundColumn
' This version of CreateBoundColumn method sets only the ' DataField and HeaderText properties.
' Create a BoundColumn. Dim column As BoundColumn = New BoundColumn()
' Set the properties of the BoundColumn. column.DataField = DataFieldValue column.HeaderText = HeaderTextValue
Return column
End Function
Function CreateBoundColumn(ByVal DataFieldValue As String, _ ByVal HeaderTextValue As String, ByVal FormatValue As String, _ ByVal AlignValue As HorizontalAlign) As BoundColumn
' This version of CreateBoundColumn method sets the DataField, ' HeaderText, and DataFormatString properties. It also sets the ' HorizontalAlign property of the ItemStyle property of the column.
' Create a BoundColumn using the overloaded CreateBoundColumn method. Dim column As BoundColumn = CreateBoundColumn(DataFieldValue, HeaderTextValue)
' Set the properties of the BoundColumn. column.DataFormatString = FormatValue column.ItemStyle.HorizontalAlign = AlignValue
Return column
End Function
Function CreateLinkColumn(ByVal NavUrlValue As String, ByVal TargetValue As String, _ ByVal TextValue As String, ByVal HeaderTextValue As String) As HyperLinkColumn
' Create a BoundColumn. Dim column As HyperLinkColumn = New HyperLinkColumn()
' Set the properties of the ButtonColumn. column.NavigateUrl = NavUrlValue column.Target = TargetValue column.Text = TextValue column.HeaderText = HeaderTextValue
Return column
End Function
' This version of CreateBoundColumn method sets only the ' DataField and HeaderText properties.
' Create a BoundColumn. Dim column As BoundColumn = New BoundColumn()
' Set the properties of the BoundColumn. column.DataField = DataFieldValue column.HeaderText = HeaderTextValue
Return column
End Function
Function CreateBoundColumn(ByVal DataFieldValue As String, _ ByVal HeaderTextValue As String, ByVal FormatValue As String, _ ByVal AlignValue As HorizontalAlign) As BoundColumn
' This version of CreateBoundColumn method sets the DataField, ' HeaderText, and DataFormatString properties. It also sets the ' HorizontalAlign property of the ItemStyle property of the column.
' Create a BoundColumn using the overloaded CreateBoundColumn method. Dim column As BoundColumn = CreateBoundColumn(DataFieldValue, HeaderTextValue)
' Set the properties of the BoundColumn. column.DataFormatString = FormatValue column.ItemStyle.HorizontalAlign = AlignValue
Return column
End Function
Function CreateLinkColumn(ByVal NavUrlValue As String, ByVal TargetValue As String, _ ByVal TextValue As String, ByVal HeaderTextValue As String) As HyperLinkColumn
' Create a BoundColumn. Dim column As HyperLinkColumn = New HyperLinkColumn()
' Set the properties of the ButtonColumn. column.NavigateUrl = NavUrlValue column.Target = TargetValue column.Text = TextValue column.HeaderText = HeaderTextValue
Return column
End Function
2008年1月24日 星期四
訂閱:
文章 (Atom)