Tracker

HOME

TRACKER

Visual Basic

Timers On Windows 2003 Server

Hi All,

I'm looking for a little advice if possible.

I'm writing a small program for tech support purposes, I've been testing as I'm going along and have noticed that my timer event doesn't seem to be running on Windows 2003, it's a simple timer that updates a text field with info from strings.

Any ideas?
Cheers,
Michael.

View Complete Forum Thread with Replies

See Related Forum Messages: Follow the Links Below to View Complete Thread

Problem Running VB6 Application In Windows XP && Windows 2003 Server
Please Help Me To Implement RunAs In Windows Service On Windows 2003 Server ...
Please Help Me To Implement RunAs In Windows Service On Windows 2003 Server ...
Using Faxcomexlib To Create An XP Fax Client Using Windows 2003 Server As Fax Server
Windows Service On Windows Server 2003
Component Not Working In Windows 2003 Server But Working In Windows 2000 Server
VB && Windows Server 2003
VB6 + Windows 2003 Server
VB6 And Windows Server 2003
Windows Server 2003
Windows 2003 Server
VB5 Apps And Windows Server 2003
VB6 Application On Windows Server 2003
64bit Windows Server 2003, And Vb6 Dll
TAPI And Windows Server 2003 SP2
Windows Server 2003, ActiveX, ASP
Windows Server 2003 Component Services
VB6 Automation Failing On Windows 2003 Server W/SP1...
Compatibility With Windows 2003 Server Issue!
Deleting A File From VB 6.0 In Windows Server 2003
Visual Basic 6.0 And 64-bit Windows 2003 Server
Installation Problems On Windows Server 2003
Windows 2003 Server + SQL Server
MAPI Error On Windows Server For Small Business 2003
Interface Of Active Exe Project Not Visible On Windows 2003 Server
This Script Works On Win2k Server But Not 2003 Server.... WHY?
VB Or Windows Related--Accuracy Of Timers
VB: Timers, Forms, And Popup Windows
Question About Windows OS Clock, Timers, && A 24/7 VB Program
ADO, SQL SVR, Windows 2003 R1 And R2
Need Help With VB In Windows 2003
VB In Windows 2003
Need Some SQL Server 2003 Help
FSO Vs. Win Server 2003
2003 Server Vs Win XP
Createdirectory In Windows 2003....
VB4, Windows 2003 && SQL 2000
VB6 && Windows Mobile 2003
Our VB 6 App Running On Windows 2003 SBS
Windows Mobile 2003 And EVB
Server 2000 Vs 2003 - Please Help???
Win Server 2000 - 2003
Microsoft Server 2003
Installing VS6 On Win 2003 Server
Running And A 2003 Server
Connecting To SQL Server 2003
POP3 On Windows 2003 Using NTLM....
VB6 Windows 2003 Porting Checklist
Disable Screensaver In Windows XP/2003

Problem Running VB6 Application In Windows XP && Windows 2003 Server
I have installed a program written in VB6 and Crystal Reports 8.

When I run the program in Windows XP Professional, once a while I encounter "Illegal Operation" for SslstBar.ocx, Ssdw3a32.ocx and Ssdw3b32.ocx.

When I run the program in Windows 2003 server (program and database in the server), frequently my program seems like hang and I can only close my program using "Endtask".

I need to your help to resolve the above problem soonest possible.

Thank you very much.

Have a nice day.

Please Help Me To Implement RunAs In Windows Service On Windows 2003 Server ...
Hello to all Forum Members;

Currently I'm working on a Monitoring Service which is intended to monitor the status of configured Applications and other Windows Services and restart if any of those are found not running. It works smooth with Windows Services; however I'm facing some problems while making the Service to start the third party Applications that have Database backend via ODBC or ADO.

I register my Windows Service as "Interactive with Desktop" under "LocalSystem" account on Windows 2003 Server. If I configure an Application such as Notepad or similar then there is no problem; but if there any application that has Database backend then the problem starts! These applications are not getting started properly. One of such applications is VoIPSwitch which says that it failed to connect to Database as either database drivers are not found or database does not exists! Both reasons are wrong as I can start the same application with the double click on same Executable file; it's just my Windows Service that's not able to start the application.

I received a suggestion to implement the RunAs for starting such applications with User Name and Password passed to it. So, for my quick testing I quickly searched for RunAs code module and found two examples on Planet Source Code, one of which I'm currently implementing in my code, too. You can download it for your reference from following URL:

http://www.orbitfiles.com/download/id1291685973

When I implemented it in my Monitoring Service and checked my Service Log (which I have coded to be written to ServiceLog.log file; this is not Windows Event Log), I got to see the error as returned by RunAs code: Access Denied!

I specified the same User Name and Password that I give while logging to my Windows 2003 Server (on which this Service is running) for RunAs and still I'm getting this error! The interesting thing is ... when I executed the RunAs VB code (the link above points to the same code) on the same Server by double-click it's icon and then with same User Name and Password, then it started the specified application without any problem! I feel there is no problem in the RunAs code; but it's the Windows Service (which is under Local System account) is not getting permission from Windows 2003 Server!

Am I missing something here? What's going wrong? Why Access Denied error is giving by Windows 2003 when Service attempts to start the application? I'm absolutely clueless right now; please give me some suggestion/solution to resolve this error!

Waiting for your valuable reply ...

Regards,

Ruturaaj.

Using Faxcomexlib To Create An XP Fax Client Using Windows 2003 Server As Fax Server
1) Can anyone help me clarify the syntax for computer name when the FaxServer and remoteFaxClient are deployed within a domain?

