03.08.10
by

ASP.NET Datagrid Find Footer Controls

How to Find Control and convert to Text box, so we can manipulate data:
Find Header Controls

Ctype(Datagrid1.Controls(0).Controls(0).FindControl("txtInHeader"),TextBox)

Find Footer Controls

Ctype(Datagrid1.Controls(0).Controls(Datagrid1.Controls(0).Controls.Count - 1).FindControl("txtInFooter"),TextBox)

How To Summary data in DataGrid, for example :

Dim x As Integer
Dim dblTotalHour As Double = 0
Dim iTemTS As DataGridItem
For x = 0 To grdTimeSheet.Items.Count - 1
iTemTS = grdTimeSheet.Items(x)
dblTotalHour = dblTotalHour + CDbl(CType(iTemTS.FindControl(TextBoxTSHour), TextBox).Text) 'Count all
Next

10.30.09
by

IIS Problem when running multiple framework in one machine

.NET FRAMEWORK TROUBLESHOOT

1. DOTNET 1.1 Already Installed But IIS service Didn’t running.
Solution:
– To show currently dotnet versions in our system, type aspnet_regiis.exe –lv

– Re-install dotnet version 1.1 in console:

Note: using aspnet_regiis.exe –i will set scriptmap to this dotnet version (default dotnet version) will use in IIS Manager.

– Restart IIS service, then run web in your system

2. Run Multiple dotnet framework in one machine.
Solution:
– Make sure all service running in your IIS

If you cannot find this screen : add Web Service Extensions Manually :
1. Uninstall your dotnet framework that you want to add in Web Service extensions first:

2. Add New Web Service Extensions

3. Input Extension Name and Select the File Path from : C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\ aspnet_isapi.dll << FOR DOTNET 1.1 installation

OR

C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\ aspnet_isapi.dll << FOR DOTNET 2 installation

This picture below is sample when adding Web Extension for dotnet 1.1

4. Make sure all framework allowed to run:

5. Your IIS Environment ready to run Multiple Dotnet Framework Together.

09.11.09
by

Hide / Encrypt ASP.NET Query String

Just found tips on internet, how to hide querystring value.
I prefer to encrypt them..

Imports System
Imports System.IO
Imports System.Xml
Imports System.Text
Imports System.Security.Cryptography

Private key() As Byte = {}
Private IV() As Byte = {&H12, &H34, &H56, &H78, &H90, &HAB, &HCD, &HEF}

Public Function Decrypt(ByVal stringToDecrypt As String, _
ByVal sEncryptionKey As String) As String
Dim inputByteArray(stringToDecrypt.Length) As Byte
Try
key = System.Text.Encoding.UTF8.GetBytes(Left(sEncryptionKey, 8))
Dim des As New DESCryptoServiceProvider()
inputByteArray = Convert.FromBase64String(stringToDecrypt)
Dim ms As New MemoryStream()
Dim cs As New CryptoStream(ms, des.CreateDecryptor(key, IV), _
CryptoStreamMode.Write)
cs.Write(inputByteArray, 0, inputByteArray.Length)
cs.FlushFinalBlock()
Dim encoding As System.Text.Encoding = System.Text.Encoding.UTF8
Return encoding.GetString(ms.ToArray())
Catch e As Exception
Return e.Message
End Try
End Function

Public Function Encrypt(ByVal stringToEncrypt As String, _
ByVal SEncryptionKey As String) As String
Try
key = System.Text.Encoding.UTF8.GetBytes(Left(SEncryptionKey, 8))
Dim des As New DESCryptoServiceProvider()
Dim inputByteArray() As Byte = Encoding.UTF8.GetBytes( _
stringToEncrypt)
Dim ms As New MemoryStream()
Dim cs As New CryptoStream(ms, des.CreateEncryptor(key, IV), _
CryptoStreamMode.Write)
cs.Write(inputByteArray, 0, inputByteArray.Length)
cs.FlushFinalBlock()
Return Convert.ToBase64String(ms.ToArray())
Catch e As Exception
Return e.Message
End Try
End Function

How to use ?
Just encrypt your string..
Response.redirect(“Http://HaqyServer/ViewProduct.aspx?ID=”& Encrypt(ProductID, “MyKey123”) )

Source : http://www.devcity.net/articles/47/1/encrypt_querystring.aspx