Sanjay

.NET C# Image / Photo Crop Logic

2008-09-08T00:24:35-04:00:00

I just posted an article, tutorial, and code on how to crop an image using asp.net and a javascript library.

You can check it out here!

Google Search Appliance API in VB.NET

2008-08-30T14:57:31-04:00:00

A while back I ported the C# Google Search Appliance API to VB.NET. You can find it here.

The original API was ported over from JAVA by MC+A.

Enjoy!

CSS Tags Specific to Browser [IE6, IE7]

2008-08-28T11:46:52-04:00:00

I came across this posting on Ed Eliot's blog and had NO idea this existed but it made my life a lot easier. Full credit goes to him on this - the below is cut and pasted directly from his blog so I know where to find it in the future. The URL for this post on his blog is:
http://www.ejeliot.com/blog/63

.box {
   background: #00f; /* all browsers including Mac IE */
   *background: #f00; /* IE 7 and below */
   _background: #f60; /* IE 6 and below */
   padding: 7px;
   color: #fff;
}

I think it speaks for itself. In my case, I easily fixed my annoying IE6 problem by applying a negative bottom margin that only applies to IE6. Perfect. I have used conditional statements to load CSS files based on your browser, but this is really helpful for those elements where you need to apply a tag to an element here or there - no point in creating an entirely different CSS file for things like this.

Login Control, ImageButton, Default Button...

2008-08-25T12:09:14-04:00:00

I feel like I do a lot of bitching about the DefaultButton property. But anyway...

What happens when you're using a Login control, and you decide to use an ImageButton for the Login button? You guessed it, you break the DefaultButton property.

''Make the login button of the login control the default button. This is useful when your login control uses an image button.

''Doing so makes the DefaultButton property do nothing.

Dim loginControl As Control = Me.FindControl("Login1")

If Not loginControl Is Nothing Then

Dim loginButton As Control = loginControl.FindControl("LoginButton")

If Not loginButton Is Nothing Then

pnlLogin.DefaultButton = loginButton.UniqueID.Remove(0, pnlLogin.Parent.UniqueID.Length + 1)

End If

Login Control, Default Button, ugh.

2008-08-08T16:34:34-04:00:00

Yes, you can definitely find this information elsewhere but...what happens when you want to use a login control on a page and also use the default button property so when a user hits enter it submits the login control's button. Nothing, because you have no idea what the hell the ID of the submit button is.

Here is the workaround:

<asp:LinkButton ID="lnkbtn1" runat="server" />
<asp:Panel ID="pnlLogin" runat="server" style="display:none" CssClass="modalPopup" DefaultButton="Login1$LoginButton" >
     <div class="modaltext">
    <label id="modalTextMessage" ></label>
    <asp:Login ID="Login1" runat="server" Width="246px" >
    </asp:Login>
    <asp:button id="btnCancel" runat="server" text="Cancel" />
    </div>
</asp:Panel>

Default Button Workaround for imagebuttons & linkbuttons, Part II

2008-08-01T11:56:14-04:00:00

Okay...so, the post yesterday was clearly not as researched as it should have been.

It's true...the Click() event does NOT work in FF...so, the solution I had to utilize the click event had a rather short lifespan.

I tried to dynamically add the __onPostBack javascript event onKeyPress as well as onkeydown - to no avail. I'm not sure why it wouldn't work...but, it just wouldn't. (I'm using an image button, .NET 3.5, a lot of JS & AJAX on the page - not sure what, if any of that muddies the waters)

So...I decided to stick with my core solution, and just find a workaround for the lack of a click() FF event.

I added this to my page..

