|
I'm working with menus at the moment, and I'm reading in the contents of an XML file to create the menu.
The number of rows in the DataView I am iterating through is around 190. Adding all these rows to a menu is simple enough, but 190 items on a menu doesn't look good.
So, I'd like to break the 190 items into submenus - perhaps 20-ish items on a menu. The bottom option will be "More", and another 20 or so is presented, again with the bottom item "More", and so it continues until all 190 have been accomodated.
A snippet of what I've got so far is:
' Sort the DataView by Country<br />
dv.Sort = "Country"<br />
<br />
For Each dvRow In dv<br />
view_coun_tsmi.DropDownItems.Add(dvRow("Country"))<br />
Next
What I think I need is something like:
Dim counter As Integer<br />
Dim view_coun_tsmi_more As New ToolStripMenuItem<br />
<br />
For Each dvRow In dv<br />
If counter < 21 Then<br />
view_coun_tsmi.DropDownItems.Add(dvRow("Country"))<br />
End If<br />
If counter = 21 Then<br />
view_coun_tsmi_more = New ToolStripMenuItem("More ....")<br />
view_coun_tsmi.DropDownItems.Add(view_coun_tsmi_more)<br />
view_coun_tsmi_more.DropDownItems.Add .... some more options<br />
End If<br />
counter += 1<br />
Next
But this, I think, is a horrible way of doing it.
Is there a better way?
|
|
|
|
|
What about cascading menus?
item1
item2->item1
item2
item3
item4
He was a snowflake, like other "unique" snowflakes, falling down, getting stepped on, and pushed aside to disappear.
|
|
|
|
|
Hi how to print the crystal report......,
with out using that crystalreportviewer toolbar.........
Magi
|
|
|
|
|
What about setting DisplayToolbar=false ?
If the Lord God Almighty had consulted me before embarking upon the Creation, I would have recommended something simpler.
-- Alfonso the Wise, 13th Century King of Castile.
|
|
|
|
|
Hi friend,
I did already toolbar status is false...,
Then i think to print from my command button.....,
In that command click event i said:
report.PrintToPrinter(1, True, 1, 1)
But its not printing what can i do?,
anyother option is there?,
Magi
|
|
|
|
|
PrintReport method doesn't work?
If the Lord God Almighty had consulted me before embarking upon the Creation, I would have recommended something simpler.
-- Alfonso the Wise, 13th Century King of Castile.
|
|
|
|
|
Halo frd,
See i did tolbar status is false
and try to print from based on button click...,
so i given report.PrintToPrinter(1, True, 1, 1) this command in my click event...,
But its not printing anything...,
Now i am asking any other way is there to print that report...,
got it now?,
Magi
|
|
|
|
|
Hi
If u designed a report in CrystalReportDesigner.
Then u can directly print that report, instead of printing it thr' CrystalReportViewer.
use
report1.PrintOut
Mrunal
|
|
|
|
|
Can anybody tell me how to open CrystalReport (.rpt) file in CrystalReportViewer in VB.
( Without using CrystalReportDesigner (i.e .Dsr) File. )
Mrunal
|
|
|
|
|
Hi i know how to do crystalreportviewer....,
But dont know anything about .dsr file...,
so i send u about this one...,
u send me about that dsr file...,
In ur tool box see crystalreportviewer will be there drag and drop in to ur form...,
Then in that form back code:
Imports System
Imports System.Collections
Imports System.ComponentModel
Imports System.Web
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Web.UI.HtmlControls
Imports System.IO
Imports System.data
Imports System.Data.SqlClient
Imports System.Web.SessionState
Imports CrystalDecisions.CrystalReports.Engine
Then Above page load event:
Dim crpt As CrystalReport1 'Ur crystal report name(.rpt file name)
Dim myTable As CrystalDecisions.CrystalReports.Engine.Table
Dim myLogin As CrystalDecisions.Shared.TableLogOnInfo
Then page load event paste this code:
crpt = New CrystalReport1
For Each myTable In crpt.Database.Tables
myLogin = myTable.LogOnInfo
myLogin.ConnectionInfo.Password = "XXXXX"'Database password
myLogin.ConnectionInfo.UserID = "sa"'Database Username
myTable.ApplyLogOnInfo(myLogin)
Next
CrystalReportViewer1.ReportSource = crpt
Then in ur rpt file:
See in that field explorer Database fields add/remove ur database in that add ur table or command...then run the form u will get the report......
By the way dont forget to send about that dsr file plz......
Regards
Magi
|
|
|
|
|
i m working on a project.which send emails to vendors.
But the problem is same email is appearing multiple time at vendors end.
the project is in vb.
pls help me.
|
|
|
|
|
Can you provide a sample of the code. Sounds like you may not be reinitializing the mail object between sends.
|
|
|
|
|
my project works fine up to last year.From then problem came.
what might be the problem.
tx for u r reply.
|
|
|
|
|
Sir,
I have some DSN problem.Presently , I am connecting my reports(Wizard process) with DSN .The reason is , If I am connecting it through the path (I mean after invoking the file dialog box for selecting the database for my crystal reports.), It stores a static path there in the data source of crystal reports , which is not required.This is the only reason , I am using DSN.
Now , my problem is at the client end i am manually creating the dsn at each machine.There are about 5 machine.(Database is centralized)
So i wanted to create the dsn programically.
Please provide some help.
Thanks and regards
Pankaj
|
|
|
|
|
Private Declare Function SQLConfigDataSource Lib "ODBCCP32.DLL" (ByVal hwndParent As Integer, ByVal fRequest As Integer, ByVal lpszDriver As String, ByVal lpszAttributes As String) As Integer
Call :
iReturn = SQLConfigDataSource(0, 1, "SQL Server", Attr)
|
|
|
|
|
Sir,
Thanks for your kind attention.
But , If i have to use MS-Access
Then Whats's the way out.
Thanks and regards
Pankaj
|
|
|
|
|
Very Simple,
Attributes = "DSN=" & "YourDSN" & Chr(0)
Attributes = Attributes & "Uid=Admin" & Chr(0) & "pwd=" & Chr(0)
Attributes = Attributes & "DBQ=E:\KB_Design.mdb" & Chr(0) & Chr(0)
iReturn = SQLConfigDataSource(0, 1, "Microsoft Access Driver (*.MDB)", Attributes)
|
|
|
|
|
Hi All,
I want to create Virtual Directory Website in IIS using WMI through Vb.net code programmatically..i searched alot in internet sites but they are giving Vbscript but my requirement is using WMI classes and objects i have to create ..... so for that any one please help me (send code if anyone knows)
Thanks & Regards
Suresh
suresh reddy
|
|
|
|
|
Hello Suresh,
See if this helps...
http://www.vbforums.com/showthread.php?t=347207
|
|
|
|
|
Thanks Nilesh for giving reply to my message
But it was using System.DirectoryServices..but my requirement is using System.Management(WMI) that too i have to create website
if u have any other answers please send me
Thanks anyway
suresh reddy
|
|
|
|
|
Hi,
I'am doing a project in VB.net.
Iam facing a strange problem while debugging. The problem is that, the execution of program does not stop at any break points, even if all the break points are enabled. B'coz of that I can't carryout the step by step execution of the program.
Thanx & Regards.
Success is not a Destination,
... But a Journey !!
|
|
|
|
|
Vikrant,
Please make sure that your project is in Debug mode and not in Release mode.
Regards,
Nilesh
|
|
|
|
|
Hi
I am executing my project which is related to database.When i try to put a breakpoint and execute my proj using step into(F11)It does not return to code for tracing i.e it does not halt,it continues with its execution and I am not able to trace my project.It is showing no symbols loaded as an warning but still with this warning I was able to trace but now I cant,Can anyone guide me.Or is it some key has been pressed by mistake.
Thank You,
Romana
|
|
|
|
|
Hi Romana,
Please make sure that your project is in Debug mode and not in Release mode.
Regards,
Nilesh
|
|
|
|
|
Hi anyone can explain me how to pass parameter value to crystal report....,
And how to retrive that value in report like...,
Plz help me...,
Magi
|
|
|
|