Hi, I need a VB script to set the Environment Variable USERPROFILE. Mu Current Computer Sttings do not allow me to set the Environment Variable Permently. I tried in CMD Promp but it will be changed next time i try logoff and logon. This may be due override of Machine settings with user profile. This Coding i for my personnel and an official .Please help me in this regard. Thanks B L Praveen
Praveen
Hi, I need a VBscript to set the user profile. As my current system settings will hold the defaults. The Changes i made from the CMD promt will be lost once i logoff and logon.(I think the Machine settings overrides the User profile) Please hel give resloution in this regard. i am not VB Script Programmer only i need to do this task by script to avoid daily setting of user profile.
Praveen
Praveen
I need to logoff a systme by running the script. As per my Knowledge the user32.dll library should be included in the Script and it funciton exitwindow sholud be called with unflag value set to zero.But i saw similar code in Visual Basic code from the site VBnet.com . Please help me out to do same thing with vbscript.
Praveen
I have downloaded from a website xml menu code.This includes a Horizantal menu and Vertical Menu of XML and XSL Files respectively. There is one Menu java script file and a Css file . The Download folder also includes code, default and help aspx files.How to display the XML menu . There is know html file loaded with all this files into it. //Floder Code.aspx Default.aspx Help.aspx Menu.css menu.js vmenu.xml vmenu.xsl hmenu.xml hmenu.xsl
Praveen
Thanks, it is displaying
Praveen
The Xsl stylesheet File used by xml to display html page
<?xml version="1.0"?><!--hellohtm.xsl-->
<html xmlns:xsl="http://www.w3.org/1999/xsl/transform" xsl:version="1.0">
<head><title>Greeting</title></head>
<body><p> words of greeting:<br/>
<b><i><u><xsl:value-of select="greeting"/></u></i></b>
</p>
</body>
</html>
The Xml file hodliing greeting message to be printed
<?xml version="1.0"?>
<?xml-stylesheet type="type/xsl" href="Hello.xsl"?>
<greeting>Hello world.</greeting>
The Html page should display the greeting message read from the xml file:" The page displays only the word of greeting on the page it must also display the xml greeting message Hello World."
<html>
<body>
<script language="javascript">
// Load XML
var xml = new ActiveXObject("Microsoft.XMLDOM")
xml.async = false
xml.load("Hello.xml")
// Load the XSL
var xsl = new ActiveXObject("Microsoft.XMLDOM")
xsl.async = false
xsl.load("Hello.xsl")
// Transform
document.write(xml.transformNode(xsl))
</script>
</body>
</html>
Praveen
I trie to display a greeting Message in an html by redaing the words from xml.This was a my first simple progrma on xml.Use XMLDOM to load xml and xsl to memory.Transfomed into html. The html page dispplay only words of greeting.It doesn't display the text read from xml. This my xsl code:
words of greeting:
xsl:value-of select="greeting"
The Xml code
Hello world.
Praveen
The VB code below tries to get the Window title character for the First Active Window. I have error Poping up on my screen when I run this. Error "No Creatable Public Component detected" " MSDN Collection Doesn't Exits" What i need to do to get ride of this error? Public Declare Function GetParent Lib "user32" (ByVal hwnd As Long) As Long Public Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, _ ByVal wCmd As Long) As Long Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" _ (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Public Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" _ (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long Public Declare Function GetWindowThreadProcessId Lib "user32" _ (ByVal hwnd As Long, lpdwprocessid As Long) As Long Private Sub Command1_Click() Dim tempHWin As Long Dim StringDisplay As String Dim CountOfBytes As Integer Dim Buffer As String Dim Instnace As Long tempHWin = FindWindow(vbNullString, vbNullString) Buffer = Space$(128) CountOfBytes = GetWindowText(tempHWin, Buffer, Len(Buffer)) Instance = ProcIDFromWnd(tempHWin) StringDisplay = StringDisplay & Left$(Buffer, CountOfBytes) & tempHWin & Instance Text1 = StringDisplay End Sub Function ProcIDFromWnd(ByVal hwnd As Long) As Long Dim idProc As Long ' Get PID for this HWnd GetWindowThreadProcessId hwnd, idProc ' Return PID ProcIDFromWnd = idProc End Function
Praveen
I am Using VB6
Praveen
I was using the functions FindWindow() GetWindowText()in my code. The dll library used for this Funcitons is user32.dll The error that display when i ran the functions was "No Creatable Public Component Detected" .Help -"MSDN Collection does not exits. Please reinstall MSDN".
Praveen
In my visual studio Axtive X Component MSFlexGrid contorl not installed. There are other Grids Control like DBGrid and DataGrid control can i use this Control to add data to the cell extracted from a web page. I have no Information on using the basic properties of the Control.
Praveen
The VB code below tries to get the Window title character for the First Active Window. I have error Poping up on my screen when I run this. Error "No Creatable Public Component detected" " MSDN Collection Doesn't Exits" What i need to do to get ride of this error? Public Declare Function GetParent Lib "user32" (ByVal hwnd As Long) As Long Public Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, _ ByVal wCmd As Long) As Long Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" _ (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Public Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" _ (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long Public Declare Function GetWindowThreadProcessId Lib "user32" _ (ByVal hwnd As Long, lpdwprocessid As Long) As Long Private Sub Command1_Click() Dim tempHWin As Long Dim StringDisplay As String Dim CountOfBytes As Integer Dim Buffer As String Dim Instnace As Long tempHWin = FindWindow(vbNullString, vbNullString) Buffer = Space$(128) CountOfBytes = GetWindowText(tempHWin, Buffer, Len(Buffer)) Instance = ProcIDFromWnd(tempHWin) StringDisplay = StringDisplay & Left$(Buffer, CountOfBytes) & tempHWin & Instance Text1 = StringDisplay End Sub Function ProcIDFromWnd(ByVal hwnd As Long) As Long Dim idProc As Long ' Get PID for this HWnd GetWindowThreadProcessId hwnd, idProc ' Return PID ProcIDFromWnd = idProc End Function
Praveen
I need a script to get the name or path on a active window opened.This i need to run on a Pop-up Web page opened to display an Image.This image i have uploaded to this site. The Pop-up window does not include a Address to copy the path. I need a VBscript to automatically get the title so the i can put it in clip board.
Praveen
I need a script to get the name or path on a active window opened.This i need to run on a Pop-up Web page opened to display an Image.This image i have uploaded to this site. The Pop-up window does not include a Address to copy the path. I need a VBscript to automatically get the title so the i can put it in clip board.
Praveen