sudesh

Asp.net core app creatoin and publishing to Azure App Service

noreply@blogger.com (Sudesh) — Mon, 5 Sep 2022 22:12:00 +0530

https://docs.microsoft.com/en-us/aspnet/core/getting-started/?view=aspnetcore-6.0&tabs=windows https://docs.microsoft.com/en-us/azure/app-service/quickstart-dotnetcore?tabs=net60&pivots=development-environment-vscode

noreply@blogger.com (Sudesh) — Wed, 7 Aug 2019 16:21:00 +0530

passing uploaded document as a steam to a webservice from a sharepoint eventhandler

noreply@blogger.com (Sudesh) — Mon, 18 Oct 2010 23:34:00 +0530

public override void ItemAdded(SPItemEventProperties properties)
{

//SPFile file1 = properties.ListItem.File;

SPSite site = new SPSite("http://win-ofut34hh848:33738");
using (SPWeb web = site.OpenWeb())
{
SPFolder folder = web.GetFolder("http://win-ofut34hh848:33738/TestDocLib");

int a = properties.AfterUrl.IndexOf('/') + 1;
int b = properties.AfterUrl.Length - (properties.AfterUrl.IndexOf('/') + 1);
SPFile file = folder.Files[properties.AfterUrl.Substring(a,b) ];
//byte[] buffer = new byte[];
//file.SaveBinary(buffer);
Stream m = file.OpenBinaryStream();// new MemoryStream(buffer);

ServiceReference1.Service1Client sc = new ServiceReference1.Service1Client();
sc.GetData(m);
}

//}
}

Calling a web service from a SharePoint event handler

noreply@blogger.com (Sudesh) — Mon, 18 Oct 2010 20:48:00 +0530

High level steps are as follows:

1. Create the Envent reciver for the list using the Visual Studio templete.
2. Add a web reference to WCF Service.
3. Deploy the Event handler.
4. Register the Event handler.
5. Copy the WebReference folder into Site Virtual Directory in C:\inetpub\wwwroot\wss\VirtualDirectories\[port]
6. Add the App.config code inthe web.config file

SharePoint Document Library display of documents with path

noreply@blogger.com (Sudesh) — Sun, 17 Oct 2010 14:28:00 +0530

class Program
{
static void Main(string[] args)
{
SPSite site = new SPSite("http://win-ofut34hh848:33738");
using (SPWeb web = site.OpenWeb())
{
//SPList list = web.GetList("/TestDocLib");
//SPListItemCollection folders = list.Folders;
SPFolder folder = web.GetFolder("http://win-ofut34hh848:33738/TestDocLib");

//if (folder.Folder == SPFo)
foreach (SPFolder f in folder.SubFolders)
{
//foreach (SPFolder sf in f.SubFolders)
//{
Console.WriteLine(folder.Name + " \\ " + f.Name + " \n"); //+ sf.Name + "\n" );

foreach (SPFile file in f.Files)
{
Console.WriteLine(" :::: " + file.Name);
}
Console.WriteLine();

//}

}

}

Console.Read();

}
}

Messaging

noreply@blogger.com (Sudesh) — Thu, 27 May 2010 22:34:00 +0530

MessageQueue myMQ;

public Form1()
{
InitializeComponent();
}

private void button1_Click(object sender, EventArgs e)
{
myMQ = new MessageQueue(@".\Private$\InteropQueue");

if (myMQ != null && !MessageQueue.Exists(myMQ.Path))
{
myMQ = MessageQueue.Create(@".\Private$\InteropQueue");

}

System.Messaging.Message msg = new System.Messaging.Message();
msg.Body = "Test";

myMQ.Send(msg);
}