2) If item 1) above is not the problem then does anyone have suggestions on how to properly setup the Fax software (remote Fax Client and the Fax Server)?

The following code works fine for creating a local FAX Client on XP and Windows 2003 Server. However, I want to use the XP node as the Fax Client and the 2003 Server node as the FaxServer.

Whenever I try to use the XP node as the remote Fax Client ot the Windows 2003 Server FaxServer, I get the following error code:

Error -2147024894 (80070002)

This error occurs on the line where the faxjob is submitted. I get the same error on both fax sumissions (JOBID and sumbission without retrieving the JobID):
    'submit and get JovID
    JobID = objFaxDocument.ConnectedSubmit(objFaxServer)

    ' submit without retrieving the JobID
    'objFaxDocument.Submit (objFaxServer.ServerName)

I am wondering if I am using the correct name for the FaxServer. The computer name is "medserver" but the full name (path and computername) is "medserver.domain1.local". I tried using "\medserver", "//medserver", "\mdeserver.domain1", "\medserver.domeain1.local" and I still am not able to connect to the server and send the test fax. Using a blank name for the FaxServer "" or using the local computer name while running the Fax Client VB routine local to the Server works just fine. I get through the connection call but I get the 80070002 error when I submit the fax from a remote Fax Client to the FaxServer.

============================================

Private Sub cmd_SendFaxComEx_Click()
    Dim objFaxDocument As New FAXCOMEXLib.FaxDocument
    Dim objFaxServer As New FAXCOMEXLib.FaxServer
    Dim objSender As FaxSender
    Dim JobID As Variant

    strFaxNumber = Me.txt_toFaxNumber.Text 'Any valid faxphone#
    'strFileName ="C:Program DATA FilesVB TestsFax ClientHello World.doc"
    strFileName = Me.txt_attachment.Text 'Any valid text/fax file
    strFaxMachine = Me.txt_FaxServerName.Text 'FaxMachine Name = "\FaxServer"

    'Error handling
    On Error GoTo Error_Handler

    'Connect to the fax server
    objFaxServer.Connect strFaxMachine '"" for default

    'Set the fax body
    objFaxDocument.Body = strFileName '"c: empmsg.txt"

    'Name the document
    objFaxDocument.DocumentName = "TMR Test Fax"

    'Set the fax priority
    'objFaxDocument.Priority = fptHIGH

    'Add the recipient with the fax number 12225550100
    'objFaxDocument.Recipients.Add "12225550100", "Bud"
    objFaxDocument.Recipients.Add strFaxNumber, Me.txt_RecipientName

    'Choose to attach the fax to the fax receipt; set to false for no attachment
    objFaxDocument.AttachFaxToReceipt = True

    'Set the cover page type and the path to the cover page
    'objFaxDocument.CoverPageType = fcptSERVER
    'set objFaxDocument.Coverpage = fcptNONE for no coverpage
    objFaxDocument.CoverPage = "generic"

    'Provide the cover page note
    objFaxDocument.Note = "Here is the info you requested"

    'Provide the address for the fax receipt
    objFaxDocument.ReceiptAddress = "someone@example.com"

    'Set the receipt type to email
    'objFaxDocument.ReceiptType = frtMAIL

    'Specify that the fax is to be sent at a particular time
    'objFaxDocument.ScheduleType = fstSPECIFIC_TIME
    'CDate converts the time to the Date data type
    'objFaxDocument.ScheduleTime = CDate("4:35:47 PM")

    objFaxDocument.Subject = "Today's fax"

    'Set the sender properties. For the EMR this will be the Dr. Office Info.
    objFaxDocument.Sender.Title = "Dr"
    objFaxDocument.Sender.Name = "TMR"
    objFaxDocument.Sender.City = "Phoenix"
    objFaxDocument.Sender.State = "AZ"
    objFaxDocument.Sender.Company = "TMR"
    objFaxDocument.Sender.Country = "USA"
    objFaxDocument.Sender.Email = "Dr@TMR.com"
    objFaxDocument.Sender.FaxNumber = strFaxNumber
    objFaxDocument.Sender.HomePhone = "1-602-555-5555"
    objFaxDocument.Sender.OfficeLocation = "Downtown"
    objFaxDocument.Sender.OfficePhone = "1-602-555-5553"
    objFaxDocument.Sender.StreetAddress = "123 Main Street"
    objFaxDocument.Sender.Tsid = "Office fax machine"
    objFaxDocument.Sender.ZipCode = "12345"
    objFaxDocument.Sender.BillingCode = "23A54"
    objFaxDocument.Sender.Department = "TMR EMR"

    'Save sender information as default
    objFaxDocument.Sender.SaveDefaultSender

    'Submit the document to the connected fax server and get back the job ID.
    JobID = objFaxDocument.ConnectedSubmit(objFaxServer)

    'Use the following line to submit the fax document w/o getting a job ID.
    'objFaxDocument.Submit (objFaxServer.ServerName)

    MsgBox "The Job ID is :" & JobID(0)
    'Exit Sub
    objFaxServer.Disconnect

Error_Handler:
        'Implement error handling at the end of your subroutine. This implementation is for demonstration purposes
        'MsgBox "Error number: " & Hex(Err.Number) & ", " & Err.Description
        objFaxServer.Disconnect

End Sub

Windows Service On Windows Server 2003
Hi,

