ASP.NET

Parwej Ahamad1-Feb-07 1:18

Parwej Ahamad

1-Feb-07 1:18

.NET Classes used :
System.Data.DataSet
System.Data.OleDb.OleDbDataAdapter
System.Data.OleDb.
System.IO.StringWriter
System.Web.UI.HtmlTextWriter
This application uses a FileField (UploadFile)(HTML control) , One label (lblMessage), Button (btnSubmit), Button (btnExportToExcel), DataGrid (DataGrid1), This also explains how to upload a file.

Imports System
Imports System.Data
Imports System.Data.OleDb
Imports System.IO

Code :

Private Sub btnSubmit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSubmit.Click
Dim intFileNameLength As Integer
Dim strFileNamePath As String
Dim strFileNameOnly As String

If Not (UploadFile.PostedFile Is Nothing) Then
strFileNamePath = UploadFile.PostedFile.FileName

intFileNameLength = InStr(1, StrReverse(strFileNamePath), "\")

strFileNameOnly = Mid(strFileNamePath, (Len(strFileNamePath) - intFileNameLength) + 2)
Dim paths = Server.MapPath("/excelreading/")

paths = paths & "Excel/"

'If File.Exists(paths & strFileNameOnly) Then
'lblMessage.Text = "Image of Similar name already Exist,Choose other name"
'Else
If UploadFile.PostedFile.ContentLength > 40000 Then
lblMessage.Text = "The Size of file is greater than 4 MB"
ElseIf strFileNameOnly = "" Then
Exit Sub
Else
strFileNameOnly = Session("AdminID") & "-" & Session("Acountry") & "-" & Format(Date.Today, "mm-dd-yyyy").Replace("/", "-") & ".xls"
UploadFile.PostedFile.SaveAs(paths & strFileNameOnly)
lblMessage.Text = "File Upload Success."
Session("Img") = strFileNameOnly
End If
End If
'End If

Dim myDataset As New DataSet()
Dim strConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Server.MapPath("/excelreading/") & "excel/" & strFileNameOnly & ";" & _
"Extended Properties=Excel 8.0;"

''You must use the $ after the object you reference in the spreadsheet
Dim myData As New OleDbDataAdapter("SELECT * FROM [Sheet1$]", strConn)
myData.TableMappings.Add("Table", "ExcelTest")
myData.Fill(myDataset)

DataGrid1.DataSource = myDataset.Tables(0).DefaultView
DataGrid1.DataBind()
End Sub

Private Sub btnExportToExcel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExportToExcel.Click
' Set the content type to Excel.
Response.ContentType = "application/vnd.ms-excel"
' Remove the charset from the Content-Type header.
Response.Charset = ""
' Turn off the view state.
Me.EnableViewState = False

Dim tw As New System.IO.StringWriter()
Dim hw As New System.Web.UI.HtmlTextWriter(tw)

' Get the HTML for the control.
DataGrid1.RenderControl(hw)
' Write the HTML back to the browser.
Response.Write(tw.ToString())
' End the response.
Response.End()
lblMessage.Text = "For any more information , feel free to contact ...!!!"
End Sub

ref : http://www.dotnetspider.com/kb/Article361.aspx

Parwej Back...............DON of Developer.......
Parwej Ahamad
g_parwez@rediffmail.com

Sandeep Akhare1-Feb-07 3:09

1-Feb-07 3:09

Search for macro in Excel easy and faster

gauthee1-Feb-07 23:08

gauthee

1-Feb-07 23:08

could you throw more light on this!!!

Gautham

Sandeep Akhare2-Feb-07 2:06

2-Feb-07 2:06

Ya Macro is in VB and is Excel Language it is always better to write Macro than Using Excel Object You will find on net search by 'reading data Excel macro'

Sandeep Akhare2-Feb-07 2:15

Why OleDbCommand call oracle9i user function success,but OleDbCommand call failed.

2-Feb-07 2:15

OPen the Excel sheet GO to tools macro and Visual basic Editor find examples from net how to get data from Excel using macro

Old Gun1-Feb-07 0:56

Old Gun

1-Feb-07 0:56

/* This is my oracle function
*/
create or replace function EngUnitConvert(sSrcEng in varchar2, sDstEng in varchar2)
return number
is
AtLeastLostOneCoefficient exception;
vSrcEng Number;
vDstEng Number;
vValue Number;
BEGIN
begin
-- Get source
SELECT Mult_Fctr
INTO vSrcEng
From ip_eng_unit t
WHERE t.units = UPPER(sSrcEng);
dbms_output.put_line('Source Coefficient :' || to_char(vSrcEng));
-- Get destination
SELECT Mult_Fctr
INTO vDstEng
From ip_eng_unit t
WHERE t.units = UPPER(sDstEng);
dbms_output.put_line('Destination Coefficient :' || to_char(vDstEng));
if ((vSrcEng is null) or (vDstEng is null)) then
dbms_output.put_line('At Least Lost One Coefficient!');
raise AtLeastLostOneCoefficient;
else
vValue := vDstEng / vSrcEng;
dbms_output.put_line('Result Coefficient :' || to_char(vValue));
end if;
dbms_output.put_line('Finished!');
return vValue;
end;
exception
when AtLeastLostOneCoefficient
then null;
WHEN OTHERS THEN NULL;
END;
/*
This is my OleDbCommand call,but it failed
*/
// here OleDbConnecton have opened
OleDbCommand sqlcmd = new OleDbCommand();
sqlcmd.CommandText = "unitconvert";
sqlcmd.CommandType = CommandType.StoredProcedure;
sqlcmd.Connection = olecn;// olecn -- OleDbConnecton
OleDbParameter ps = new OleDbParameter("s_from_eng",System.Data.OleDb.OleDbType.VarChar,32);
ps.Direction = System.Data.ParameterDirection.Input;
ps.Value = sFromUnit;
OleDbParameter pd = new OleDbParameter("s_from_eng",System.Data.OleDb.OleDbType.VarChar,32);
pd.Direction = System.Data.ParameterDirection.Input;
pd.Value = sToUnit;
OleDbParameter pr = new OleDbParameter("vvalue",System.Data.OleDb.OleDbType.Numeric,16);
pr.Direction = System.Data.ParameterDirection.ReturnValue;
sqlcmd.Parameters.Add(ps);
sqlcmd.Parameters.Add(pd);
sqlcmd.Parameters.Add(pr);

sqlcmd.ExecuteNonQuery();
string sValue = sqlcmd.Parameters["vValue"].Value.ToString();

/*
The error messages is:
*/
ORA-06550: line 1, column 7:\nPLS-00201: identifier 'UNITCONVERT' must be declared\nORA-06550: line 1, column 7:\nPL/SQL: Statement ignored

/*
Here is OracleDbCommand call,it success
*/

OracleConnection orcn=new OracleConnection("user id=totalplant;data source=totalplant;password=totalplant");
OracleCommand cmd=new OracleCommand("unitconvert",orcn);
cmd.CommandType=CommandType.StoredProcedure;
OracleParameter p1=new OracleParameter("s_from_eng",OracleType.VarChar,32);
p1.Direction=System.Data.ParameterDirection.Input;
p1.Value= "g";
OracleParameter p2=new OracleParameter("s_to_eng",OracleType.VarChar,32);
p2.Direction=System.Data.ParameterDirection.Input;
p2.Value= "tonne";
OracleParameter p3=new OracleParameter("vValue",OracleType.Number,100);
p3.Direction=System.Data.ParameterDirection.ReturnValue;
cmd.Parameters.Add(p1);
cmd.Parameters.Add(p2);
cmd.Parameters.Add(p3);
orcn.Open();
cmd.ExecuteNonQuery();
orcn.Close();

User Control

aaraaayen1-Feb-07 0:11

aaraaayen

1-Feb-07 0:11

Hi,

I have created user control called UserCtrl.ascs in my solution which includes two textboxes in that usercontrol and and also i have added the following code in .ascx.cs page.

public string pUser
{
get
{
return TextBox1.Text.Trim;
}
set
{
TextBox1.Text = value;
}
}

public string pPass
{
get
{
return TextBox2.Text.Trim;
}
set
{
TextBox2.Text = value;
}

I added that user control to my aspx page. Please tell me how to use that textboxes inside aspx.cs page.

Thanks in Advance,

Regards,

Prya

Re: User Control

blue_arc1-Feb-07 1:48

blue_arc

1-Feb-07 1:48

create object of that user control class, and and set the value of properties...

Re: User Control

Sandeep Akhare1-Feb-07 3:01

problem with datagrid-paging

1-Feb-07 3:01

this.UserCtrl.TextBox1.value this way Smile | :)

Re: User Control

DavidNohejl1-Feb-07 11:35

DavidNohejl

1-Feb-07 11:35

As blue_arc said, you use user control from page codebehind same way as if it was standard ASP.NET web control.

Assuming you have in your aspx file:

<uc:userCtrl runat="server" id="myCtrl"/>

in codebehind do:

string password = myCtrl.pPass;

Is it clear? Smile | :)

