Search:

The inputbox portion is very simple....

dim Input
Input = Inputbox("Provide Your Password")

dim pwvalid
If len(Input) > 0 then 'something entered
'do logic to check validity of...

I think it would be easiest to build a routine to parse your data.

IF all measurements are in the format you say (for example: 2'6"),
and then there may or may not be a second measurement, this...

So researching for days on end.
Of course, I can find many examples of logging in to a site.

But when I try it, it only gets me to the first page.
For some reason, I can't enter data into the...

Wow, 95 views, but no suggestions yet ?

Note, I MUST go this route,
because page 2 gets data from page 1 form fields.... parameters are not passed through.

As the title says....
Create a VBS file to:
open in background a webpage
provide login ID and Password to it
send "enter"
(this process then invokes another page)
then read this next page and...

chrsmrtn has said to use "objFSO.MoveFolder"

this will MOVE the folder.

I think Allan Gwilliam said he wanted to "COPY" the folder therefore it should be "objFSO.CopyFolder"

You must get your number into separate digits.
So convert the number to a string.....

numberstring = Cstr(number) 'this will create a string consisting of the number

Now you must examine...

OK, I used your code (after changing the necessary items).
Here is my result.....

"The message could not be sent to the SMTP server. The transport error code was 0x80040217. The server response...

Yes, I know all about that new security situation.
I have visited the Gmail site, and tried all the various "things" they suggest,
and various combinations.

It still will not connect.
Of...

I built this module to send emails to people using GMail SMTP.
It was working fine for the last couple of years.
Now, it encounters an error.... which tells me it cannot connect to the server.
...

Elroy,
thanks again.

I have a Vista machine.
My wife has a Windows 7 machine.
I can set my background picture to be whatever I want.
My wife can set hers to be changing on some frequency.
I...

Elroy, thanks for the support.

If I was only going to use this program myself, then I would probably use the Startup folder,
as I have done for several items I have built.
But, if I was to make...

As the title says.....

I am building a wallpaper program which will loop through a folder of images
using a specified frequency and specified random or sequential process.

What are your...

Bonnie,

Thanks... perfect !!

I've searched, but can't seem to ding what I want.

I'm writing a simple screen wallpaper change app.
It has only 1 form, which is launched when the program starts.
It prompts for a folder of...

And I have an update.
Today I visited the client site to set it up so that the 7 other workstations
could run the app.

I created a shortcut on the desktop of one workstation,
then tried to run...

You won't believe this... I still don't.

So this workstation has a shortcut to the exe on the server.
Here are the steps I actually took originally.....

Install app on server (SQL is already...

Honeybee,

Notice I said that it runs just fine when running from the server.
This means that the app does read the ini file, and does get the
servername and database name just fine.

It HAS to...

Here are the details... pretty lengthy, so please bear with me.

VB6 application written to use SQLServer (Express).
I have version 2005 installed on my development machine.
When I run the...

I thought I would finalize my findings.

If the file pre-exists, I can use
range(x,y),interior.color = rgb(x,y,z)
It will give me a message at the end about the "infidelity", but it will...

I have determined that the property I am using to set the background color
of ranges of cells is causing that "fidelity" message.

I am using
oXLWSheet.Range("b3", "c3").Interior.Color =...

Sid,
Yes I could upload the project.

But I am working on another "angle" right now.

I have another application which I created a year or so ago,
which ALSO creates Excel2003 files, and those...

Sid,
tried your code regarding "on error", using filetype=56.... still hangs.

Rob,
OK.... I am administrator of my computer.
There are no restrictions on the path/folder I am writing to.
I am...

But sid,
I want to use 56... an .xls file.

Cool.... I thought zero (0) was strange.

OK, here is the value of Efilename string....

C:\Custdata\OZone\Team_Spreadsheets\Outgoing\xxxtest.xls

(Sorry to be such a bother you guys).

In...

Sid,
changing it to a zero (0) produces a run-time error

"Runtime error 1004"
"Method 'SaveAs' of object _Workbook failed"

And if I use 56 (excel2003) it hangs.

The Filename I am passing...

Rob,
destroying the worksheet made no difference.

Martin,
I mentioned in my original post that I am running Vista 32 bit.
I am not using any sub-routine to close... it is all done in one...

I commented out those indicated lines, and ran it again.

It still hangs.

So obviously it is on the Saveas command.

OK, technically you are correct.
It MIGHT be hanging on any of the later lines

oXLWBook.Close SaveChanges:=True
Set oXLWBook = Nothing
oXLApp.Quit
Set oXLApp = Nothing


I...

Martin,
Just doing a "saveas" (2003 format) in plain Excel works just fine.

Rob,
nice try.
I removed the "Savechanges:=true" from the Close statement.... same results. (no different).

I have written an app (VB6) which extracts data from an MSAccess database, and then will write/create an Excel file from this data.
This all works just fine.

When I try to finish/save the file...

Sid,
I could kiss you.

PERFECT !!!!!

Thanks so very much

Sid,
here are the 8 strings/choices I want in the list:

Red
Red H
Red M
Red HM
Blue
Blue H
Blue M

I have included Microsoft Excel 12.0 Object library as a reference in my project.

To create/use the spreadsheet, here is my code...

'create excel application
Dim oXLApp As...

Sid,
thanks.
But your "validation" seems to speak about actually using Excel.

I am building a VB6 app which creates a complete Excel spreadsheet.
The spreadsheet is complete, with all cells...

I have an application which reads a MSAccess database, and then selectively creates an Excel spreadsheet of selected records, for input/manipulation by users.

Creating the spreadsheet is easy......

So, instead of stretching/shrinking the picturebox,
I should REDRAW all the objects, and rescale their positions and dimensions?

I have a need to stretch/shrink a Picturebox, which has a variety of objects on it. It has pictures (images), shapes, and text on it.

I need to expand/shrink the picturebox by 10% at a time...

Si,
I just ran a query against a MSAccess database using DAO3.6. The SQL statement has missing single quotes surrounding a comparative.

The error message is "Run time error -2147217904...

What datatypes are:

EmployeeInfo.Union_Code
tblUnclaimed.Status
EmployeeInfo.Status

???

If they are string, then the comparatives MUST be enclosed within single quotes.