function FireClick(id){

if ($get(id).dispatchEvent){

var e = document.createEvent("MouseEvents");

e.initEvent("click", true, true);

$get(id).dispatchEvent(e);

}

else

{

$get(id).click();

}

Then, I used this...

tbSearchBox.Attributes.Add("onkeydown", "javascript:if((event.which && event.which == 13) || (event.keyCode && event.keyCode == 13)){FireClick('" _

& btnSearchButton.ClientID & "');return false;}else return true;")

Nothing too special - Basically I'm firing my FireClick() JS event to handle the click() - but seems to work on IE6/7 and FF....

Default Button Workaround for imagebuttons & linkbuttons

2008-07-31T15:08:28-04:00:00

UPDATE: If you're looking for the solution that will work in FireFox & IE...Go here

Okay, I admit, this is yet another post so I know where to go in 3 months when I totally forget this day.

Long story short: I was trying to use the DefaultButton property on a panel in order to get a button clicked by default when a user hits enter on my search form. I was using an ImageButton, and surprise! That won't freakin' work! Seriously...try it.

I came across a post on here ( http://bytes.com/forum/thread288545.html ) from S. Justin Gengo. With a link to his site.... http://www.aboutfortunate.com/Code-Repository.aspx?entryid=14

And booya, his simple JS code works perfectly in IE6/7 & FF.

Good day, sir.

ps - Thank you Justin

___
tbSearchBox.Attributes.Add("onkeydown", _
"javascript:if((event.which && event.which == 13) || (event.keyCode && event.keyCode == 13)){document.getElementById('" _
& btnSearchButton.ClientID & "').click();return false;}else return true;")

Get BehaviorID from Master Page

2008-07-29T14:19:34-04:00:00

You can definitely find this information elsewhere

But...I'm going to put it here right so I know where to go next time :)

I have/had a situation where I had a modal control on my master page - it's what I'm using for a user to log into my application. I have many pages that need to call this - but I needed a way to call the show() method on my modal pop-up, from javascript. Here is the solution...

var modalOnmaster = $find("ctlModalPopupBehavior");
modalOnmaster.show();

Thank you Brett.

Send e-mail with attachment from database image column (sql server 2k5)

2008-01-31T16:44:34-05:00:00

Soooo...I needed to get files out of my SQL Server table (which has the files in an image column) and attach them to an email to send out. I honestly thought this would be a no-brainer but turned out it was pretty finicky. Anyway...the code to so is below just in case anyone is wondering.

    Function SendEmail()
        'Get your data (filename, content type, image column) from the db
        Dim dt As DataTable = GetYourStuff()
 
        If dt.Rows.Count <= 0 Then Return Nothing
 
        Dim msg As System.Net.Mail.MailMessage = New System.Net.Mail.MailMessage()
        msg.Subject = "Sample Message"
        msg.To.Add(New System.Net.Mail.MailAddress("Receiver@yourDomain.com"))
        Dim fromadx As New System.Net.Mail.MailAddress("Sender@yourDomain.com", "Sender Name")
        msg.From = fromadx
        msg.IsBodyHtml = False
        msg.Body = "Sample body..."
 
        Dim strMem As System.IO.MemoryStream = New System.IO.MemoryStream(CType(dt.Rows(0)("ImageColumn"), Byte()))
        Dim strWriter As System.IO.StreamWriter = New System.IO.StreamWriter(strMem)
        strWriter.Flush()
 
        'this is very important..wont work without it
        strMem.Position = 0
 
        'Filename and content type are hardcoded here, but I assume you get them from GetYourStuff() above
        Dim attachment As System.Net.Mail.Attachment = New System.Net.Mail.Attachment(strMem, "myFile.txt", "text/plain")
        msg.Attachments.Add(attachment)
        Dim smtpClient As System.Net.Mail.SmtpClient = New System.Net.Mail.SmtpClient(ConfigurationManager.AppSettings.Item("smtpserver"), 25)
        smtpClient.Send(msg)
    End Function

Alternatives to FindControl()?

2008-01-24T12:55:21-05:00:00

Alright, as much as I try to avoid using FindControl() sometimes I need to get a control by its ID. I came across what seems like a good idea here : http://www.thescripts.com/forum/thread269592.html

It's in C#, but here is the VB.NET adaptation...

  549     Private Sub BuildControlHashTable()
  550         Dim cName As String = String.Empty
  551         For i As Int16 = 0 To Me.Controls.Count - 1
  552             cName = Me.Controls(i).ID
  553             If Not (cName Is Nothing) Then
  554                 cntrlHashTbl.Add(cName, Me.Controls(i))
  555             End If
  556         Next
  557     End Sub
  558     Private Function GetControlByName(ByVal cntrlName As String) As Control
  559         Return CType(Me.cntrlHashTbl(cntrlName), Control)
  560     End Function

Good idea? Bad idea? Thoughts? 

Export to vCard from .NET (VB.NET)

2007-10-31T17:06:27-04:00:00

Hi all -
So was poking around a few weeks ago and couldn't find any code that'll allow me to export data to vcard...The class would require a little modification to utilize, but should get you 90% of the way there

Partial Class vCardExport

Inherits System.Web.UI.Page

Private Const nameFirst As String = "FirstName"

Private Const nameLast As String = "LastName"

Private Const nameMiddle As String = "MiddleName"

Private Const nameTitle As String = "Mr"

Private Const email As String = "firstname.lastname@domain.com"

Private Const uRL As String = "www.geekswithblogs.net/sanjayu"

Private Const telephone As String = "555 555 5555"

Private Const fax As String = "555 555 5555"

Private Const mobile As String = "555 555 5555"

Private Const company As String = "My Company"

Private Const department As String = "My Department"

Private Const mtitle As String = "My Title"

Private Const profession As String = "My Profession"

Private Const office As String = "227"

Private Const addressTitle As String = "New York"

Private Const streetName As String = "42nd Street"

Private Const city As String = "New York"

Private Const region As String = "Northeast"

Private Const postCode As String = "00000"

Private Const counTry As String = "USA"

Protected Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init

eVCard.VCard(Response, nameFirst, nameLast, nameMiddle, nameTitle, email, uRL, telephone, fax, mobile, company, department, mtitle, profession, office, addressTitle, streetName, city, region, postCode, counTry)

End Sub

End Class

Public Class eVCard

Inherits System.ComponentModel.Component

Public Shared Sub VCard(ByVal response As HttpResponse _

, ByVal nameFirst As String _

, ByVal nameLast As String _

, ByVal nameMiddle As String _

, ByVal nameTitle As String _

, ByVal email As String _

, ByVal uRL As String _

, ByVal telephone As String _

, ByVal fax As String _

, ByVal mobile As String _

, ByVal company As String _

, ByVal department As String _

, ByVal title As String _

, ByVal profession As String _

, ByVal office As String _

, ByVal addressTitle As String _

, ByVal streetName As String _

, ByVal city As String _

, ByVal region As String _

, ByVal postCode As String _

, ByVal counTry As String)

response.Clear()

response.Charset = ""

response.ContentType = "text/x-vCard"

Dim stringWrite As System.IO.StringWriter = New System.IO.StringWriter()

Dim htmlWrite As System.Web.UI.HtmlTextWriter = New HtmlTextWriter(stringWrite)

stringWrite.WriteLine("BEGIN:VCARD")

stringWrite.WriteLine("VERSION:2.1")

stringWrite.WriteLine("N:" + nameLast + ";" + nameFirst _

+ ";" + nameMiddle + ";" + nameTitle)

stringWrite.WriteLine("FN:" + nameFirst + " " + nameMiddle _

+ " " + nameLast)

stringWrite.WriteLine("ORG:" + company + ";" + department)

stringWrite.WriteLine("URL;WORK:" + uRL)

stringWrite.WriteLine("TITLE:" + title)

stringWrite.WriteLine("ROLE:" + profession)

stringWrite.WriteLine("TEL;WORK;VOICE:" + telephone)

stringWrite.WriteLine("TEL;WORK;FAX:" + fax)

stringWrite.WriteLine("TEL;CELL;VOICE:" + mobile)

stringWrite.WriteLine("EMAIL;PREF;INTERNET:" + email)

stringWrite.WriteLine("ADR;WORK;ENCODING=QUOTED-PRINTABLE:" + ";" + _

office + ";" + addressTitle + "=0D" + streetName + ";" + _

city + ";" + region + ";" + postCode + ";" + _

counTry)

stringWrite.WriteLine("END:VCARD")

response.Write(stringWrite.ToString())

response.End()

End Sub

End Class

"Cannot drop the queue 'SqlQueryNotificationService-{GUID}', because it does not exist or you do not have permission."

2007-08-21T10:44:53-04:00:00

Working on my first SQL 2K5 application here...and came across this error trying to implement the SqlNotificationService. I read a lot on this error...However, I was able to avoid this error by simply making the current user of own the DB.

1. Security > Users > [select the user your application is accessing the DB as]
2. Select properties (right click)
3. Find and check your DB schema in the list of "Owned Schemas"
4. Ensure "DB Owner" is checked off in the "Role Members" list

That's it...