I need to run my application with UI as interactive windows
service (with "Allow service to interact with desktop" and "Local
System Account" checked in service's properties)
Works expectedly on Windows 2000, but not on Windows Server 2003 - UI is
invisible.

Need help.

Component Not Working In Windows 2003 Server But Working In Windows 2000 Server
hi,

I have a VB upload component which woeks weel with the Windows 2000 server but when i have the same component installed in the Windows 2003 server it is not working. It is displaying the following error. error '800706be' . Searching the microsoft support site i cannot get any relevant information. If anyone has solution for this.

Bye

Sridharan

VB && Windows Server 2003
Hi everyone,

Recently I've started running some of my apps on Windows server 2003.
Everything seems fine apart from one slight problem with "File System Object".

If I have a filesystemobject FSO, when ever I try to copy files, It seems to hang on the first time it is called by the user.

anyone encountered this?

Thanks in advance

VB6 + Windows 2003 Server
Hello.

Everytime i try to install visual studio 98 (to use vb6)
and after the reboot on the forced install of the jvm,
all network related stuff stops working and some services fails to start.

Im currentl using Windows 2003 Server Standard, fully updated and are atm forced to run xp in a VM to be able to access vb6 and make changes to previous apps (that isnt needed to be ported to .net)

any suggestions?

VB6 And Windows Server 2003
I have a scheduling program written in VB6 that was moved to windows server 2003 and does not work. Any suggestions on what I need to do to make it work?

Windows Server 2003
I know this is kind of vague, but, would there be an issue with windows server 2003 and VB 6 programs? I have an app that installs and works on all workstations running 2000 and XP. However, when the app is installed on a server running 2003 the app shows to be running but you can't see it. The install app was created using inno setup.

Windows 2003 Server
My new host runs Windows 2003 server. My old host was Windows 2000.
I am using ASP/ADO and an Access database.

My site is on a shared server, and recently has been experiencing down time. After looking at my scripts, I realized I neglected to explicitly close my Database connections after the scripts are executed. When I asked them, they said that the issue was indicative of a memory leak. In order to keep the site running, they had to set the "recycle" time of the server to every two hours.

I ran on the old server with a lot of spots that were worse about object clean-up, the old server also saw much more traffic than the new one does and the old server never had this issue. My question is, does anyone know if Windows 2003 server has a problem with memory clean-up? Why does this server seem to be more touchy? I understand it really is my fault, and I didn't really follow good coding standards when writing some of those scripts.

I want to know if it will ever change. I went through my scripts AGAIN, and made sure I was cleaning everything up. I asked them to increase the recycle time to 6 hours, just as a test, and the site was brought to it's knees within a few hours. I am going to go through my scripts again, but I am wondering if I should just find a new host.

I know Access is not recommended for heavy traffic sites, but the only database that every page even comes close to accessing is a small database, and I open and close the connection almost immediately. There is not a lot of data transfer between that database and the website.

If anyone can shed some light on this, it would be greatly appreciated.

Thanks for reading this!

VB5 Apps And Windows Server 2003
Hello everybody. I need to develop VB executables which must run under Windows 98, Me, 2000, XP and Windows Server 2003.

Since I'm not allowed to provide the final users with a setup package, (all the machines are protected) I am obliged to use VB5 rather than VB6. This is because the runtime files needed by VB5 progs (MSVB50VM.DLL and OLEAUT32.DLL) are already present in Windows 98 or later versions. On the contrary, the version of OLEAUT32.DLL needed by VB6 progs is newer than the one you find in Win98, so you would need to replace it.

Now, since some of the computers to which I have to deploy my apps are equipped with Windows Server 2003, I need to know if the library MSVB50VM.DLL is still in the operating system or it has been removed by Microsoft (for example, because it is considered obsolete).

Is there anybody out there using Windows Server 2003 who may want to help me? Just open the Windows/System32 folder and check if you can find the incriminated library.

TIA

Pasquale Esposito
Perugia, Italy

VB6 Application On Windows Server 2003
Hi,

I have a problem with running VB6 application on Windows Server 2003. Project has one or more simple forms, and after calling FORM.SHOW application crashes and throw error OUT OF MEMORY.

Does anybody know where is the problem? With compatibility or something else?

Thanks.

64bit Windows Server 2003, And Vb6 Dll
Hi all,
Does anyone have any experience with my problem?
I have a VB6 dll which works perfectly on x32 server2003 and XP.
I registry the dll before i use it using regsvr32.
This all works fine on x32.
On x64 the regsvr32.exe reports the dll has been registered successfully. However when i try and use the dll from vbscript i get error message that ActiveX cannot create the object "ddlname.module"

Any ideas what i need to do?
I have tried copying the dll into c:windowssystem32 and into the WOW folder.

Thanks,
mrmovie

TAPI And Windows Server 2003 SP2
I've developed Answering machine program and i've used TAPI 3 in this program
this program works in winXP SP2 and win Server 2003 SP1 completely
but it can't handle incoming call and detect DTMF keys in win Server 2003 SP2
does microsoft put any limitation on windows server 2003 SP2 ?
does this link have any relation with this problem ? if yes how can i solve this problem ?
http://www.microsoft.com/downloads/details.aspx?FamilyId=0097FE14-1D6B-4423-A437-DEA1ED665A07&displaylang=en

thanks

Windows Server 2003, ActiveX, ASP
migrating an asp/vb6 active x site from win2000 to win2003. setting up activex on 2003 has proven to be fairly frustrating. i can't get the asp page to instantiate the component, so i'm assuming that the permisssions aren't set correctly. 2 of us have been scouring the web since yesterday and haven't been successful in getting this going. does anyone have any decent resources for getting this set up?

Bill Bolte
http://www.billbolte.com | http://www.circle37.com
http://www.oldbarnsite.com | http://www.oldutguy.com

Windows Server 2003 Component Services
I have an active x dll that I have written in VB6.0. For the last year it has been running great as a component service in com + (MTS) on a windows 2000 server box. I am now wanting to utilize some of the new features of Windows Server 2003 with this component. I have installed it on a windows server 2003 box and am receiving an Error 48: Error in Loading Dll. If I use the dll from my calling program without registering under component services on the W2k3 Server machine it works fine. Once I register it in component services as a Server Application I receive the Error in loading Dll.

Any help would be greatly appreciated!

C

VB6 Automation Failing On Windows 2003 Server W/SP1...
I hope that I'm in the correct forum for this

I had service pack 1 get installed on our Windows 2003 Server (Standard Ed) that we use as a Terminal Server.

Now my ADOX automation for creating a table in MS Access does not work. It works if you are not on the Terminal Server.

Has anyone run into this problem/have some idea for a workaround? I'd really appreciate it.

Here is my creation code:

Code:
'Create the hours table
Private Sub CreateTable()
Dim objCat As ADOX.Catalog, objMyTable As ADOX.Table, objColumn As ADOX.Column
Dim oKey As ADOX.Key, TableName As String, TheDate As Date

Set rstHours = Nothing
Set cmdHours = Nothing

Set objCat = Nothing
Set objMyTable = Nothing
Set objColumn = Nothing
Set oKey = Nothing

'ADOX creation
Set objCat = New ADOX.Catalog

objCat.ActiveConnection = conHoursDB

If Weekday(Date) = vbSunday Then
TheDate = Date
Else
Select Case Weekday(Date)
Case vbMonday
TheDate = Date + 6
Case vbTuesday
TheDate = Date + 5
Case vbWednesday
TheDate = Date + 4
Case vbThursday
TheDate = Date + 3
Case vbFriday
TheDate = Date + 2
Case vbSaturday
TheDate = Date + 1
End Select
End If

Do While Not Month(Date) = Month(TheDate)
TheDate = TheDate - 1
Loop

'Tablenames in format hrs_##/##/####
TableName = "hrs_" & Format(TheDate, "Short Date")

'Setting table properties
Set objMyTable = New ADOX.Table

With objMyTable
.Name = TableName
End With

'Append table name into database
objCat.Tables.Append objMyTable

'Sets all the column properties in table
Set objColumn = New ADOX.Column
With objColumn
'jobdate
.Name = "jobdate"
.Type = adDate
End With

objCat.Tables(TableName).Columns.Append objColumn

Set objColumn = Nothing

Set objColumn = New ADOX.Column
With objColumn
'job number
.Name = "jobno"
.Type = adVarWChar
.DefinedSize = 20
End With

objCat.Tables(TableName).Columns.Append objColumn

Set objColumn = Nothing

Set objColumn = New ADOX.Column
With objColumn
'job code (shown as task code)
.Name = "jobcode"
.Type = adVarWChar
.DefinedSize = 20
End With

objCat.Tables(TableName).Columns.Append objColumn

Set objColumn = Nothing

Set objColumn = New ADOX.Column
With objColumn
'hours worked
.Name = "hours"
.Type = adSingle
.NumericScale = 2
End With

objCat.Tables(TableName).Columns.Append objColumn

Set objColumn = Nothing

Set objColumn = New ADOX.Column
With objColumn
'time started
.Name = "timestarted"
.Type = adDate
End With

objCat.Tables(TableName).Columns.Append objColumn

Set objColumn = Nothing

Set objColumn = New ADOX.Column
With objColumn
'description.. a memo field. can store up to 65k characters
.Name = "description"
.Type = adLongVarWChar
End With

objCat.Tables(TableName).Columns.Append objColumn

Set objColumn = Nothing

Set objColumn = New ADOX.Column
With objColumn
'hours
.Name = "thours"
.Type = adInteger
End With

objCat.Tables(TableName).Columns.Append objColumn

Set objColumn = Nothing

Set objColumn = New ADOX.Column
With objColumn
'minutes
.Name = "tmins"
.Type = adInteger
End With

objCat.Tables(TableName).Columns.Append objColumn

Set objColumn = Nothing

Set objColumn = New ADOX.Column
With objColumn
'index
.Name = "index"
.Type = adInteger
Set .ParentCatalog = objCat
.Properties("AutoIncrement") = True
End With

objCat.Tables(TableName).Columns.Append objColumn

Set oKey = New ADOX.Key
With oKey
'set index as primary key
.Name = "UniqueKey"
.Type = adKeyPrimary
.RelatedTable = "tablename"
.Columns.Append "index"
End With

objCat.Tables(TableName).Keys.Append oKey

objCat.Tables.Refresh

conHoursDB.Close
'Set the database connection
conHoursDB.Mode = adModeShareDenyNone
conHoursDB.CursorLocation = adUseClient
conHoursDB.Provider = "Microsoft.Jet.OLEDB.4.0"
conHoursDB.ConnectionString = _
"Persist Security Info=False;" & _
"Data Source=" & App.Path & "hours.mdb"
conHoursDB.Open

Set objMyTable = Nothing
Set objColumn = Nothing
Set oKey = Nothing
Set objCat = Nothing

'Processor/Database catchup time
DoEvents

'Load the table
LoadMain (TableName)

End Sub

Compatibility With Windows 2003 Server Issue!
dear all,

i am experiencing a very weird behaviour i cannot get an understanding and worse, a solution for it. basically, a compiled file that works perfectly in windows versions 98, Me, 2000, XP does not so in windows 2003, but the strange thing is: if i compile the very same code under windows 2003, it perfectly works on 2003, though this time it crashes under the previous windows versions. i repeat: no code change.

i've tracked the error down by compiling under 2003 and exporting the file to 2000, until it didn't crash anymore. what is causing this crash is the clearing of a combo box:

Code:
Main.cmb_newsletters_list.Clear

does anyone know what you have to do to make this work on all versions of windows? is there a DLL that needs to be depolyed?

really lost on this one... hopefully some of you gurus out there can give me an hint...

thank you in advance,

wc.

Deleting A File From VB 6.0 In Windows Server 2003
I'm trying to delete a file in Windows Server 2003 using an EXE in Vb 6.0

In another operative system, when I have the file opened in word (so the file is locked), for example, VB returns an error. The error Number is 70 (permission denied). I rely on this error number to do some other things in the program.

But when I run the program in Windows Server 2003, it gives me no error (ErrorNumber = 0 ).

Does anybody know ahy is this happening?

THanks

Visual Basic 6.0 And 64-bit Windows 2003 Server
Hi:

1) can I install visual studio 6.0 on a 64-bit windows 2003 server?
2) can I run a 32-bit visual basic 6.0 code on the 64-bit windows 2003 server? My code calls some library API, like: kernel32, advapi32.dll...

