|
In vb.net it will be like this:
ID = ds.Tables(0).Rows(0)("ID").ToString()
Apurva Kaushal
|
|
|
|
|
THANKS APURVA
I TRIED WITH ROUND BRACKET AND IT WORKED. THANKS FOR BEING SO NICE TO ME. THANKS A LOT.
REGARDS
Prakash Mishra(Banglore,India)
|
|
|
|
|
Always welcome.. 
Apurva Kaushal
|
|
|
|
|
Hai friends..
I am new to asp.net.I would like to know how to Redirect from one URL to another URL.My problem is that i upload my project in server.suppose, www.firstproject.com is the website name ,in that project there is link to go to www.secondproject.com.....(these two works are uploaded in 2 different server).But it is not working with my code....How to do that????any idea please help me....am using .NET 1.1 version and c# coding......
Thanks in advance
|
|
|
|
|
Response.Redirect() will serve the purpose for you.
Apurva Kaushal
|
|
|
|
|
Thanks for your reply.
But Actually my problem is different ,i dont want to redirect from one page to another page in the same project.Instead of that ,i want to redirect from one website to another site...for example www.yahoo.com to www.rediffmail.com
|
|
|
|
|
That will work fine with that also. You can redirect to another site also.
Apurva Kaushal
|
|
|
|
|
Thanku very much for your confident reply
I try Response.redirect withot using http in first time
But after your reply i try with http (ie,Response.redirect("http://www.xyz.com");
now my case is working fine.
Thanks once again
|
|
|
|
|
Always welcome..
Apurva Kaushal
|
|
|
|
|
Use, Response.Redirect("testpage.aspx");
will help you.
where the testpage is the page where you want to redirect page.
Regards,
Satips. ![Rose | [Rose]](https://codeproject.global.ssl.fastly.net/script/Forums/Images/rose.gif)
Don't walk in front of me, I may not follow;
Don't walk behind me, I may not lead;
Walk beside me, and just be my friend. - Albert Camus
|
|
|
|
|
Thanks for your reply.
But Actually my problem is different ,i dont want to redirect from one page to another page in the same project.Instead of that ,i want to redirect from one website to another site...for example www.yahoo.com to www.rediffmail.com
|
|
|
|
|
it will work. please try it. it is working fine for me.
Regards,
Satips.
Don't walk in front of me, I may not follow;
Don't walk behind me, I may not lead;
Walk beside me, and just be my friend. - Albert Camus
|
|
|
|
|
Thanku very much for your confident reply
I try Response.redirect withot using http in first time
But after your reply i try with http (ie,Response.redirect("http://www.xyz.com");
now my case is working fine.
Thanks once again
|
|
|
|
|
Glad to help always.
Regards,
Satips.
Don't walk in front of me, I may not follow;
Don't walk behind me, I may not lead;
Walk beside me, and just be my friend. - Albert Camus
|
|
|
|
|
hello ,
In the button there will be one property onclientclick.
on clientclick = javascript:redirectpage();
function redirectpage()
{
navigate('http://www.rediffmail.com');
return false;
}
Do like this it will work
ok byeee
Murali
|
|
|
|
|
Hi,
I'm currently pulling out my hair with what can only be described as completely random Unhandles Exception errors. They don't occur all of the time, but seem to when I need them not too, i.e. in front of colleges and not even custom errors catch them for some reason.
They appear to occur when connecting to databases, and I cringe everytime I see my application attempt to connect to one. There is litterally no other information I can give because I simply don't get any.
It can't be my code because sometimes it works and sometimes it doesn't. (I'm using MS Access). I've tried asking my host and they brush it off and say we can get our technicians to have a look, for £60 per half hour... this is Fasthosts who are a complete waste of time.
Any ideas?
Thanks
|
|
|
|
|
Aaron Hudson wrote: There is litterally no other information I can give because I simply don't get any.
Then you have to make sure that you get it. The excpetion contains a lot of information on where and why it was thrown. Without that information, the best anyone can give you is guesswork.
Any code that depends on something that you don't have full control over, should have it's own error handling. When you catch the exception, you can display all the information in it.
---
single minded; short sighted; long gone;
|
|
|
|
|
It seems to be when the Access database is opened.
Is this most likey to be an Access, .NET or IIS issue?
Cheers
|
|
|
|
|
Ok, I get this from Matrix (I use a Fasthosts dedicated server)
Event code: 3005
Event message: An unhandled exception has occurred.
Event time: 7/16/2007 7:19:29 PM
Event time (UTC): 7/16/2007 6:19:29 PM
Event ID: b910cc78da5f47c29371c31cf48216dc
Event sequence: 21
Event occurrence: 1
Event detail code: 0
Application information:
Application domain: /LM/W3SVC/3/ROOT-1-128290830698125000
Trust level: Full
Application Virtual Path: /
Application Path: D:\home\
Machine name: DSVR004315
Process information:
Process ID: 1540
Process name: w3wp.exe
Account name: NT AUTHORITY\NETWORK SERVICE
Exception information:
Exception type: OleDbException
Exception message: Unspecified error
Request information:
Request URL: http://www.enterprise-learning-gateway.co.uk/project.aspx
Request path: /project.aspx
User host address: 212.132.0.11
User:
Is authenticated: False
Authentication Type:
Thread account name: NT AUTHORITY\NETWORK SERVICE
Thread information:
Thread ID: 9
Thread account name: NT AUTHORITY\NETWORK SERVICE
Is impersonating: False
Stack trace: at System.Data.OleDb.OleDbConnectionInternal..ctor(OleDbConnectionString constr, OleDbConnection connection)
at System.Data.OleDb.OleDbConnectionFactory.CreateConnection(DbConnectionOptions options, Object poolGroupProviderInfo, DbConnectionPool pool, DbConnection owningObject)
at System.Data.ProviderBase.DbConnectionFactory.CreateNonPooledConnection(DbConnection owningConnection, DbConnectionPoolGroup poolGroup)
at System.Data.ProviderBase.DbConnectionFactory.GetConnection(DbConnection owningConnection)
at System.Data.ProviderBase.DbConnectionClosed.OpenConnection(DbConnection outerConnection, DbConnectionFactory connectionFactory)
at System.Data.OleDb.OleDbConnection.Open()
at ASP.project_aspx.__Render__control2(HtmlTextWriter __w, Control parameterContainer) in D:\home\project.aspx:line 70
at System.Web.UI.Control.RenderChildrenInternal(HtmlTextWriter writer, ICollection children)
at System.Web.UI.Control.RenderChildren(HtmlTextWriter writer)
at System.Web.UI.HtmlControls.HtmlForm.RenderChildren(HtmlTextWriter writer)
at System.Web.UI.HtmlControls.HtmlForm.Render(HtmlTextWriter output)
at System.Web.UI.Control.RenderControlInternal(HtmlTextWriter writer, ControlAdapter adapter)
at System.Web.UI.Control.RenderControl(HtmlTextWriter writer, ControlAdapter adapter)
at System.Web.UI.HtmlControls.HtmlForm.RenderControl(HtmlTextWriter writer)
at ASP.project_aspx.__Render__control1(HtmlTextWriter __w, Control parameterContainer) in D:\home\header.aspx:line 34
at System.Web.UI.Control.RenderChildrenInternal(HtmlTextWriter writer, ICollection children)
at System.Web.UI.Control.RenderChildren(HtmlTextWriter writer)
at System.Web.UI.Page.Render(HtmlTextWriter writer)
at System.Web.UI.Control.RenderControlInternal(HtmlTextWriter writer, ControlAdapter adapter)
at System.Web.UI.Control.RenderControl(HtmlTextWriter writer, ControlAdapter adapter)
at System.Web.UI.Control.RenderControl(HtmlTextWriter writer)
at System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint, Boolean includeStagesAfterAsyncPoint)
Custom event details:
Any ideas?
|
|
|
|
|
The connection fails with the error message "Unspecified error".
The most common reason for this is when you run out of available connections because you haven't closed the previous connections properly.
The database driver only allows 64 simultaneous connections to the database. If you don't close the connections properly, they will remain open until the connection itself times out. When there are 64 connections already open, the database will not accept more connections.
The typical behaviour for this problem is that the database stops accepting connections for a few minutes, then starts working again when one of the connections times out.
---
single minded; short sighted; long gone;
|
|
|
|
|
Guffa wrote: The connection fails with the error message "Unspecified error".
The most common reason for this is when you run out of available connections because you haven't closed the previous connections properly.
The database driver only allows 64 simultaneous connections to the database. If you don't close the connections properly, they will remain open until the connection itself times out. When there are 64 connections already open, the database will not accept more connections.
The typical behaviour for this problem is that the database stops accepting connections for a few minutes, then starts working again when one of the connections times out.
Thanks, can I ask, when you say 64 connections, do you mean as in 64 in one instant, i.e. inserting, selecting or updating? Because I am actually opening and closing them at each chance I can. I do, however open the database, then loop the data, open the database depending on which record is open, and sometimes even do that again, which obviously qualifies as 3 opening, however it should be doing that within a matter of seconds surely?
Here's the code from that page:
<% If Request.QueryString("process") = "" And Request.QueryString("name") = "" Then %><br />
<p><a href="index.aspx">Main Menu</a> \ Project Manager \</p><br />
<br />
<table class="Table_General" width="80%" align="center"><br />
<%<br />
Dim dbConn_DiaryPortfolioList As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(dbLocation) & ";")<br />
dbConn_DiaryPortfolioList.Open()<br />
Dim dbSQL_DiaryPortfolioList As String = "SELECT * FROM tblProcesses ORDER BY proOrder ASC"<br />
Dim dbAdapter_DiaryPortfolioList As New OleDbDataAdapter(dbSQL_DiaryPortfolioList, dbConn_DiaryPortfolioList)<br />
Dim dbDataSet_DiaryPortfolioList As New DataSet<br />
dbAdapter_DiaryPortfolioList.Fill(dbDataSet_DiaryPortfolioList)<br />
Dim dbDataTable_DiaryPortfolioList As DataTable = dbDataSet_DiaryPortfolioList.Tables(0)<br />
Dim dbRecCount_DiaryPortfolioList As Integer = dbDataTable_DiaryPortfolioList.Rows.Count<br />
For dbLoop = 0 To dbRecCount_DiaryPortfolioList - 1<br />
%><br />
<tr><br />
<td class="Cell_Blank" style="height:10px;" width="100%" colspan="3"><br />
</td><br />
</tr><br />
<tr><br />
<td class="Cell_Blank" width="45%" align="center"><br />
<%<br />
Dim dbConn_DiaryPortfolioList_Check1 As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(dbLocation) & ";")<br />
dbConn_DiaryPortfolioList_Check1.Open()<br />
Dim dbSQL_DiaryPortfolioList_Check1 As String = "SELECT * FROM tblVideos WHERE projProcess = '" & ConvertString(dbDataTable_DiaryPortfolioList.Rows(dbLoop)("proProcess")) & "'"<br />
Dim dbAdapter_DiaryPortfolioList_Check1 As New OleDbDataAdapter(dbSQL_DiaryPortfolioList_Check1, dbConn_DiaryPortfolioList_Check1)<br />
Dim dbDataSet_DiaryPortfolioList_Check1 As New DataSet<br />
dbAdapter_DiaryPortfolioList_Check1.Fill(dbDataSet_DiaryPortfolioList_Check1)<br />
Dim dbDataTable_DiaryPortfolioList_Check1 As DataTable = dbDataSet_DiaryPortfolioList_Check1.Tables(0)<br />
Dim dbRecCount_DiaryPortfolioList_Check1 As Integer = dbDataTable_DiaryPortfolioList_Check1.Rows.Count<br />
dbConn_DiaryPortfolioList.Close<br />
%><br />
<a href="project.aspx?process=<% = dbDataTable_DiaryPortfolioList.Rows(dbLoop)("proProcess") %>" class="Link_Option"><% = dbDataTable_DiaryPortfolioList.Rows(dbLoop)("proOrder") %>. <% = dbDataTable_DiaryPortfolioList.Rows(dbLoop)("proProcess") %></a><br />
</td><br />
<td class="Cell_Blank" width="10%"><br />
</td><br />
<td class="Cell_Blank" width="45%" align="center"><br />
<% If Not dbLoop = dbRecCount_DiaryPortfolioList - 1 Then %><br />
<% dbLoop = dbLoop + 1 %><br />
<%<br />
Dim dbConn_DiaryPortfolioList_Check2 As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(dbLocation) & ";")<br />
dbConn_DiaryPortfolioList_Check2.Open()<br />
Dim dbSQL_DiaryPortfolioList_Check2 As String = "SELECT * FROM tblVideos WHERE projProcess = '" & ConvertString(dbDataTable_DiaryPortfolioList.Rows(dbLoop)("proProcess")) & "'"<br />
Dim dbAdapter_DiaryPortfolioList_Check2 As New OleDbDataAdapter(dbSQL_DiaryPortfolioList_Check2, dbConn_DiaryPortfolioList_Check2)<br />
Dim dbDataSet_DiaryPortfolioList_Check2 As New DataSet<br />
dbAdapter_DiaryPortfolioList_Check2.Fill(dbDataSet_DiaryPortfolioList_Check2)<br />
Dim dbDataTable_DiaryPortfolioList_Check2 As DataTable = dbDataSet_DiaryPortfolioList_Check2.Tables(0)<br />
Dim dbRecCount_DiaryPortfolioList_Check2 As Integer = dbDataTable_DiaryPortfolioList_Check2.Rows.Count<br />
dbConn_DiaryPortfolioList.Close<br />
%><br />
<a href="project.aspx?process=<% = dbDataTable_DiaryPortfolioList.Rows(dbLoop)("proProcess") %>" class="Link_Option"><% = dbDataTable_DiaryPortfolioList.Rows(dbLoop)("proOrder") %>. <% = dbDataTable_DiaryPortfolioList.Rows(dbLoop)("proProcess") %></a><br />
<% End If %><br />
</td><br />
</tr><br />
<%<br />
Next dbLoop<br />
dbConn_DiaryPortfolioList.Close<br />
%><br />
</table><br />
<br />
<% ElseIf Request.QueryString("process") <> "" And Request.QueryString("name") = "" Then %><br />
<p><a href="index.aspx">Main Menu</a> \ <a href="project.aspx">Project Manager</a> \ <% = Request.QueryString("process") %> \</p><br />
<br />
<table class="Table_General" width="95%" align="center"><br />
<tr><br />
<td class="<% If Request.QueryString("tab") = "" Then %>Cell_Header<% Else %>Cell_Body<% End If %>" width="16%" align="center"><br />
<a href="project.aspx?process=<% = Request.QueryString("process") %>">Videos</a><br />
</td><br />
<td class="<% If Request.QueryString("tab") = "Project Presentations" Then %>Cell_Header<% Else %>Cell_Body<% End If %>" width="16%" align="center"><br />
<a href="project.aspx?process=<% = Request.QueryString("process") %>&tab=Project Presentations">Project Presentations</a><br />
</td><br />
<td class="<% If Request.QueryString("tab") = "Support Presentations" Then %>Cell_Header<% Else %>Cell_Body<% End If %>" width="16%" align="center"><br />
<a href="project.aspx?process=<% = Request.QueryString("process") %>&tab=Support Presentations">Support Presentations</a><br />
</td><br />
<td class="<% If Request.QueryString("tab") = "Portfolio Tasks" Then %>Cell_Header<% Else %>Cell_Body<% End If %>" width="16%" align="center"><br />
<a href="project.aspx?process=<% = Request.QueryString("process") %>&tab=Portfolio Tasks">Portfolio Tasks</a><br />
</td><br />
<td class="<% If Request.QueryString("tab") = "Handouts" Then %>Cell_Header<% Else %>Cell_Body<% End If %>" width="16%" align="center"><br />
<a href="project.aspx?process=<% = Request.QueryString("process") %>&tab=Handouts">Handouts</a><br />
</td><br />
<td class="<% If Request.QueryString("tab") = "Lesson Notes" Then %>Cell_Header<% Else %>Cell_Body<% End If %>" width="16%" align="center"><br />
<% If Session("usertype") = "Staff" Then %><br />
<a href="project.aspx?process=<% = Request.QueryString("process") %>&tab=Lesson Notes">Lesson Notes</a><br />
<% End If %><br />
</td><br />
</tr><br />
<tr><br />
<td class="Cell_Body" width="100%" colspan="6"><br />
<br/><br />
<% If Request.QueryString("tab") = "" Then %><br />
<table class="Table_General" width="200" align="center"><br />
<tr><br />
<td class="Cell_Blank" width="100%" align="center"><br />
<a href="http://www.macromedia.com/go/getflashplayer" target="_blank"><img src="http://www.adobe.com/support/programs/mwm/images/get_flashplayer.gif" border="0"/></a><br />
</td><br />
</tr><br />
<tr><br />
<td class="Cell_Blank" width="100%" align="center"><br />
This section requires Adobe Flash.<br />
</td><br />
</tr><br />
</table><br />
<br />
<br/><br />
<br />
<table class="Table_General" width="60%" align="center"><br />
<tr><br />
<td class="Cell_Header" width="100%"><br />
Organisation Type: <asp:dropdownlist id="lstDiaryPortfolioView_Type" autopostback="true" runat="server"><br />
<asp:listitem>All</asp:listitem><br />
<asp:listitem>Private Sector</asp:listitem><br />
<asp:listitem>Public Sector</asp:listitem><br />
<asp:listitem>Not For Profit</asp:listitem><br />
</asp:dropdownlist><br />
<br />
<asp:dropdownlist id="lstDiaryPortfolioView_Size" autopostback="true" runat="server"><br />
<asp:listitem>All</asp:listitem><br />
<asp:listitem>Small</asp:listitem><br />
<asp:listitem>Medium</asp:listitem><br />
<asp:listitem>Large</asp:listitem><br />
</asp:dropdownlist><br />
</td><br />
</tr><br />
</table><br />
<br />
<br/><br />
<br />
<table class="Table_General" width="95%" align="center"><br />
<%<br />
Dim dbConn_DiaryPortfolioView As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(dbLocation) & ";")<br />
dbConn_DiaryPortfolioView.Open()<br />
Dim dbSQL_DiaryPortfolioView As String<br />
If lstDiaryPortfolioView_Type.SelectedItem.Text = "All" Then<br />
If lstDiaryPortfolioView_Size.SelectedItem.Text = "All" Then<br />
dbSQL_DiaryPortfolioView = "SELECT * FROM tblVideos WHERE projProcess = '" & Request.QueryString("process") & "' ORDER BY projName ASC"<br />
Else<br />
dbSQL_DiaryPortfolioView = "SELECT * FROM tblVideos WHERE projProcess = '" & Request.QueryString("process") & "' AND projSize = '" & lstDiaryPortfolioView_Size.SelectedItem.Text & "' ORDER BY projName ASC"<br />
End If<br />
Else<br />
If lstDiaryPortfolioView_Size.SelectedItem.Text = "All" Then<br />
dbSQL_DiaryPortfolioView = "SELECT * FROM tblVideos WHERE projProcess = '" & Request.QueryString("process") & "' AND projType = '" & lstDiaryPortfolioView_Type.SelectedItem.Text & "' ORDER BY projName ASC"<br />
Else<br />
dbSQL_DiaryPortfolioView = "SELECT * FROM tblVideos WHERE projProcess = '" & Request.QueryString("process") & "' AND projType = '" & lstDiaryPortfolioView_Type.SelectedItem.Text & "' AND projSize = '" & lstDiaryPortfolioView_Size.SelectedItem.Text & "' ORDER BY projName ASC"<br />
End If<br />
End If<br />
Dim dbAdapter_DiaryPortfolioView As New OleDbDataAdapter(dbSQL_DiaryPortfolioView, dbConn_DiaryPortfolioView)<br />
Dim dbDataSet_DiaryPortfolioView As New DataSet<br />
dbAdapter_DiaryPortfolioView.Fill(dbDataSet_DiaryPortfolioView)<br />
Dim dbDataTable_DiaryPortfolioView As DataTable = dbDataSet_DiaryPortfolioView.Tables(0)<br />
Dim dbRecCount_DiaryPortfolioView As Integer = dbDataTable_DiaryPortfolioView.Rows.Count<br />
For dbLoop = 0 To dbRecCount_DiaryPortfolioView - 1<br />
%><br />
<tr><br />
<td class="Cell_Blank" width="33%" valign="top"><br />
<table class="Table_General" width="95%" align="center"><br />
<tr><br />
<td class="Cell_Header" width="100%"><br />
<a href="project.aspx?process=<% = Request.QueryString("process") %>&name=<% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projName") %>"><img src="player/<% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projImage") %>" border="0"/></a><br />
</td><br />
</tr><br />
<tr><br />
<td class="Cell_Body" width="100%" height="120" valign="top"><br />
<p align="center"><% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projName") %></p><br />
<p><% = Left(dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projAbout"), 100) %>...</p><br />
<p>Type: <% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projType") %><br/><br />
Size: <% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projSize") %></p><br />
</td><br />
</tr><br />
</table><br />
</td><br />
<td class="Cell_Blank" width="33%" valign="top"><br />
<% If Not dbLoop = dbRecCount_DiaryPortfolioView - 1 Then %><br />
<% dbLoop = dbLoop + 1 %><br />
<table class="Table_General" width="95%" align="center"><br />
<tr><br />
<td class="Cell_Header" width="100%"><br />
<a href="project.aspx?process=<% = Request.QueryString("process") %>&name=<% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projName") %>"><img src="player/<% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projImage") %>" border="0"/></a><br />
</td><br />
</tr><br />
<tr><br />
<td class="Cell_Body" width="100%" height="120" valign="top"><br />
<p align="center"><% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projName") %></p><br />
<p><% = Left(dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projAbout"), 100) %>...</p><br />
<p>Type: <% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projType") %><br/><br />
Size: <% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projSize") %></p><br />
</td><br />
</tr><br />
</table><br />
<% End If %><br />
</td><br />
<td class="Cell_Blank" width="33%" valign="top"><br />
<% If Not dbLoop = dbRecCount_DiaryPortfolioView - 1 Then %><br />
<% dbLoop = dbLoop + 1 %><br />
<table class="Table_General" width="95%" align="center"><br />
<tr><br />
<td class="Cell_Header" width="100%"><br />
<a href="project.aspx?process=<% = Request.QueryString("process") %>&name=<% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projName") %>"><img src="player/<% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projImage") %>" border="0"/></a><br />
</td><br />
</tr><br />
<tr><br />
<td class="Cell_Body" width="100%" height="120" valign="top"><br />
<p align="center"><% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projName") %></p><br />
<p><% = Left(dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projAbout"), 100) %>...</p><br />
<p>Type: <% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projType") %><br/><br />
Size: <% = dbDataTable_DiaryPortfolioView.Rows(dbLoop)("projSize") %></p><br />
</td><br />
</tr><br />
</table><br />
<% End If %><br />
</td><br />
</tr><br />
<%<br />
Next dbLoop<br />
dbConn_DiaryPortfolioView.Close<br />
%><br />
</table><br />
<br />
<% Else %><br />
<%<br />
Dim SupportWork_UserType As String<br />
If Session("usertype") = "Staff" Then<br />
SupportWork_UserType = "Staff"<br />
Else<br />
SupportWork_UserType = "Student"<br />
End If<br />
<br />
Dim dbConn_SupportWork As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(dbLocation) & ";")<br />
dbConn_SupportWork.Open()<br />
Dim dbSQL_SupportWork As String = "SELECT * FROM tblSupportWork WHERE supProcess = '" & Request.QueryString("process") & "' AND supArea = '" & Request.QueryString("tab") & "' AND supUser = '" & SupportWork_UserType & "' ORDER BY supName ASC"<br />
Dim dbAdapter_SupportWork As New OleDbDataAdapter(dbSQL_SupportWork, dbConn_SupportWork)<br />
Dim dbDataSet_SupportWork As New DataSet<br />
dbAdapter_SupportWork.Fill(dbDataSet_SupportWork)<br />
Dim dbDataTable_SupportWork As DataTable = dbDataSet_SupportWork.Tables(0)<br />
Dim dbRecCount_SupportWork As Integer = dbDataTable_SupportWork.Rows.Count<br />
For dbLoop = 0 To dbRecCount_SupportWork - 1<br />
%><br />
» <a href="ProjectHelp/<% = Request.QueryString("process") %>/<% = SupportWork_UserType %>/<% = dbDataTable_SupportWork.Rows(dbLoop)("supArea") %>/<% = dbDataTable_SupportWork.Rows(dbLoop)("supURL") %>"><% = dbDataTable_SupportWork.Rows(dbLoop)("supName") %></a><br/><br />
<%<br />
Next dbLoop<br />
dbConn_SupportWork.Close<br />
%><br />
<% End If %><br />
</td><br />
</tr><br />
</table><br />
<br />
<% ElseIf Request.QueryString("process") <> "" And Request.QueryString("name") <> "" Then %><br />
<p><a href="index.aspx">Main Menu</a> \ <a href="project.aspx">Project Manager</a> \ <a href="project.aspx?process=<% = Request.QueryString("process") %>"><% = Request.QueryString("process") %></a> \ <% = Request.QueryString("name") %> \</p><br />
<br />
<%<br />
Dim dbConn_DiaryPortfolioView_Content As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(dbLocation) & ";")<br />
dbConn_DiaryPortfolioView_Content.Open()<br />
Dim dbSQL_DiaryPortfolioView_Content As String = "SELECT * FROM tblVideos WHERE projProcess = '" & Request.QueryString("process") & "' AND projName = '" & Request.QueryString("name") & "'"<br />
Dim dbAdapter_DiaryPortfolioView_Content As New OleDbDataAdapter(dbSQL_DiaryPortfolioView_Content, dbConn_DiaryPortfolioView_Content)<br />
Dim dbDataSet_DiaryPortfolioView_Content As New DataSet<br />
dbAdapter_DiaryPortfolioView_Content.Fill(dbDataSet_DiaryPortfolioView_Content)<br />
Dim dbDataTable_DiaryPortfolioView_Content As DataTable = dbDataSet_DiaryPortfolioView_Content.Tables(0)<br />
Dim dbRecCount_DiaryPortfolioView_Content As Integer = dbDataTable_DiaryPortfolioView_Content.Rows.Count<br />
For dbLoop = 0 To dbRecCount_DiaryPortfolioView_Content - 1<br />
%><br />
<table class="Table_General" width="100%" align="center"><br />
<tr><br />
<td class="Cell_Blank" width="100%" align="center" colspan="2"><br />
<h1><% = dbDataTable_DiaryPortfolioView_Content.Rows(dbLoop)("projName") %></h1><br />
</td><br />
</tr><br />
<tr><br />
<td class="Cell_Blank" width="60%" align="center"><br />
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"<br />
codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="402" height="352"><br />
<param name="movie" value="player/player.swf?file=http://www.ellowes.co.uk/elg/<% = dbDataTable_DiaryPortfolioView_Content.Rows(dbLoop)("projVideo") %>.flv&bufferTime=3&autoStart=false"/><br />
<param name="quality" value="high"/><br />
<embed src="player/player.swf?file=http://www.ellowes.co.uk/elg/<% = dbDataTable_DiaryPortfolioView_Content.Rows(dbLoop)("projVideo") %>.flv&bufferTime=3&autoStart=false" quality="high"<br />
pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="402" height="352"/><br />
</object><br />
</td><br />
<td class="Cell_Blank" width="60%"><br />
<p>About</p><br />
<p><% = dbDataTable_DiaryPortfolioView_Content.Rows(dbLoop)("projAbout") %></p><br />
<br />
<table class="Table_General" width="200" align="center"><br />
<tr><br />
<td class="Cell_Blank" width="100%" align="center"><br />
<a href="http://www.macromedia.com/go/getflashplayer" target="_blank"><img src="http://www.adobe.com/support/programs/mwm/images/get_flashplayer.gif" border="0"/></a><br />
</td><br />
</tr><br />
<tr><br />
<td class="Cell_Blank" width="100%" align="center"><br />
The Enterprise Learning Gateway requires Adobe Flash to use some areas.<br />
</td><br />
</tr><br />
</table><br />
</td><br />
</tr><br />
</table><br />
<%<br />
Next dbLoop<br />
dbConn_DiaryPortfolioView_Content.Close<br />
%><br />
<% End If %>
Is SQL Server any better in performace? Cheers
|
|
|
|
|
No wonder that you are running out of connections. You open a new connection (dbConn_DiaryPortfolioList_Check1) for every record in tblProcesses, and you never close them. Same with dbConn_DiaryPortfolioList_Check2. After that I gave up trying to follow the code.
Frankly, your code is a mess. It doesn't look as ASP.NET code at all, it looks like badly written ASP code. You really need to learn how to use codebehind, server controls, repeaters, databinding, et.c.
Making queries inside a loop is very bad practice. You should create a query that fetches all the data that you need for all projects at once. Read up on the JOIN command in SQL.
Normally you should only need a single database connection for a page. Try to fetch all the data that you need for the page, close the connection, then put the data into the page.
---
single minded; short sighted; long gone;
|
|
|
|
|
Hi,
How to write a DateValidator which should allow both dates in dd/mm/yyyy and mm/dd/yyyy.
Thanks,
Prajin
|
|
|
|
|
|
Hai there..
I want to create an installer. With that installer, if i'm installing means, it should install one more (.msi) file automatically without asking anything. Second time if same installer i'm installing means, it should not install. First it should check whether that file exists or not, then only it should proceed. Please guide me.
Regards n Thks
Sam.M
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