MessageQueue mq;
System.Messaging.Message msg;
private void button2_Click(object sender, EventArgs e)
{
mq = new MessageQueue(@".\Private$\InteropQueue");

Type[] types = new Type[1];
types[0] = typeof(String);
mq.Formatter = new XmlMessageFormatter(types);

try
{
// Call receive on queue
msg = mq.Receive(new TimeSpan(0, 0, 100)); // 5 is wait time in seconds
// Assign to variable
MessageBox.Show(msg.Body.ToString());
}
catch( Exception ex)
{
MessageBox.Show(ex.Message);
}

CTE SQL Server 2

noreply@blogger.com (Sudesh) — Sun, 6 Dec 2009 17:12:00 +0530

WITH TestCTE (ID
,Name
,ParentId
,Level)
AS
(
SELECT ID
,Name
,ParentId
,0 Level
FROM dbo.MyFirends F1P
UNION ALL
SELECT F.ID
,F.Name
,F.ParentId
,Level - 1
FROM dbo.MyFirends F
INNER JOIN TestCTE CTE ON F.ID = CTE.ParentId
)

select ID
,Name
,ParentId
,-1*Level
from TestCTE C

CTE SQL Server

noreply@blogger.com (Sudesh) — Sun, 6 Dec 2009 17:11:00 +0530

http://msdn.microsoft.com/en-us/library/ms190766.aspx

CREATE TABLE [dbo].[MyFirends](
[ID] [int] NULL,
[Name] [nchar](10) NULL,
[Date] [date] NULL,
[Address] [nchar](100) NULL,
[ParentId] [int] NOT NULL
) ON [PRIMARY]

-------------------------------------------------------------

WITH TestCTE (ID
,Name
,ParentId
,Level)
AS
(
SELECT ID
,Name
,ParentId
,0 Level
FROM dbo.MyFirends F1P
WHERE ParentId = 0
UNION ALL
SELECT F.ID
,F.Name
,F.ParentId
,Level + 1
FROM dbo.MyFirends F
INNER JOIN TestCTE CTE ON F.ParentId = CTE.ID
)

select ID
,Name
,ParentId
,Level
from TestCTE C

Real time refreshing charts in WPF

noreply@blogger.com (Sudesh) — Sun, 24 May 2009 19:03:00 +0530

Charts in WPF
There are sample applications and UI controls both commercial and freely available. Below 1) and 2) supports real time updating. Except the 1) and 2); with rest of the other tools the real time refreshing need to happen from the application by loading the chart periodically.

Visfire supports both windows and web applications with built in real time updating support. Both open source and commercial version (with customer support and many features) is available.

1) A WPF Sample application for a live updating line graph

Below sample application was downloaded and tested. It contains few user controls and custom classes written from scratch with tickers and lines for generating a ticking line graph.
http://decav.com/blogs/andre/archive/2007/08/25/live-updating-line-graph-in-wpf.aspx

2) Visifire

Visifire is an open Source data visualization component which can be used to create charts very quickly.
http://visifire.com/

Single API to both Silverlight & WPF
Possible to use with desktop applications (WPF), Silverlight and WPF browser applications
Embed into Desktop or Web Applications in minutes
Real time Charts / Live Update
Any property of Visifire charts can be updated in realtime. Visifire 2.0 supports realtime update from both javascript & managed code.
http://code.google.com/p/visifire/
http://visifire.com/silverlight_charts_gallery.php
Tiny footprint
Enterprise grade features
Microsoft Expression Blend compatible
Chart look and feel can be customized. Visifire charts can be designed in Microsoft Expression Blend.
Dual License - Open Source & Commercial
Open Source GPL 3.0 license
Commercial license with customer support and many features
Features: http://visifire.com/visifire_features.php
Samples are available with visifire downloads. In order to chart to get updated data points should be created programmatically and added to the chart.

3) Swordfish Charts

http://johnstewien.spaces.live.com/blog/cns!E6885DB5CEBABBC8!444.entry

This is an initial level project at sourceforge. Sample code is available for downloading.
http://sourceforge.net/projects/swordfishcharts
licensed under A Public Domain dedication

4) Telerik UI Controls for reporting

