|
Hi All,
My problem is something like this,
I have a datalist where i want to add a dynamic datagrid. to better understand my problem please see the code below.
in vb file
-----------------
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
dlScHead.DataSource = GetRecords(Nothing)
dlScHead.DataBind()
End Sub
Function GetRecords(ByVal scID As String) As SqlDataReader
Dim bizProgName As String = Request.QueryString("bizProgId")
Dim CommandText As String
Try
objConn = New SqlConnection(dbPath)
objConn.Open()
If scID = Nothing Then
Dim da As New SqlDataAdapter
da.SelectCommand = New SqlCommand
da.SelectCommand.Connection = objConn
da.SelectCommand.CommandText = "select scorecardId,bizProgId,scorecarddesc,businessgoal,strategy,quarter1,quarter2,quarter3,quarter4 from textData where bizProgID='" & Request.QueryString("bizProgId") & "'"
dr = da.SelectCommand.ExecuteReader(CommandBehavior.CloseConnection)
If dr.HasRows Then
'lblError.Text = ""
Else
'lblError.Text = "No records returned"
End If
GetRecords = dr
Else
cmd = New SqlCommand("select distinct measure_id from measuredata where scoreCardId = '" & scID & "'", objConn)
Dim da As SqlDataAdapter = New SqlDataAdapter(cmd)
Dim dtId As New DataTable("MeasureId")
da.Fill(dtId)
'select all columns with ID
Dim cmd1 As SqlCommand = New SqlCommand("select * from measureData where scoreCardId = '" & scID & "'", objConn)
Dim da1 As SqlDataAdapter = New SqlDataAdapter(cmd1)
Dim dt As New DataTable("MeasureSource")
da1.Fill(dt)
Dim datarow As DataRow
For Each datarow In dtId.Rows
Dim chart As DataGrid
Dim myView As New DataView(dt)
' Dim chart As New Mycos.MycosChartWeb
myView.RowFilter = String.Format("Measure_Id='{0}'", datarow.Item("measure_Id"))
chart.DataSource = myView
Chart.DataBind()
Dim i As Integer
For i = 0 To dlScChart.Items.Count - 1
dlScChart.Items(i).FindControl("Placeholder1").Controls.Add(chart)
Next
Next datarow
'GetRecords = PlaceHolder1.FindControl("Placeholder1")
End If
Catch ex As Exception
Response.Write("error on child" + ex.ToString)
Finally
End Try
End Function
------------
in aspx page.
=============
<asp:datalist id="dlScHead" runat="server" showfooter="False" showheader="False" cellspacing="0"
="" cellpadding="0" width="100%">
<itemtemplate>
<asp:datalist id="dlScChart" width="100%" datasource="<%# (GetRecords(Cstr(DataBinder.Eval(Container.DataItem, "scoreCardId"))))%>" runat="server">
<itemstyle verticalalign="Top" backcolor="#EEEEEE">
<itemtemplate>
<asp:placeholder id="Placeholder1" runat="server">
|
<%# Server.htmlDecode(DataBinder.Eval(Container.DataItem,"Quarter1").tostring()) %>
<%# Server.htmlDecode(DataBinder.Eval(Container.DataItem,"Quarter2").tostring()) %>
<%# Server.htmlDecode(DataBinder.Eval(Container.DataItem,"Quarter3").tostring()) %>
<%# Server.htmlDecode(DataBinder.Eval(Container.DataItem,"Quarter4").tostring()) %>
|
=============
I am getting Null reference exception/object not set to instance of an object in my vb file in
chart.DataSource = myView
i really dont know what i am doing wrong or is it looking for the IDs of the datagrids
please help its eating my head.
many many thanks in forward.
Bikash
|
|
|
|
|
Hello,
Here is the code snippet that I am strucked at in converting a C# file to VB.NET. Can some one please help me here?
[DataObjectMethod(DataObjectMethodType.Select, true)]
static public List<roledata> GetRoles()
{
return GetRoles(null, false);
}
Thanks
-L
|
|
|
|
|
|
|
I want to create a random number range (1 to 16) and get them to an array. Although I found a way, it looks 
Dim Range(16) As Integer<br />
Dim RandomNumber As Integer<br />
Dim i As Integer<br />
<br />
While i <= 15<br />
Randomize()<br />
RandomNumber = CInt(Int(16 * Rnd() + 1))<br />
<br />
For j As Integer = 0 To 15<br />
If Range(j) = RandomNumber Then<br />
Continue While<br />
End If<br />
Next<br />
<br />
Range(i) = RandomNumber<br />
i += 1<br />
End While
Is there any easy way to do that?
Regards,
Chatura Dilan
|
|
|
|
|
The easiest way to do this would be if the .NET containers support a random shuffle. Another option is to create a list that contains 1-16, and then use the random function to work out which index to next pull a value from, removing them as you go. That would get rid of the need for a duplicate check altogether.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
Thank you for your reply.
but, can you explain it more?
Regards,
Chatura Dilan
|
|
|
|
|
Well, you create a List
Dim ints as List<int> = new List<int>()
Then you do a for loop to push the numbers 1-16 in there.
Then you use your random number generate 16 times, each time though you have a lower maximum ( so the last one is moot, you can only generate 1 ). Each time, you pull the digit out of the list at that position, and remove it from the list ( which is why your random number generator drops by 1 each time ). That way, you're pulling out numbers at random positions, and you don't need to check for duplicates.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
You can try something like this:
1: with a for loop, fill your Range with the numbers 1-16.
2: with another for loop, increment through the Range, and swap the number at that position with a number at a random position in the Range.
After one pass of step two, your array should be fairly random, but to make sure, you can repeat step two as many times as you like. I use this method to sort cards in a deck. I usually repeat step 2 three times.
Roy.
|
|
|
|
|
OK, Thank you for both Cristian & Roy
Regards,
Chatura Dilan
|
|
|
|
|
I started with a solution with two projects. 1=VAQSO (the true project) and 2=VAQSO_Setup (the deployment project). It took a while to get the deployment project correct, but help from Code Project finally got it working. By the time the production cycle finished, VAQSO was at release 06.12.03
Next I cloned the solution. I copied the entire solution directory to a new directory and changed all the code so that VA became WV. Now I have WVQSO and WVQSO_Setup. Both programs and both installers run well, with one exception. Both programs will not install on the same PC.
If VAQSO is installed on a PC, then WVQSO will not install. I get an error message about a prior version existing. If I uninstall VAQSO, the WVQSO will install without error.
Obviously, I've still got a VA reference in the WV clone. How do I find it? I've run a scan on all the text files in the solution and nothing shows up.
Thanks for the help.
--HamCoder
|
|
|
|
|
Change the product Guid in the installer setup (they obviously have the same guid - hence MSI thinks they are the same thing) the name portion is for humans to understand
sorry i cant be more specific but i havnt got VS open in front of me
|
|
|
|
|
Thanks. I thought I had checked that. It turned out to be the Upgrade GUID that was identical. Once I had the IDE generate a new one, it worked just fine.
--HamCoder
|
|
|
|
|
Hi,
I am trying to update a Windows Service as follows:
* the service uses the Updater Application Block to check for updates to itself.
* if updates are found the service should launch a console application and then stop itself
* the console application will download the updated files and copy them to the right location and then restart the service
My problem is that the service is not launching the console application correctly. The application is visible in the Task Manager but not on the taskbar. The application doesn't do anything that it's supposed to.
I know that the code for the console application works fine because it works perfectly if I run it myself of if I launch it from a Windows Forms application.
Is there anything different when starting a process from a service?
The code I use is as follows:
<br />
Dim p As New Process<br />
p.StartInfo.WindowStyle = ProcessWindowStyle.Normal<br />
p.StartInfo.FileName = Path.Combine(My.Application.Info.DirectoryPath, "Utilities\UpdateUtility.exe")<br />
p.StartInfo.Arguments = My.Application.Info.AssemblyName<br />
p.Start()<br />
Me.Stop()<br />
Thanks very much,
dhartigan
|
|
|
|
|
Hello
You must allow your service to interact with the desktop.
If you go to the properties of the service on the LogOn Tab you
must check that item.
Hope it helps
|
|
|
|
|
you'll need to allow the service to interact with desktop
How terrible is wisdom when it brings no profit to the wise
|
|
|
|
|
I'm trying to find file/folder owners using VB 2005 and .NET 2.0. I've been successful using the System.Management namespace and WMI calls, but this takes a lot more coding than it looks like it would take using .NET 2.0. I've found the following C++ example at http://msdn.microsoft.com/msdnmag/issues/06/00/SecurityBriefs:
void printTheOwnerOfThisFile(string path) {
FileSecurity s = File.GetAccessControl(path);
NTAccount user = (NTAccount)s.GetOwner(typeof(NTAccount));
Console.WriteLine(user);
}
...
printTheOwnerOfThisFile(@"c:\autoexec.bat");
Here's my attempt at translating it to VB 2005:
Imports System.IO
Imports System.Security.AccessControl
Imports System.Security.Principal
Module Module1
Sub Main()
Dim FilePath As String = "c:\autoexec.bat"
Dim s As FileSecurity = File.GetAccessControl(FilePath)
Dim user As NTAccount = s.GetOwner(NTAccount)
Console.WriteLine(user)
For i As Int64 = 1 To 100000000000
i = i + 1
Next
End Sub
End Module
(The For-Next loop is just to keep the console window open long enough to see what was written.) I'm getting a Build error on the GetOwner parameter in parentheses that "NTAccount is a type and cannot be used as an expression." However, the GetOwner method parameter is supposed to be "targetType as System.Type" according to MSDN.
Can anyone tell me what I'm doing wrong? Is it just not possible to get the file owner in VB using .NET 2.0?
Thanks in Advance
|
|
|
|
|
is251rd wrote: Dim user As NTAccount = s.GetOwner(NTAccount)
Change that to
Dim user As NTAccount = s.GetOwner(GetType(NTAccount)) is251rd wrote: The For-Next loop is just to keep the console window open long enough to see what was written.
Have you tried Console.ReadLine()? That'll keep the window open until you hit enter 
Cheers,
Will H
|
|
|
|
|
Thanks a bunch, Will! That works great! I've been combing the internet for a couple days trying to figure this out.
|
|
|
|
|
Scenario
You've just started a new semester and you've become friends with one of your classmates, Tomislav. Tomislav tells you he has just moved to the United States from Europe and he's having a difficult time adjusting to the English units of measurement. In his country, most liquids are measured in liters, not gallons.
Tomislav tells you that he's been having an especially hard time buying gasoline, since he doesn't have much of an idea how much a gallon is. He also mentions he's having a tough time understanding how much is in a pint.
Since you got an 'A' in your last Visual Basic .NET course, you volunteer to write Tomislav an application to convert liters into pints and gallons.
Project Details
Create an appropriate user interface.
Include a Reset button, which will clear the interface controls.
Be sure to center the form on the screen.
Create a button that the user will click to complete the conversion.
Provide an appropriate title for your application window.
Create necessary labels for all fields.
Display the pint and gallon conversions in TextBox controls that cannot be edited.
Include comments in your application
Write code to complete the conversion.
Use the Internet or other resources to find out the conversion rates between liters and pints, as well as liters and gallons.
Deliverable Details
Please submit your assignment.
Submit only ONE file. The file should be a zip of ALL the files in the project folders.
Tips for Unit 1 IP (ITP330)
General
Use the VS2003 online help to find answers.
Here is a tutorial (from Microsoft) that will help you get started programming in VB.NET fast:
Setting Up the Visual Basic .NET Project
For the IP
Note the conversion is from wet liters to wet pints and from wet liters to wet gallons.
Textbox1: liters, for input
Textbox2: pints, read only for output
Textbox3: gallons, read only for output
Labels for the above textboxes
Compute button: btnCompute
Reset button: btnReset
Code the following methods: btnCompute_Click() and btnReset_Click()
Also can someone explain the differences between Object-Oriented Programming (OOP) and Object-Oriented Design (OOD). Can you also provide examples of how each can be applied in real life.
Can someone help me understand this stuff above. I really don't know how to write codes and if there is a website/tutorial out they somewhere that is built for beginners please let me know.
Thanks,
mcb12
|
|
|
|
|
Take a class and actually do the work assigned instead of asking for someone to do it for you.
|
|
|
|
|
To be fear, he actually didn't ask for someone to do the work for him, just to help him understand the assignment. That request is far too vague, though. If he really doesn't understand anything at all of the assignment, he is far behind...
---
b { font-weight: normal; }
|
|
|
|
|
What is is that you don't undsertand? It seems very clear to me.
The material refers to a tutorial, have you looked at that?
---
b { font-weight: normal; }
|
|
|
|
|
Post you question to "devX" forum. The people there are not rude and they will try to help you. I would try to help you but I'm still learning myself.
|
|
|
|
|
It has nothing to do with being rude, and everything to do with educating people that they need to do their own homework in order to understand - and ultimately pass - their class at college/school.
Current blacklist
svmilky - Extremely rude | FeRtoll - Rude personal emails | ironstrike1 - Rude & Obnoxious behaviour
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
