|
In the listview control need to trigger the code if the item is checked?
code:
1. For Each lvItem In Me. listview.Items
2. lRow = lvItem.Tag
3. If lvItem.Checked Then
4. If sODeptId Is Nothing Then
sODeptId = lRow("owner_dept_id")
Else
sODeptId = sODeptId & "," & lRow("owner_dept_id")
End If
End If
Next
I am calling the above code at listview.ItemCheck but the code is not triggering at line no. 4 if item checked also in 1st time
raj
|
|
|
|
|
Hi guys, here I have a problem in my project. answer me, plz. i.e.,
How do you make a graph based on Excel file data?
Is There any special Tool/Control to project in my windows form? if it then how do you implement the concept?
wish me as All The BEST.
|
|
|
|
|
yes. you can able to use through ole object.
raj
|
|
|
|
|
Yes, look into Office web component library (normally refered as OWC11) using this u can create charts and then convert them into jpeg. these charts are similar to Excel charts you can also make them interactive but I have not explored them in that depth.
Mandar Patankar
Microsoft Certified professional
|
|
|
|
|
hello guys could you please help me on how to codes unit conversion using vb.net specifically distance units.
any idea could help!
regards 
|
|
|
|
|
There's nothing built in, you'll need to get the factors and write the code yourself.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
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.
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