Thanks,

Installation Problems On Windows Server 2003
Hello,

I wrote a vb6 application that uses the crystal 9 components to print a report. This appliction is kind of a scheduler that will print the report at a certain time every morning. I created a setup using the VB P&D and I tried to install it on a "Windows 2003 Server". The install go all the way to where you see "Setup is updating your System" and it hangs up. I've let it sit there for about 30 minutes but is never goes away. When I look at task manager it says it is not responding. I tried this on a couple of "Windows 2003 Servers" and it did the same on both. Any help would be greatly appreciated.

Thanks in advance,

UncleT

Windows 2003 Server + SQL Server
Hi there

We have been testing out Apps out on Windows Server 2003, and we have a problem. We are using VB6 and SQL Server 2000. When we run an SQL back up command from within the App,

BACKUP DATABASE ustdef TO DISK = 'c:appfolderustdef.bak'

the backup file doesn't get created. On other OSs there is no prblem. If the file already exists the back up file overwrites it correctly. However when the file does not already exist, it is not overwritten. From within query analyser the same sql works fine.

So I am guessing it is a permissions problem.
How can I fix this? I have seen some information about "migrating" apps to 2003, is this something I have to deal with?

Thanks

MAPI Error On Windows Server For Small Business 2003
I'm running Windows Server for Small Business 2003 (SP2) and a small app that will send a MAPI email.

