Wednesday, February 25, 2009

Creating a XML document in .Net

Creating a XML document with C#
using System;
using System.Xml;

namespace AlokKumarSinha
class MainClass
XmlDocument xmldoc;
XmlNode xmlnode;
XmlElement xmlelem;
XmlElement xmlelem2;
XmlText xmltext;
static void Main(string[] args)
MainClass app=new MainClass();
public MainClass() //constructor
xmldoc=new XmlDocument();
//let's add the XML declaration section
//let's add the root element
xmltext=xmldoc.CreateTextNode("root text");
//let's add another element (child of the root)
xmltext=xmldoc.CreateTextNode("The text of the child1 element");
//let's try to save the XML document in a file: C:\alok.xml
xmldoc.Save("c:\alok.xml"); //I've chosen the c:\ for the resulting file alok.xml
catch (Exception e)

Creating a XML document with VB.Net

Class MainClass
Private xmldoc As XmlDocument
Private xmlnode As XmlNode
Private xmlelem As XmlElement
Private xmlelem2 As XmlElement
Private xmltext As XmlText
Private Shared Sub Main(ByVal args As String())
Dim app As New MainClass()
End Sub
Public Sub New()
xmldoc = New XmlDocument()
'let's add the XML declaration section
xmlnode = xmldoc.CreateNode(XmlNodeType.XmlDeclaration, "", "")
'let's add the root element
xmlelem = xmldoc.CreateElement("", "root", "")
xmltext = xmldoc.CreateTextNode("root text")
'let's add another element (child of the root)
xmlelem2 = xmldoc.CreateElement("", "Child1", "")
xmltext = xmldoc.CreateTextNode("The text of child1")
'let's try to save the XML document in a file: C:\alok.xml
xmldoc.Save("c:" & vbNullChar & "alok.xml")
'I've chosen the c:\ for the resulting file alok.xml
Catch e As Exception
End Try
End Sub
End Class

Saturday, February 7, 2009

To add a search engine to web page

To add a search engine to my web page that my users be able to search content of my website(all the pages not only the first page) ::
1. Visit This link::

2.To have internal ASP.NET Search engine for your pages, have a look here: Internal Site Search Engine
To have google search engine on your websitem, follow this link:

Monday, February 2, 2009

Code for Downloading and Uploading Files in

Code for downloading files ::
Sub Page_Load(Sender As Object, E As EventArgs)
Dim strRequest As String = Request.QueryString("file") '-- if something was passed to the file querystring If strRequest <> "" Then 'get absolute path of the file Dim path As String = Server.MapPath(strRequest) 'get file object as FileInfo Dim file As System.IO.FileInfo = New System.IO.FileInfo(path) '-- if the file exists on the server If file.Exists Then 'set appropriate headers Response.Clear() Response.AddHeader("Content-Disposition", "attachment; filename=" & file.Name) Response.AddHeader("Content-Length", file.Length.ToString()) Response.ContentType = "application/octet-stream" Response.WriteFile(file.FullName) Response.End 'if file does not exist Else Response.Write("This file does not exist.") End If 'nothing in the URL as HTTP GET Else Response.Write("Please provide a file to download.")
End If
End Sub
Code for uploading the Files::
in markup side::-
asp:FileUpLoad id="FileUpLoad1" AlternateText="You cannot upload files" runat="server"
asp:Button id="Button1" Text="Upload" OnClick="Button1_Click" runat="server"
asp:Label id="Label1" runat="server"
---------------------in CodeBehind::
Sub Button1_Click(sender As Object, e As EventArgs) if FileUpLoad1.HasFile 'Uncomment this line to Save the uploaded file 'FileUpLoad1.SaveAs("C:\SomePhysicalPath" & FileUpLoad1.Filename) Label1.Text = "Received " & FileUpLoad1.FileName & " Content Type " & FileUpLoad1.PostedFile.ContentType & " Length " & FileUpLoad1.PostedFile.ContentLength else Label1.Text = "No uploaded file" end if end sub