You should not try to access textboxes directly, as it goes against encapsulation principle (hence I downvoted guy above me :P).

"Throughout human history, we have been dependent on machines to survive. Fate, it seems, is not without a sense of irony. " - Morpheus

Interview Material

rrcc31-Jan-07 23:08

rrcc

31-Jan-07 23:08

Hi,
Can any1 provide me ASP.NET 2.0 or 1.1 interview questions or FAQs????.. If u have compiled list then send it to ganesh_d1@yahoo.com

Thanx in advance.

Re: Interview Material

rrcc31-Jan-07 23:35

rrcc

31-Jan-07 23:35

I want it for ASP.NET with C#.

Re: Interview Material

_AK_31-Jan-07 23:44

_AK_

31-Jan-07 23:44

use google.. you will get faq related to the topic in abundance..

Best Regards,
Apurva Kaushal

info abt whiteboard

Sebastian T Xavier31-Jan-07 22:55

Sebastian T Xavier

31-Jan-07 22:55

hai,
anybody knows anything about whiteboard technology. how to use that in asp.net webapplications.
please give some tips

thanks in advance

sebastian

sanaziuse31-Jan-07 22:53

31-Jan-07 22:53

Hi everybody
I have used a datagrid in my form. and every thing is Ok.
I can see the items I want in datagrid but the problem is about paging.
I have set the paging to 5 ..it means the datagrid should show 5 items in page 1 and the next 5 items in the next page( page 2 ) and ...
but it doesnt work ... it shows the page but when I click on page 2 it already shows the items in page 1 ...
I mean just page 1 works ...what should I do?
whats wrong with properties or code?
please tell me ...
thank you very much.