Telerik is a commercially available set of UI controls for reports. UI controls are available for WPF and Silverlight for reporting. Demos, online forums and documentation with great customer support are provided.
http://www.telerik.com/
Below sample application is for WPF chart using Telerik Rad controls for WPF. A lot of look and feel customizations and themes are possible with these UI controls.
http://blogs.telerik.com/manoldonev/posts/09-01-06/WPF_Customizing_the_chart_series_appearance_in_RadChart.aspx

5) Essential Chart for WPF

http://www.syncfusion.com/products/wpf/chart?gclid=CKS4oo3i0ZoCFQogegodBR9rDw
http://www.syncfusion.com/products/wpf/chart/line-charts

pet

noreply@blogger.com (Sudesh) — Thu, 23 Apr 2009 21:35:00 +0530

Virtual Pet by FooPets.com

How to view Sinhalese Unicode characters in Windows XP SP2

noreply@blogger.com (Sudesh) — Tue, 31 Mar 2009 15:33:00 +0530

How to view Sinhalese Unicode characters in Windows XP SP2

Control Panel -> Date, Time, Language, and Regional Options -> Regional and Language Options
Select Languages tab
In The supplemental language support select the below two options.
1) Install files for complex script and right-to-left languages (Including Thai)
2) Install files for East Asian languages

You may prompt for SP2 CD. Provide the appropriate CD and proceed with the installation.

Install sinhala enabling kit from below URL:
http://www.siyabas.lk/sinhala_how_to_install.html#win

SQL Server table partitioning for performance

noreply@blogger.com (Sudesh) — Sun, 29 Mar 2009 22:48:00 +0530

SQL Server 2005
http://msdn.microsoft.com/en-us/library/ms345146(SQL.90).aspx

SQL Server 2008 Provides wizard for partitioning:
http://msdn.microsoft.com/en-us/library/dd578580.aspx

File System Encryption for Windows (Free)

noreply@blogger.com (Sudesh) — Sun, 1 Mar 2009 09:39:00 +0530

EFS (Encrypting File System)

EFS aviable with windows provides file encryption for free and works transparently with the os.

1) Open Windows Explorer and select the file you want to encrypt
2) Right-click the chosen file and select Properties from the context menu.
3) Select the Advanced button to enable EFS.
4) Encrypt the file by selecting the Encrypt contents to secure data check box as shown in Figure below. Click OK.

http://technet.microsoft.com/en-us/library/bb457065.aspx

JavaScript client for e-jabberd (Open Source chat server - chat client)

noreply@blogger.com (Sudesh) — Sun, 22 Feb 2009 16:49:00 +0530

Below are open source chat server and client suitable for enterprise usage.

Chat Server : ejabberd
http://www.ejabberd.im/

Chat Client : jwchat
http://blog.jwchat.org/jwchat/

Below url explains how to configure ejabberd with jwchat.
http://www.ejabberd.im/jwchat-localserver

my home

noreply@blogger.com (Sudesh) — Sat, 21 Feb 2009 22:48:00 +0530

View Larger Map

noreply@blogger.com (Sudesh) — Sat, 7 Feb 2009 15:27:00 +0530

Call a WCF Service from Classic ASP

noreply@blogger.com (Sudesh) — Sun, 1 Feb 2009 12:33:00 +0530

Dim wsdl, moniker, obj

wsdl = GetWsdlFromUrl("http://localhost:8731/Design_Time_Addresses/WcfServiceLibrary1/Service1/?wsdl")

moniker = "service:wsdl=" & wsdl & ", "
moniker = moniker + "address=http://localhost:8731/Design_Time_Addresses/WcfServiceLibrary1/Service1/,"
moniker = moniker + "contract=IService1, "
moniker = moniker + "contractNamespace=http://tempuri.org/, "
moniker = moniker + "binding=WSHttpBinding_IService1, "
moniker = moniker + "bindingNamespace=http://tempuri.org/"