When the MAPISession.SignOn method is called it immediately produces an error 32002 (unspecified failure has occurred). We're using Outlook Express as the email client (yes, it's set as the Windows default email program, and yes, it works perfectly when accessed directly).
It works fine on other machines, but it seems that the error is because of Windows 2003 Server for Small Business Server.

Code as simple as:
Me.MAPISession1.SignOn

Interface Of Active Exe Project Not Visible On Windows 2003 Server
Hi,

I've got the following issue. I've got a VB active exe project, which I instantiate from SQL Server. The project contains some code and a simple interface (form). Normally in nt4, w2k and such, the executable only shows up in the taskmanager, but has no user interface. I solved this, by using DCOMCNFG and setting the identity to the 'interactive user' instead of 'launching user'.
This worked like a charm. I also must note, that it can work as the launching user, only when SQL Server is started from command line, instead of as a service.
But now I'm using windows 2003 server, and I have something similar, working when SQL Server is started command line, but not as a service. So I change the identity to 'interactive user' and it still doesnt work?!?

Does anyone have similar experiences and found a solution?

Thanks in advance.

Best regards,

Eric

This Script Works On Win2k Server But Not 2003 Server.... WHY?
I have crafted the below script (actually I used a script from another person and added my own stuff to it). It goes out and checks for the existance of a database and reports back to Big Brother what it finds. It works GREAT on Windows Server 2k but spins errors when I run it on Windows 2003 Server.... Any ideas?

Please see attached txt file for code.

When run on the 2003 server it claims to have an error on line 229 which is clearly not the point of difficulty.
Line 229

Code:

SET counterCollection = GETOBJECT("winmgmts:" & strCollection & "=" & strInstance)

VB Or Windows Related--Accuracy Of Timers
a friend of mine here was an embedded devices programmer at his last job. He programmed GPS Units (with an embedded ROM Chip) in a C Like scripting library----Every second on the second, the unit would fire an update via a wireless socket to tell the central server where it was, based on it's GPS Coordinates.

Now to my point (lol).

He also programmed a simulation in VB accessing the GPS Unit via it's COM Port. He had a custom GPS Unit where he could manually specify the GPS Coordinates for the device to use. What he did was create a routine to output (via the MSComm Object) a series of GPS Coordinates every one second. I don't know exactly how the timer function of the GPS was handled internally, but he guaranteed me it was accurate within a few .000001 seconds---which we'll have to take as fact.....