varshavmane31-Jan-07 22:56

31-Jan-07 22:56

Hope this helps u.

private void dgGrid_PageIndexChanged(object source, System.Web.UI.WebControls.DataGridPageChangedEventArgs e)
{
dgGrid.CurrentPageIndex = e.NewPageIndex ;
DataSet ds = GetEmployeeList();//Bind List again
}

sanaziuse31-Jan-07 23:23

31-Jan-07 23:23

hi it didnt work...
here is my code ... can u please tell me what is wrong with it ?
thanks alot.

private void Page_Load(object sender, System.EventArgs e)
{
if (!IsPostBack)
{
FillDataGrid();
}
}
private void FillDataGrid()
{
cUpload upload=new cUpload();
bool Success;
dsUpload1=upload.GetAllUpload(out Success);
if(Success)
{
dgUpLoad.DataSource=dsUpload1.tblUpLoad;

}
dgUpLoad.DataBind();
}

private void dgUpload_PageIndexChanged(object source, System.Web.UI.WebControls.DataGridPageChangedEventArgs e)
{
cUpload upload=new cUpload();
bool Success;
dgUpLoad.CurrentPageIndex= e.NewPageIndex ;
dsUpload1=upload.GetAllUpload(out Success);
//Bind List again
}

varshavmane31-Jan-07 23:48

31-Jan-07 23:48

What is out Success and dgUpLoad.DataSource=dsUpload1.tblUpLoad;??

U can dierctly bind datagrid with dataset.

sanaziuse31-Jan-07 23:55

31-Jan-07 23:55

Thats because I want to bind My datagrid to dataset which is connected to table name tblupload ...
the items which is shown in datagrid is the items in my table ( tblupload ) ...

So,If you have any suggestion please correct my code above and write it here...thanks alot

varshavmane1-Feb-07 0:10

1-Feb-07 0:10

No need to that way.Try this:

Dim strSql as String
strsql = "Select * from tblupload"
'Open DB connection here
Dim dtad As SqlDataAdapter
Dim dtst As DataSet
dtst = New DataSet
dtad = New SqlDataAdapter(strsql, GetConnection)
'Close DB connection here
dtad.Fill(dtst)
DataGrid1.DataSource = dtst
DataGrid1.DataBind()

I think this much is enough to display the Datagrid.

sanaziuse1-Feb-07 1:07

1-Feb-07 1:07

1.the language I use is C#
2.I have problem with working numbers of pages not showing the grid.
thanks

varshavmane1-Feb-07 1:55

GridView Bind with DataTable and Want Dropdown Control in GridView when Edit

1-Feb-07 1:55

Try this :

private void Page_Load(object sender, System.EventArgs e)
{
if (!IsPostBack)
{
FillDataGrid();
}
}
private void FillDataGrid()
{
string strsql = "Select * from tblupload"
//Open DB Connection here
DataSet ds = con.GetDataSet(SQL,tableName);
DataGrid1.DataSource = ds;
DataGrid1.DataBind();
//Close DB Connection here
}

private DataSet GetDataSet(String sql)
{
string tableName = "tblupload";
SqlDataAdapter da = new SqlDataAdapter(sql, connectionStr);
da.Fill(ds, tableName);
return ds;
}

varshavmane31-Jan-07 22:52