- Strength to Increase Rep
- +0
- Strength to Decrease Rep
- -0
- Upvotes Received
- 2
- Posts with Upvotes
- 2
- Upvoting Members
- 2
- Downvotes Received
- 0
- Posts with Downvotes
- 0
- Downvoting Members
- 0
27 Posted Topics
Re: If you need to write custom code during the shutdown of the application and need to check to see if the user is logging off or if the machine is shutting down, use the forms QueryUnload event. [icode]Form_QueryUnload(cancel As Integer, unloadmode As Integer)[/icode] UnloadMode will identify HOW the request to … | |
Re: You will need to serialize the object class and then consume the serialized data from the new object. | |
Re: Place the following into a form code window [code] Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long Private Const CB_FINDSTRING = &H14C Private Sub Combo1_KeyUp(KeyCode As Integer, Shift As Integer) Dim sCurrentText … | |
Re: Write a file based DSN that points to your file and then use it in the connection string. [Example DSN] [code] [ODBC] DRIVER=Driver do Microsoft Excel(*.xls) UID=admin UserCommitSync=Yes Threads=3 SafeTransactions=0 ReadOnly=1 PageTimeout=5 MaxScanRows=8 MaxBufferSize=2048 FIL=excel 8.0 DriverId=790 DefaultDir={place app path here} DBQ={place app path here}\Document.xls [/code] Use your ODBC control … | |
Re: You need to specify Unicode [icode]object.CreateTextFile(filename[, overwrite[, unicode]])[/icode] Set the unicode parameter = True [icode]Set MyFile = fso.CreateTextFile("c:\testfile.txt", True, [U]True[/U])[/icode] | |
Re: try the following [icode]xPathExpr = xPathNav.Compile("//ToolAlarm");[/icode] [URL="http://www.w3schools.com/XPath/xpath_syntax.asp"]http://www.w3schools.com/XPath/xpath_syntax.asp[/URL] | |
Re: Try the sample code found here: "Launching and Monitoring External Programs from VB.NET Applications (cont'd) " [URL="http://www.devx.com/dotnet/Article/7914/0/page/5"]http://www.devx.com/dotnet/Article/7914/0/page/5[/URL] | |
Re: Technically, it's VBScript, NOT JavaScript. | |
Re: On a blank form, add the following controls 1. Listbox 2. WebBrowser Control 3. Command Button Add a project reference to "Microsoft HTML Object Library" [code] Private Sub Command1_Click() Dim oHTMLDoc As MSHTML.HTMLDocument Dim oHTMLElement As MSHTML.IHTMLElement WebBrowser1.navigate "http://www.google.com/" Do DoEvents Loop Until WebBrowser1.readyState = READYSTATE_COMPLETE Set oHTMLDoc = WebBrowser1.document … | |
Re: objFile is your TextStream object. You need to pull the properties off of the Enumerated ObjItem object. [icode]objFile.Write([U]objItem[/U].Drive...)[/icode] | |
Re: On a blank form, add the following controls 1. Listbox 2. WebBrowser Control 3. Command Button Add a project reference to "Microsoft HTML Object Library" [code] Private Sub Command1_Click() Dim oHTMLDoc As MSHTML.HTMLDocument Dim oHTMLElement As MSHTML.IHTMLElement WebBrowser1.navigate "http://www.google.com/" Do DoEvents Loop Until WebBrowser1.readyState = READYSTATE_COMPLETE Set oHTMLDoc = WebBrowser1.document … | |
Re: Unfortunately, this is translated by the webserver as a call to [url]http://www.abc.com/abc/1/index.html[/url] To resolve this as [url]http://www.abc.com/abc/abc.asp?id=1[/url], you would need the ability to create custom error pages on the server. In this case, you would need to be able to host a custom 404.asp page. The code inside the 404.asp … | |
Re: 2 things: 1. Title is not a w3c standardized attribute for the SELECT tag. Don't use it [URL="http://www.w3.org/TR/REC-html40/interact/forms.html#h-17.6"]http://www.w3.org/TR/REC-html40/interact/forms.html#h-17.6[/URL] 2. You have an INPUT tag nested into your SELECT tag [code] <td><select name="accesslevel" title="<%=(rs_accesslevel.Fields.Item("accesslevel").Value)%>">[B]<input name="txtaccesslevel" type="text" id="txtaccesslevel" size="50">[/B] <% [/code] Move this above or below the SELECT closing tag | |
Re: MsgBox is a function with a return parameter available. The syntax is as follows: [icode]ReturnVal = MsgBox(Prompt, Options, Title)[/icode] Options is a combination of your buttons, icons, and default button. Example: [icode]ReturnVal = MsgBox("Do you want to continue?", VBYesNo + VBQuestion + VBDefaultButton1, "Closing")[/icode] The allowable values are listed on … | |
Re: Ok, first I am going to assume that you have the code for the connection "con" somewhere else and this is just a snippet of what you have. Secondly, why the 'var' and semicolon syntax? Are you writing this in JScript? Your problem is that you are including a, b, … | |
Re: No. The debug window is technically called the Immediate Window. Open it by pressing CTRL-G or you can find it in the menus as well. | |
Re: You should probably post this in the ASP.Net forum instead. | |
Re: First, unless you plan on using the hierarchical aspects of the grid, I'd suggest using the standard MSFlexGrid rather than the MSHFlexGrid. To address your question, you can use the TextMatrix property to retrieve the text from each column in the selected row. You can find the complete reference to … | |
Re: FALSE!!! XP does not come with CDONTS, but it will support CDONTS. The only problem is that you have to copy the CDONTS.dll from a Windows 2000 machine. ** The library needs to be registered using REGSVR32 Better than CDONTS is CDOSYS which does come with XP. [URL="http://web.archive.org/web/20030929021022/support.microsoft.com/default.aspx?scid=kb;EN-US;q195683"]http://web.archive.org/web/20030929021022/support.microsoft.com/default.aspx?scid=kb;EN-US;q195683[/URL] | |
Re: START --> Control Panel Open "Add Remove Programs" Select "Add/Remove Windows Components" Install Microsoft IIS ** May not be available for XP Home Edition. | |
Re: If you ever need a connection string, the greatest resource is Carl Prothman's site. Formerly Able Consulting. [URL="http://www.carlprothman.net/Default.aspx?tabid=81"]http://www.carlprothman.net/Default.aspx?tabid=81[/URL] | |
Re: Look at line 19 in your code. [icode]Set results1 = results1_cmd.Execute[/icode] You have initialized results1 as an ADODB.Recordset object. You problem lies in that you are trying to append a string to the recordset object. [icode]IF rp_mgr <> "" AND rp_name = "" THEN results1 = results1 &_ ...[/icode] Instead, … | |
Re: Just from looking at what you have, you are entering the error handler when no error actually exists (e.g. err.code=0). Try exiting your routine just before the handler. [code] On Error GoTo Handler 'Code that will cause an error 'Expected exit Exit Sub Handler: msgBox(Err.Description) [/code] | |
Re: You have several options: 1. Use a MDI & MDIChild forms [URL="http://msdn2.microsoft.com/en-us/library/aa267226(VS.60).aspx"]http://msdn2.microsoft.com/en-us/library/aa267226(VS.60).aspx[/URL] 2. Use Frames and or picture boxes as panel containers 3. Use the Web control and use web pages with local VBScript to VB Host function calls. 4. Use the SetParent API to "host" a form in another … | |
Re: The FSO option works great if you are writing to a text file, but it would still need to be opened. Simple: [icode]Call Shell("NotePad.exe " & FileName, vbNormalFocus) [/icode] Better: [code] Private Const SW_SHOWNORMAL As Long = 1 Private Declare Function ShellExecute Lib "shell32.dll" _ Alias "ShellExecuteA" _ (ByVal hwnd … | |
Re: Crystal installs with a programmable object model. The following code is derived from Crystal 8.5, but should provide you with a general reference to work from. !! Add references to the Crystal library [code] 'Crystal objects Private crxApplication As New CRAXDRT.Application Private crxReport As CRAXDRT.Report 'Report (*.rpt) Dim mReportFile as … |
The End.