|
I have objects that each have an object representing its parent (except the root). How do I traverse this in VB script?
In C++, it would be something along the lines of:
<br />
for (p = node.ParentNode; p != null; p = p->ParentNode)<br />
Response.Write(p->Name);<br />
Cheers,
Tom Archer
"Use what talents you possess. The woods would be very silent if no birds sang there except those that sang best." - William Blake
* Inside C# -Second Edition
* Visual C++.NET Bible
* Extending MFC Applications with the .NET Framework
|
|
|
|
|
Tom Archer wrote:
I have objects that each have an object representing its parent (except the root). How do I traverse this in VB script?
If I understood you correctly the solution might look like this:
Set p = node.ParentNode
Do Until p Is Nothing
WScript.Echo p.Name
Set p = p.ParentNode
Loop
See also:
Do...Loop Statement[^]
Is Operator[^]
Set Statement[^]
Echo Method[^]
Best regards
Dennis
|
|
|
|
|
Thanks Dennis.
I ended up getting this to work also:
<%
Dim horzMenu
if gNodes.exists(thisUrl) then
set node = gNodes(thisUrl)
horzMenu = node.Name
while not node.ParentNode is nothing
set node = node.ParentNode
horzMenu = node.Name + " :: " + horzMenu
wend
Response.Write(horzMenu)
end if
%>
Cheers,
Tom Archer
"Use what talents you possess. The woods would be very silent if no birds sang there except those that sang best." - William Blake
* Inside C# -Second Edition
* Visual C++.NET Bible
* Extending MFC Applications with the .NET Framework
|
|
|
|
|
hi,
how do I delete a url from Temporary internet files in vbscript?
I know that in the win32 internet sdk there is a function called DeleteUrlCacheEntry
but I don't know if there is an equivalent in VBscript, If I call this function in VBscript it does not work.
so what function do I use or how do I do it?
i know vbscript is not vb but there is no vbscript forum
|
|
|
|
|
You can't using VBScript. You must call an outside ann to do it your for. VBScript doesn't have the ability to call API functions.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
what do you mean call an outside ann to do it for me.
SO how do I do what you said?
and what did you say?
|
|
|
|
|
Opps. I meant "app", application. You have to use WshShell.Run to run an outside .EXE, custom written to clear the cache for your script.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi
I'm just into vb data base programing got a problem at hand, im working on a address book, i've successfully incorporated the data grid control and now its showing the matching records as I enter text in a text box from an access data base in a data grid in real time. Now all I want to do is to give my user an option to print all the matching records that come up during the search in the data grid as well as the selected records from that search since im new to this please any help in this regards is greatly apriciated
if anyone can point me to a sample project of this sort it will be nice
|
|
|
|
|
Try to use Cristal Reports...
|
|
|
|
|
i didn't want to use crystal reports.. anyway I've found a way using data report, and dataenvironment.
With DataEnvironment1
.Commands(2).CommandType = adCmdText
.Commands(2).CommandText = "SELECT Query"
.Commands(2).Execute
DataReport2.Show
end with
thanks for responding anyway.
|
|
|
|
|
i'm newbie and would like some help from u. I would be grateful if you could configure the script below so that it lets the user choose the file location before he clicks the button and send the file to the location specified by HIM and not to C:\ as in the script. thanx
Private Sub Command1_Click()<br />
fSaveGuiToFile ("C:\Scrn_pic1.bmp")<br />
End Sub
|
|
|
|
|
isn't there anyone who can help me!!!!
|
|
|
|
|
Sorry, we all take the weekends off and spend time with our significant others! Show some patience. We all do this IN OUR SPARE TIME!
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
There's about a dozen different ways to do this. It all depends on what you want to put up as an interface to the user. The simplest way is to put up an InputBox ask the user for a path. Is this in VBScript, VB, or VB.NET?
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
yeah i guess thats what exactly i want... my script is in Visual Basic. hope to hear from u soon again. thanx
|
|
|
|
|
If that's all you want, then InputBox will work:
Private Sub Command1_Click()
Dim path As String
path = InputBox("Enter filename and path to save to", "Save")
fSaveGuiToFile (path)
End Sub
This method, of course, does no checking to see if the path entered is valid. A better method would be to create your own SaveAs dialog box.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
hey thanx for the mail... thats exactly what i want but can u please modify it again so that a dialog box appears to select the location.... as typing out the location sounds very time-consuming.
thanx anyway....
|
|
|
|
|
I know this sounds a bit demanding. But can u please do me the favor again....
I would like the form to hav an input field which will open up a dialog box for the file-locator and a Save button seperately. hope i'm not trobling u. thanx
|
|
|
|
|
If your using VB6, go to the Project/Components menu (or hit Ctrl-T), then put a check mark next to Microsoft Common Dialog Control 6.0. Then click OK. You'll see a new icon in the Toolbox, called CommonDialog. This will let you put up a standard Save dialog. Check this[^] link out for an example and the docs on the control on MSDN.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Oh well... thanx but as i'm a newbie and so i couldn't figure out anything... dont know what's the stuff all about. Could you pliz do that for me.
I would like to have an "input-field" to show the location, "browse" to select the location , and save to "save" the file.
thank you
|
|
|
|
|
Nope. I barely have time to work on my own code, let alone someone elses.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
too bad... i wish someone could help me out with this...
thank you anyway
|
|
|
|
|
How can i create CSV text file from vb.net with atleast 10000 rows and 200 columns and how can i package MSDE with Vb.net Application through PDW
|
|
|
|
|
nitin_ten wrote:
How can i create CSV text file from vb.net with atleast 10000 rows and 200 columns
Like you said, it's just a text file with each field seperated by some kind of delimitter, usually a comma or tab character. Are you asking how to write to a text file?
nitin_ten wrote:
how can i package MSDE with Vb.net Application through PDW
The is no Package and Deployment Wizard in VB.NET. You can't do it using the standard Visual Studio Installer projects. You'll have to create a custom install application (Setup.exe). Search the articles on CP for "bootstrap", or for the same on GotDotNet.com. You'll come up with a few projects that'll do what you want.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
How to recover the name of the open file of a richtextbox?
here the example to save the modifications of the file
Public Sub SaveFile() <br />
<br />
rtbdoc.SaveFile(System.Environment.GetFolderPath _ <br />
(System.Environment.SpecialFolder.Personal) _ <br />
& ["\Testdoc.rtf" , _ <br />
RichTextBoxStreamType.RichText) <br />
End sub <br />
I would like to replace "testdoc.rtf" by the open file
Thank you
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