Anyway---he said he played with using VB's Timer control, Third Party Timer controls, and API's and in every instance, the time the GPS unit would recieve the data (before it's one second update) would vary by a range of 3-6 milliseconds.

Again--this is something that I don't have any experience in---I've never really been concerned with the exact precision of timers....just that they fire. But is the behavior that he found expected (c'mon you experts ) and is that behavior due to windows design and the fact that it's not intended to be a real-time OS?

VB: Timers, Forms, And Popup Windows
To all VB Wizards and Gurus:

I have made up an autohide desktop menu program, and have done quite well putting it together. But, as ususal I have encountered a bad problem or two. Correct me if I am wrong, I have had to shut off all timers so I could throw up a 'popup' form to ask for a password for menu access. Also I can make the menu disappear and re-appear using the feature called: form.visible = false or true. But when I make the menu disappear and throw up a 'popup' form for a password, my major problem suddenly appears. The problem is that the form starts to get focus and loses focus and this goes on for ever, and my computer locks up. So I have to end the whole VB interactive session. This where I need the help! What can I do to remedy this problem. I use the call: 'form1.show modal' to call up the form and then unload the form when I am finished with the form. How should I make the call and use it conjunction with 'form.visible = false'. The problem only surfaces when I use the feature 'form.visible = false', if it is set to 'true', I have no problems. But I want to make the call when the interactive menu form has disappeared. The only thing or item that I can access it a rotating icon within the system icon tray.
I have tried a few ideas thinking it would work, but it has be a nightmare.

Hey, any help surely would be appreciated. Thanks('TIA')...

VBFingers...
Rsvp.

Question About Windows OS Clock, Timers, && A 24/7 VB Program
Hello All,

I've heard or read a while back that window's PC's have to be re-booted after a certain amount of days if the PC was left ON continuously.

Is this true? Has anyone else heard or know something about this?

Trying to find out what software implications, if any, that one has to worry about if a PC was left running all the time. Will it cause a VB program running 24/7 to crash? Special if it was utilizing Windows timers such as; Query Performance Counter, Get Tick Count() methods, Multimedia Timers etc. Etc.

Thanks.

ADO, SQL SVR, Windows 2003 R1 And R2
Has anyone come across the following bug before:-

we have 2 servers, one running Windows 2003 release 1, and the other running Windows 2003 release 2. Using VB6 and ADO to connect to SQL Server 2000.

This VB code only works on Release 1:-

frm.AdodcTemp.Refresh
frm.AdodcTemp.RecordSet.Update

Where as the above code only works on Release 2 when put like this:-

frm.AdodcTemp.RecordSet.Update
frm.AdodcTemp.Refresh

Just doesnt make sense. Anyone come across ADO errors (Probably more like lower level problems) of this type before ? We're using MDAC 2.8 on all.

Need Help With VB In Windows 2003
I have a program that we've moved from a windows 2000 server to a new windows 2003 server. But ever since then, any time I get an error like "active X can't create object" It pops up a message box, instead of just doing the "on error goto Error_handler" code. Does anyone know if 2003 has any sort of setting that might be causing this behavior. Its quite irritating.

VB In Windows 2003
I want to load VB in Windows 2003 server.
Is it possible?

is it give any problem while creating the setup of a VB project?

bye

S.Muhilan

Need Some SQL Server 2003 Help
I have setup my HD with three partitions (OS, programs/data, paging). I have loaded the OS on the first partition and finished this weekend loading all of my programs onto the second. I have a couple of questions hopefully someone can answer.

First, when I tried installing SQL it would not prompt me to a location, it just loaded it onto the C drive or my volume set up for the OS only. Since this volume is limited in size I do not want anything on it other than the OS. I am going to uninstall SQL but does anyone know how to force it to save to another volume other than C:?

Second, not sure if anyone would know off the top of there head, but it seems that when I loaded MS office, etc. onto the second partition (Z drive) that it created small files on my C drive in the programs section. Not sure why since I requested it save to my Z drive. Are these startup files? If so can I remove them completely, or move them to the Z volume, or will I have some problems? This was mostly for MS software such as Office and VB 2005, etc. Thanks for the help.

FSO Vs. Win Server 2003
A real mind bender...

I am running a VB6 app that copies data from a folder into a subfolder.

Here is the main loop:

Code:
Set re = New RegExp
re.Pattern = sMatchPattern
For Each oFile In oFolder.Files
If iProcessCounter = iProcessMax Then Exit For 'Limit the number of files processed.
sFileName = oFile.Name
Set cMatches = re.Execute(sFileName)
For Each sMatch In cMatches
If sMatch.SubMatches(2) > "" Then ' This captures "(x)" if it exists.
sNewSerial = sMatch.SubMatches(0) & sMatch.SubMatches(1)
sNewSerialPath = sMainDataPath & sNewSerial
sTargetPathFile = sNewSerialPath & "" & sNewSerial & ".0000."
sSourcePathFile = sMainDataPath & sMatch.Value & ".0000."
Else
sNewSerialPath = sMainDataPath & sMatch.Value
sNewSerial = sMatch.Value
sSourcePathFile = sMainDataPath & sMatch.Value & ".0000."
sTargetPathFile = sNewSerialPath & "" & sMatch.Value & ".0000."
End If
sFilesToDelete = sMainDataPath & sMatch.Value & ".0000.*"
If Not oFSO.FolderExists(sNewSerialPath) Then oFSO.CreateFolder (sNewSerialPath) ' Create Folder.
CopyFiles sSourcePathFile, sTargetPathFile
ConsolidateFiles sNewSerialPath, sNewSerial
oFSO.DeleteFile (sFilesToDelete) ' Delete files.
iProcessCounter = iProcessCounter + 1
Exit For
Next
Skip:
Next

Print #9, "Total Processed = " & iProcessCounter
Set re = Nothing
Set oFolder = Nothing
Set oFSO = Nothing

And here is the routine that does the copy/rename.

Code:
Public Sub CopyFiles(sSource As String, sTarget As String)

Dim oFSO As FileSystemObject
Dim oFolder As Folder
Dim oFile As File
Dim sNewSource As String
Dim sNewTarget As String
Dim iI As Integer

On Error GoTo ErrorHandler

Set oFSO = New FileSystemObject

For iI = 1 To 4
Select Case iI
Case 1
sNewSource = sSource & "ZED"
sNewTarget = sTarget & "ZED"
Case 2
sNewSource = sSource & "BND"
sNewTarget = sTarget & "BND"
Case 3
sNewSource = sSource & "ASC"
sNewTarget = sTarget & "ASC"
Case 4
sNewSource = sSource & "RAW"
sNewTarget = sTarget & "RAW"
End Select
oFSO.CopyFile sNewSource, sNewTarget, True
Next

Exit Sub

ErrorHandler:

Print #9, "CopyFiles Error: " & Err.Number & " " & Err.Description

End Sub

There are times when the serial number files, 123456-1, get 123456-1(1), so I have to remove that or else the rest of the system barfs.

Well... when I run it on my desktop, it's fine - regardless of whether I am on the local drive or on the remote drive. When I run it on the Win2k3 Server box (compiled), it starts to create different folders!

Ideally, the folders should look like this:

P:Main123456-1
- and within -
Test Result <date> <time>
Test Result <date> <time> (there could be a number of these)
- and files within.

Now, when I run this on the server box, instead of fitting everything neatly within the one folder (P:Main123456-1), it creates a SECOND folder, P:Main123456-1(1)!!!

Any thoughts?

Thanks!

The ini file that contained the match pattern was different on the server.

2003 Server Vs Win XP
I have a VB6 app with SQL 2000 data that works great on multiple Win XP machines. I then installed the app on a 2003 server Sp2 with SQL 2000 and suddenly the code that use to open one window, opens 20+ windows.

Essentially its an Order Entry screen and you select a button to open the Part screen in "add" mode. Only you get numerous Part screens that open.

Could it be an MDAC version issue?
Any ideas/suggestions would be great!

Thanks

Createdirectory In Windows 2003....
Here is an application i create to test createdirectory in windows 2003, because the application using that code dont work anymore.

is there anywhere that says it wont work with windows 2003? or am i doing something wrong?

Code:
Option Explicit

Private Declare Function CreateDirectory Lib "kernel32" Alias "CreateDirectoryA" (ByVal lpPathName As String, lpSecurityAttributes As SECURITY_ATTRIBUTES) As Long
Private Type SECURITY_ATTRIBUTES
nLength As Long
lpSecurityDescriptor As Long
bInheritHandle As Long
End Type

Private Sub Command1_Click()
Dim lngReturn As Long
Dim strRepertoire As String
strRepertoire = "D:logicielsapplications
gp est est"

If Dir(strRepertoire, vbDirectory) = "" Then
'In general section

Dim Security As SECURITY_ATTRIBUTES

lngReturn = CreateDirectory(strRepertoire, Security)

'If CreateDirectory returns 0, the function has failed
If lngReturn = 0 Then
GoTo err_fncCreerRepertoire
End If
End If

MsgBox "ca marche"

err_fin:
Exit Sub

err_fncCreerRepertoire:
MsgBox Err.Description
End Sub

VB4, Windows 2003 && SQL 2000
I have an old VB4 application that sits on an NT machine and connects to a SQL Server 6.5. Microsoft is de-supporting NT so I want to move the application to Windows Server 2003 and connect to SQL Server 2000. The application works fine on 2000 (connecting to SQL2000) but when I try it on 2003 it will not connect to the database.

The application is written in VB4 using WinCGI - I'm creating an .exe. IIS does not support the WinCGI interface natively so in order to make the application run the IS2WCGI.dll library is used to translate the WinCGI app to something compatible with IIS. This *should* not be the problem but just thought I should include it to be complete, I can run a WinCGI app it's just the database connection that's giving me the problem.

Where I am at right now is just forgetting the whole application and just writing a simple test that will connect to the database.

The error I get is:
"Object required (error #424)"

And yes, we could upgrade from VB4 but that is not an option at this time, we may just run it on 2000 but I'd really like to solve this problem or at least confirm that it just will not run on 2003.

Code that I have tried (all get the same error):

____________________________________
Dim rdoSuperann As rdoConnection
Set rdoSuperann = rdoEnvironments(0).OpenConnection("My_DSN", rdDriverNoPrompt, True, "DSN=My_DSN;UID=username;PWD=password;DATABASE=database")
____________________________________
Dim my_Conn As Object
Set my_Conn = Server.CreateObject("ADODB.Connection")

____________________________________
Dim db As Database
Dim connect As String
connect$ = "ODBC;DSN=My_DSN;UID=username;PWD=password;DATABASE=database;"
Set db = OpenDatabase("", False, False, connect$)
____________________________________

I have an ODBC data source defined (it connects fine).

Now this may just be my inexperience with VB4 but any suggestions would be great If you need anymore info please let me know. Thanks.

VB6 && Windows Mobile 2003
is it all application compiled with vb6 can be use in pocket pc that running win mobile 2003?

i developed a simple client file database system using vb6 with access database, so, is it any problem if i wish to install it in my client pocket pc?

Our VB 6 App Running On Windows 2003 SBS
I work for a software house. Our main product is a 2-tier personell
rostering system written in VB6 connecting to a SQL 2000 database.

Many of our customers are now moving to Windows 2003 server from either
Windows NT Server or Windows 2000 Server.

What several of our customers are telling us (and we actually had one
of the machines shipped back to us to re-produce the problem) is that
after a re-boot, the application will run fine for a few hours, but
will then begin to grind to a halt and the application will hang.

This only seems to happen when they use terminal services to run the
app directly on the box, rather than installing our application on
their own desktop PC and connecting to SQL on the W2003 server.

We also have a VB6 Windows service which runs on the server which does various
backgrounds tasks, which also grinds to a halt.

What we notice with the machine that one of our customers has shipped
back to us (windows 2003 Small business server), is that when this VB6
service is running the memory usage and the number of handles increases
at an alarming rate and never returns to "normal".

The average usage of this VB6 service is about 10-20 MB of memory and
about 150 handles.

What we are seeing is the memory usage hitting 140MB and the handle
count hitting up to 100,000 handles!!!

If I run this VB6 service on my development machine (XP Pro), connected
to the database on the customer machine, then the behaviour appears
normal.

We have therefore ruled out any problems with SQL Server on this
machine.

Incidentally, it is SQL Server 2000 SP3. I also installed SP1 for
Windows 2003 yesterday and made sure that all critical updates had been
applied.

The spec of the machine is an IBM 2.8Ghz Pentium CPU (HT technology),
1.5GB of RAM and 100GB SATA drive.

What we have found, having spoken to our customers who are experiencing this problem is that they are ALL using Windows 2003 Small Business Server, rather than "standard" Windows 2003 Server.

What I have tried today is to build a Windows 2003 Server (not small business server), and the applications run without any problems.

There is obviously something different between Windows 2003 server and the small business edition, where memory allocation and handle allocation is concerned, but I cannot find out what this difference is.

Has anyone else had experience of this problem?

I've searched for pretty much every combination of search words on the
net and cannot find anything?

I hope someone out there can help!!

Regards
Guy

Windows Mobile 2003 And EVB
Hello,

it's possible use eVB for programming Windows Mobile 2003 device ?

Thanks

skimans

Server 2000 Vs 2003 - Please Help???
Hi Folks,

We are thinking about installing server software at our office and I would like your thoughts on both Microsoft Server 2000 and 2003. Any advice would be greatly appreciated.

Thanks in advance,

Dave

Win Server 2000 - 2003
I am upgrading my Windows server from 2000 to 2003.

I have configured IIS 6.0 and copied my files into the wwwroot folder just like it was on my previous server. The settings are the same ... as far as I know and the DSN connection is the same, the ODBC setup is the same. For some reason my asp pages that connect to the database just refuse to work!!!

Does anyone else have this problem??? Please help me!!

Microsoft Server 2003
Hi,

I have a quick question. If I am trying to retrieve some records from Access, that is located in a server that runs on Microsoft Server 2003. Does the way I connect to the database(access) is the same as I connect to local drive? So I just change the path?? Or is there any other way? I have been using the following to connect to local database:

MyConn.Open "Provider = microsoft.jet.oledb.4.0; Data source = C:Commission.mdb;"
MyRecSet.CursorLocation = adUseClient
MyRecSet.Open "SELECT AgentName, CommPercent FROM Agents_Changes ", MyConn

Thank you.

Installing VS6 On Win 2003 Server
Hi I have a problem instaling VB6 on a Win 2003 terminal server. (I have tried both in local mode and using TS both with full admin rights)

I get an error when completing the setup telling me to re-run the installation. The server application error log provides this:

Event Type:Information
Event Source:Application Error
Event Category:(100)
Event ID:1004
Date:22/12/2004
Time:08:34:29
User:N/A
Computer:********
Description:
Reporting queued error: faulting application ACMSETUP.EXE, version 0.0.0.0, faulting module oleaut32.dll, version 5.2.3790.0, fault address 0x00060484.

There is vry little regarding this issue but it seems related to a oleaut32.dll versiion conflict. Anyone got any ideas??

Running And A 2003 Server
Hi,
Please let me know the requierements in order to run VB 6.0 on a 2003 server.
Thanks
Xavier

Connecting To SQL Server 2003
I've never done this before so I was hoping someone could guide me through. I need to be able to log onto a database on SQL Server 2003 and run a few SQL scripts from within VB 6. Can anyone please tell me the best way of doing this ?.

Kind regards

Mart

POP3 On Windows 2003 Using NTLM....
Anyone have any idea how to either connect to the POP3 Service on Windows 2003 using NTLM, or to disalble NTLM for POP3?

I wrote a program to read POP3 messages, but got thrown for a loop with NTLM when we tried to use Microsofts POP3 Service....

VB6 Windows 2003 Porting Checklist
Hello All,

I have a VB 6 application (EXE, compiled in VB6 SP4). This communicates with a VC++ application, and some thrid party objects (COM server), all running on a Win 2k box.

I am looking to upgrade to Windows 2003. Reading on the forum, I see that in general VB 6 applications run on Windows 2003, but I was wondering if there is a list of things to look out for when porting to Windows 2003?
E.g.: specific Service pack installs, any VB6 runtime / DLLs installs etc

Are ther any links to articles discussing porting of VB6 applications to Windows 2003 that you can point me to?

thanks in advance.

Disable Screensaver In Windows XP/2003
This code doesn't works...

VB Code:
Private Const SPI_SETSCREENSAVEACTIVE = 17 Private Declare Function SystemParametersInfo Lib "user32" & _ Alias "SystemParametersInfoA" (ByVal uAction As Long, & _ ByVal uParam As Long, ByVal lpvParam As Long, & _ ByVal fuWinIni As Long) As Long Public Function EnableScreenSaver(ByVal bStatus As Boolean) As Boolean Dim lActiveFlag As Long Dim lRetval As Long lActiveFlag = IIf(bStatus, 1, 0) lRetval = SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, & _ lActiveFlag, 0, 0) IF lRetval > 0 THEN EnableScreenSaver = TRUE ELSE EnableScreenSaver = FALSE END IF End Function