Set objProxy = GetObject(moniker)

Dim str
str = objProxy.GetData("2")
Response.Write(str)

Function GetWsdlFromUrl(strUrl)

Dim winHttpReq, resp

Set winHttpReq = CreateObject("WinHttp.WinHttpRequest.5.1")
resp = winHttpReq.Open("GET", strUrl, False)
winHttpReq.Send

GetWsdlFromUrl = winHttpReq.ResponseText

End Function

noreply@blogger.com (Sudesh) — Sun, 18 Jan 2009 18:37:00 +0530

My Virtual Rainforest

(33 trees)

Plant some trees for me

noreply@blogger.com (Sudesh) — Wed, 14 Jan 2009 09:40:00 +0530

send mail using gmail smtp server

try
{

MailMessage mm = new MailMessage(From.Trim(),To);
mm.BodyEncoding = Encoding.UTF7;
mm.Subject = Subject.Trim();
mm.Body = MessageTxt.Trim() + "\n";
mm.Priority = MailPriority.High;
mm.IsBodyHtml = false;

if (FileSt != "")
{
Attachment msgAtt = new Attachment(FileSt);
mm.Attachments.Add(msgAtt);
}

SmtpClient sc = new SmtpClient();

sc.Credentials = new System.Net.NetworkCredential("sudesh.withanage", "priyanka");
sc.Port = 587;
sc.Host = "smtp.gmail.com";
sc.EnableSsl = true;
// sc.SendCompleted +=new SendCompletedEventHandler();

sc.Send(mm);

MessageBox.Show("success");

}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}

gmail pop

pop.gmail.com

995

gmail smtp

587
smtp.gmail.com

SQL CLR

noreply@blogger.com (Sudesh) — Tue, 22 Jan 2008 21:16:00 +0530

using System;
using System.Data;
using System.Data.SqlTypes;

public class MyCLRFunc
{
[Microsoft.SqlServer.Server.SqlFunction]
public static SqlString MyCLRHelloFunction()
{
return new SqlString("Hello everybody, I'm form SQLCLR!");
}
};

Create assembly MyUDFCLR from 'K:\Users\Sudesh\Desktop\MyCLRFunc.dll'

create function MyCLRHelloFunction()
Returns nvarchar(50)
External name MyUDFCLR.MyCLRFunc.MyCLRHelloFunction;
Go

select dbo.MyCLRHelloFunction()

Crystal Reports changing logon infomation

noreply@blogger.com (Sudesh) — Tue, 22 Jan 2008 18:20:00 +0530

Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared

' this is the class for connecting crystal reports to database
' applies logoninfo

Public Class Creports

'returns a ReportDocument after applying logoninfo for the passed report
Public Function connect(ByVal rpt5 As ReportDocument) As ReportDocument

Dim tbCurrent As Table
Dim tbLogOnInfo As TableLogOnInfo

Try
'apply LogOn info for each table of the report document
For Each tbCurrent In rpt5.Database.Tables
tbLogOnInfo = tbCurrent.LogOnInfo

With tbLogOnInfo.ConnectionInfo
.ServerName = mod_1.serverName
.UserID = mod_1.userName
.Password = mod_1.password
.DatabaseName = mod_1.dataBaseName
End With

tbCurrent.ApplyLogOnInfo(tbLogOnInfo)
'tbLogOnInfo = tbCurrent.LogOnInfo
'tbLogOnInfo.ConnectionInfo.ServerName = serverName
'tbLogOnInfo.ConnectionInfo.UserID = userName
'tbLogOnInfo.ConnectionInfo.Password = password
'tbLogOnInfo.ConnectionInfo.DatabaseName = databaseName
'tbCurrent.ApplyLogOnInfo(tbLogOnInfo)
Next tbCurrent

Return rpt5

Catch lsExp As LoadSaveReportException
MessageBox.Show(lsExp.Message)
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try

End Function

End Class