Visual Basic :: MS Word App, Memory "read" Error

How To Trace VB6 Error "memory Could Not Be Read".
From a few (not all) of my clients, I'm getting the old:

The instruction as "0x..." referenced memory at "0x00000000". The memory could not be "read".

This is an OS trapped error and not a trapable error in my VB6 app. Which usually indicates some dependancy (DLL) along the way is not installed or registered correctly on the client machine and/or that DLL has crashed and failed. I'm not able to reproduce in my dev environment so I'm certain this is a deployment/install problem -- aka DLL Hell.

Is there any tool I can install on my client PC to help me trace more specifically what the trigger is for this error? About the only other option I can think of is to hard code a trace option that logs every method function that is entered to a file (a huge file at that).

If someone knows of any tools that can help with situations like this, please let me know.

Thanks, Rob.

"REferenced Memory Can Not Be Read" Error
Can anybody tell me what this error eans and how I can debug it?

The Memory Could Not Be "read" - Error
Hello
I'm writing some VB code in outlook VB editor.
I've added one simple thread to the project, and it sometimes couses an error:

The instruction at "0x.." referenced memory as "0x..". The memory could not be "read".
Click on OK to terminate the program
Cancel to debug..

The error doesn't occur all the time i try to run the thread, but some times...

What can be the reason?

Thanks,
anastacia

Open "Read Only" Word Doc As In "Non Read Only" Mode
I have a bunch of "Read Only" word documents that the user has to choose from to open and edit. Since they are read only, upon opening the file I need to change the mode so the document can be saved with the same title. I found an entry by doing a search in this forum but I can't get it to work. This is the code I found.

Code:
wdApp.Documents.Open filename:="C: est.doc", ReadOnly:=True
This is how I am trying to use it with my code. It is giving me the following compiler error:
Expected: end of statement.

Code:
Dim objWdApp As Word.Application
Dim objWdDoc As Word.Document
Dim objWdRange As Word.Range
Set objWdApp = New Word.Application
Set objWdDoc = objWdApp.Documents.Open(DocPath), ReadOnly:=True
Thanks for any help you can give!

gfolz

Pleez, Read This!!! Matter Important! "Printing In "DOS Mode" Using "Shell" -not Happening, I Wonder
Hi

[I had to repost it since I have not received any replies for my earlier post]

I have a problem.

Following is the code :

Shell("c:windowscommand.com /c type " & App.path & "matrix.txt >prn")

where App.path is C:XYZ

when the above line is executed, the contents of "matrix.txt" is not printed on the printer. Instead, control just passes on to the next line.

So, to find out why, I modified the line thus.

Shell("c:windowscommand.com /K")

The above command takes me to the "command prompt". Here, when I give the command "type c:xyzmatrix.txt >prn", which is what the vbcode does, I get the message "file creation error".

So, I have identified the problem. Can anyone tell me why this "File creation error" occurs, And how to solve the problem?

Thanks for reading through.

Solution> Error: """"&&H8007007E (-2147024770) The Specified Module Cannot Be Found"""
Hello

This is the error what i am getting after installing a package of one of my module on user testing machine.
The same module being working fine on others.

What can be the reason for this and what can be the probable solution for this?

Sandeep

"Error During Loading","Out Of Memory" :O(
I programmed my graduation project by visual basic and after 6 months of work ,suddenly the program didn't run

i got a massege saying "Errors during load .refer to 'D:......form1.log' for details" ,after clicking ok another message appears saying "out of memory" ,then nothing happened and the program didn't run.........
the program was working well, all what have been changed is that i installed a fresh copy of windows xp, then the problem happened........
does anyone can help ,my graduation project test is in the coming 3 weeks, i am in a very difficult attitude.............

VB6 SP6 "Memory Cannot Be Written/Read Errors"
I am getting these errors (VB6 SP6 "Memory cannot be written/Read Errors") and crashes in VB6 SP6 IDE, I am unable to work , can anybody help me with this.

Old Question, But Help, Memory Could Not Be "read"
OK, this is really pissin me off, and i know u all have seen this before.

First off, i have:

VB6 32bit Version 8176

When i open a project and do object view, it crashes, When i add an About form, it crashes, and those are the only 2 instances where i know it WILL crash. Other than that, it crashes so many times i can not complete ANYTHING!

It says the memory could not be "read"

ive read some things, but i never find out how to fix it, HELP ME ASAP plz....

THNX

How To Read Memory For "Text"
Hi all

This code,using readlong,writelong.
Property: Long

I need there a readtext memory.

Long OK,Byte OK,... OK,but I dont read "Text Values"

How to do this?

Private Const PROCESS_ALL_ACCESS As Long = &H1F0FFF

Private Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hwnd As Long, lpdwProcessId As Long) As Long
Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Private Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Long, ByVal lpBaseAddress As Any, lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long
Private Declare Function ReadProcessMemory Lib "kernel32" (ByVal hProcess As Long, ByVal lpBaseAddress As Any, ByVal lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal Classname As String, ByVal WindowName As String) As Long
Private Declare Function ReadProcessMem Lib "kernel32" Alias "ReadProcessMemory" (ByVal hProcess As Long, ByVal lpBaseAddress As Any, ByRef lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long

'||-------------------------------------------------------------------------------------------------||
'|| The two next functions readwrite LONG values. ||
'|| LONG is a 32-bit(4 byte) datatype and can store values from -2,147,483,648 to 2,147,483,647 ||
'||-------------------------------------------------------------------------------------------------||

Public Function ReadLong(Offset As Long, WindowName As String) As Long

Dim hwnd As Long
Dim ProcessID As Long
Dim ProcessHandle As Long
Dim Value As Long

'Try to find the window that was passed in the variable WindowName to this function.
hwnd = FindWindow(vbNullString, WindowName)

If hwnd = 0 Then

'This is executed if the window cannot be found.
'You can add or write your own code here to customize your program.

MsgBox "Run The Game First!", vbOKOnly, "Error Reading Game"

Exit Function

End If

'Get the window's process ID.
GetWindowThreadProcessId hwnd, ProcessID

'Get a process handle
ProcessHandle = OpenProcess(PROCESS_ALL_ACCESS, False, ProcessID)

If ProcessHandle = 0 Then

'This is executed if a process handle cannot be found.
'You can add or write your own code here to customize your program.

MsgBox "Could not get a process handle!", vbCritical, "Read error"

Exit Function

End If

'Read a LONG from the specified memory offset.
ReadProcessMem ProcessHandle, Offset, Value, 4, 0&

'Return the found memory value.
ReadLong = Value

'It is important to close the current process handle.
CloseHandle ProcessHandle

End Function

Public Function WriteLong(Offset As Long, WindowName As String, Value As Long) As Boolean

Dim hwnd As Long
Dim ProcessID As Long
Dim ProcessHandle As Long

'Try to find the window that was passed in the variable WindowName to this function.
hwnd = FindWindow(vbNullString, WindowName)

If hwnd = 0 Then

'This is executed if the window cannot be found.
'You can add or write your own code here to customize your program.

MsgBox "Run The Game First!", vbOKOnly, "Write error"

Exit Function

End If

'Get the window's process ID.
GetWindowThreadProcessId hwnd, ProcessID

'Get a process handle
ProcessHandle = OpenProcess(PROCESS_ALL_ACCESS, False, ProcessID)

If ProcessHandle = 0 Then

'This is executed if a process handle cannot be found.
'You can add or write your own code here to customize your program.

MsgBox "Could not get a process handle!", vbCritical, "Write error"

Exit Function

End If

'Read a LONG from the specified memory offset.
WriteProcessMemory ProcessHandle, Offset, Value, 4, 0&

'It is important to close the current process handle.
CloseHandle ProcessHandle

End Function

Getting The File "Type" Descriptions (i.e., "doc" = "Microsoft Word Docume
Hello there,
I am creating an Explorer-type Listview to display the files in a directory, and one piece of info I need to know how to obtain is the file "type" (i.e., "doc" = "Mircosoft Word Document", "xls" = "Microsoft Excel Worksheet", etc.). Is there an API, or does anyone have a technique to do this? Thanks.

Changing The "title" Of A VB Created Word Doc From "Document1" 2 "BadgerBai
Ok, when I create a new word doc it automatically takes on the name "DocumentX", where X is a number greater than 1.
What I want to do is change this by using something like:

VB Code:
Dim objWoof As New Word.ApplicationDim objGrowl As Word.Document Set objGrowl = objWoof.Documents.Add objGrowl.[What Property] = "Badger Baiters R Us"

Is this possible?

Oh, and b4 anyone mentions it, I do NOT want to save it, that is NOT an option...just getting that out the way now

Rarararrrrrrrrr

Woka

Read "dropped" Data From Word Document
He guys,

How are the languages going ? I have a tough one.... (i gues).

I want to make a program that can read the data from a Word document and write it back
into a MySQL database. The Word document would be a pre-defined layout, (like any compy's
have some standard documents) with text on pre-defined positions. The app should have a drop
box, where you can drag your Word document on, and the app should read the data from the document
into the MySQL database.

Maybe you can help me, how to fix this one ?

I hope. Thanks,

Digital Human

Its just my Digital Livestyle.....

Read From Textbox Into "'", Text9.Text, "'", Dont Works
HI

I am traint to read from Text9.Text and this dont works ????

On Error Resume Next
Dim Text7 As Long, editx As Long
Text7 = FindWindow(",text7.text,", vbNullString)
editx = FindWindowEx(Text8.Text, 0&, "'", Text9.Text, "'", vbNullString)
Call SendMessageByString(editx, WM_SETTEXT, 0, Text1)

Terminal Em To Embedded Device, Runtime Error 7 "Out Of Memory"
All,

I've had to get a terminal emulator together for work, supporting an embedded device. I've got everything working, but keep getting a "Runtime Errror 7, Out of Memory" any time I "stress test" the terminal or the terminal is left running for a long time. My stress test involves repeatedly sending a string from an embedded device at a high rate.

To start, I grabbed the example terminal emulator code from the VB6 pro examples section and modified it to my needs. As I run and stress test the program, I get the Out of Memmory error in the MSComm comEvReceive. Here is my code in this case statement.

**********************************************************
Select Case MSComm1.CommEvent
' Event messages.
Case comEvReceive
Dim Buffer As Variant

Do While MSComm1.InBufferCount > 0

Buffer = MSComm1.Input
error here ===>> ShowData txtTerm, (StrConv(Buffer, vbUnicode))

If LCase((StrConv(Buffer, vbUnicode))) = "b" Then trapsig = True
If trapsig Then
bootmsg = bootmsg & Buffer
charcnt = charcnt + 1
End If

If charcnt > 4 Then
If LCase((StrConv(bootmsg, vbUnicode))) = "boot" Then
Call bootbuddy
trapsig = False
bootmsg = ""
Command1.Caption = "BootLoader Trap Disabled"
Else
bootmsg = ""
Command1.Caption = "BootLoader Trap Disabled"
End If
End If
Loop

**********************************************************

I've tried a variety of things to inclued:

1. Install the ActiveX Control Pad for FM20.DLL(SP?) problem.
2. Initialized the common controls on form load. (InitCommonControls)
Private Declare Sub InitCommonControls Lib comctl32.dll"()
3. Used PDW to install executable locally.
4. Compiled the executable to PCode and Native

Any help will be greatly appreciated and I will post more code on request.

Steve

I Use HOVERBUTTONS And On RUN TIME MODE, There Are Times Where An Error,"OUT OF MEMORY!"..
Hi, I'm new here and a newbie on programming VB ver 6.0 ... i am from the philippines and on my way to understanding the basic foundation of VB ... I am currently programming a system ... with this, I am using a HOVERBUTTON as one of my object tool ... whenever I run the program , while on RUN MODE/RUN TIME, there are instances that the compiler gives a message,"OUT OF MEMORY", can you tell me what's the main problem ? ... On my form, I use BITMAP pictures as my background .. and on the part of my COMMAND BUTTON TOOLBARS, I always insert a PICTURE BITMAP on each of them. Attached is an OUTPUT FORM of my system ...

"Out Of Memory - Too Many Global Symbols , Constant And Variables " Error In VB 3.0
I am facing some problem in Compiling a VB 3.0 project . When I try compliling the project then I am getting the following error -

"Out of Memory - too many global symbols"

Apart from this , another error that I am getting that says -
"The *.FRM files cannot add any more lines of code" . ( the exact words may be wrong - but this was the intent of the Message )

I have observed that I get these error if I try to add some EVENT HANDLERS , SUBROUTINES or FUNCTIONS to a *.FRM file .

I have never faced these problems while working on small sized VB 3.0 projects but for large sized projects as this particular one ( 4.25 MB - 28 FRM files & 25 BAS files) this problem is easily reproducable ( is it that in VB3.0 there is a limit to the size of code that we can add in *.FRM files for large sized projects )

I was building my project by keeping all the source files ( FRM , FRX , BAS ) and the MAK file directly under c:/ ( Root directory ) - but still I am facing this problem .
Even Restarting the System , trying it out in different machines & different O.S ( WIN 95 , WIN NT & WIN 2000 ) gives the same problem.

Can someone help me ...........

"Out Of Memory" Error Using Excel Sheet Component
I'm getting an "Out of Memory" error when trying to access an Excel object. I've added a reference to "ExcelCtl Type Library" which adds an Excel component to the Toolbox. I add this component to my form. Now any time I try to access the componenet via code (i.e. Ole1.object) I get the "Out of Memory" error. Any help with this is greatly appreciated.

Crystal Report "Memory Full" Error
hi,
I am using Crystal Reports 8.0 . When I try to print 2 reports one after the other from VB 6 i get the error "Memory Full" . I then have to close the form and load it again to print the other report.
What is the problem ?

Thanks

HELP: "Out Of Memory" Error (and More) When Starting Visual Basic 6.0
Let me first start by saying that I am using WinXP and have been working with Visual Basic 6.0 for a few weeks now without any problems. Everytime I am done with it, I save the project and close the Visual Basic 6.0 window.

I wanted to work on my project last night, so I double-clicked on my desktop icon for Visual Basic V6.0 to open it up which I always did before) but this time I get the following errors (shown in order as they come up):

Error 1) Out of Memory : Continue? (I click YES button)
Error 2) Object Variable or With Block Variable Not Set: Continue? (I click YES button)
Error 3) Object Variable or With Block Variable Not Set: Continue? (I click YES button)
Error 4) Object Variable or With Block Variable Not Set: Continue? (I click YES button)
Error 5) Automation Error Catastrophic Failure (I click OK button)
Error 6) Object Variable or With Block Variable Not Set: Continue? (I click YES button)

After error (6), the Visual Basic 6.0 window does come up and I can open my project, edit the project, click RUN to test/debug my project and save my project.

Can someone please tell me what in the world is going on? Why do I have these errors all of sudden on opening up the application and what should I do to correct the problems?

Also, there were two other things I noticed:

- I tried to access the MSDN Library for Visual Basic 6.0 (via the Help menu) but discovered that the help library has disappeared. The other MSDN libraries (Visual C++ , etc..) were still there, but the Visual Basic 6.0 one was gone. A window gets displayed telling me to reinstall the library from disc

- When I first started my project, I added some controls via the Components menu option. Two of these controls(RICHTX32.OCX and COMDLG32.OCX) I added but never used yet. I decided to use a richTextBox last night and realized that the richTextBox icon in the control window (or is it called the component window), as well as the Common Dialog icon, were changed to a plain white folder icon. Usually these icons would be seen as image icons. Anyway, I tried to drag a richTextBox in the Form and was told that it could not found (or something like that).

Edited by - uncletr on 6/19/2004 3:41:59 PM

If I Use "SaveSetting App.Title, "Settings", "Font", "001122"" - Save Date In The Registry, Where Ca
If i use "SaveSetting App.Title, "Settings", "Font", "001122"" - save date in the registry, where can i find the value saved in the registry? Thanks

The Memory Could Not Be "read"
Hi,

I created a visual basic program using a webbrowser control and it happens to crash my program alot.. the dll is ole32.dll and it gives me this popup saying

The instruction at "0x7d532a99" referecned memory at "0x0000001". The memory could not be "read"

and then the program dies a painless death( so I hope :P ). Now it's not in a specific area.. it's very random.

Anyone know any clue where I could even begin to start debugging??? or help in understanding what is going on..

Thank you!!

The Memory Could Not Be "read"
Danio, tell me, did u use a line like this in your code:

while web.busy = true

Let me know!

The Memory Cannot Be "read"
Does anyone else get the above error? I get it frequently in VB at design time. It never occurs at run time or in exes. The full message is:

"The instruction at "0x2734535b" referenced memory at "0x00000004". The memory cannot be "read". Click on "OK" to terminate the program."

So I have to close VB, losing anything that I haven't saved. I'm finding this very frustrating, and have even tried reinstalling VB, but with no success. I was wondering if anyone had any suggestions as to how to cure this.

The Memory Could Not Be "read"
Some times when we are running the application in visual basic we get the error message "The memory could not be read" and the application terminates how to fix this problem

Memory Could Not Be "read"
Hi Group,
I have a strange error in my VB.
When I add a control (textbox, label etc) to a form and I save the form, I can not close the form or reopen the project.
I get the errormessage:
"The instruction at "0x004581f1" referenced memory at "0x00000000". the memory could not be "read""

Last month everything worked OK. I have reinstalled VB, but still problems.
Any clues? Thanks in advance!

Corrupt Variables And "memory Error"
Hi People

I would REALLY like comments on the following, even if no one can give me a solution!

Further to my other post about Word corrupting variables, I have modified the code, but not changed anything to do with variables i.e. I still use:

ActiveDocument.Variables.Add name:="xxx", Value:=yyy
(where yyy is a value generated by the code)

The new code gives slightly different results i.e. Word crashes with the following message:

Winword.EXE Application Error

The instruction at “0x308e05a0” referenced memory at “0x0182a27a”. The memory could not be “written”. Click OK to terminate etc.

Note this is NOT my code, it is Word. I understand this message appears when Word tries to access a memory area where it is not allowed i.e. Word wants to save my variables where it shouldn’t. My previous post’s error description ties up with this, as it is obvious that Word is not sorting the variables out properly.

Sorry, I should have said this only occurs at work on 4 computers, using XP, NT4, Win2000. Three computers at home (XP, Me) are all fine.

Some more interesting things:

I transferred the dot file with the code to a work’s machine, double clicked on it, Word opened. Even if I don’t run the code (or even touch any key!) when I close Word I get the above error message. I close Word, but the computer is stuffed and I have to restart (so much for Win 2000 stable memory management!).

With great difficulty (this long post would be much worse if I went into all that!) I have added my code to two of the work’s computers. I did this by commenting out the “variable add name lines”, opening the dot file, going in to VBA and copying over the code/form to the normal.dot template. Save VBA, close Word. Open Word, remove comments from variable line, save VBA. Code works fine (yes, it all works perfectly). Opening documents I have made on other machines reveals the correctly stored variables!

Thus, the mere presence of the “add variable lines” will cause a crash (i.e. without compiling or running), unless they are “made” in the machine that then runs the code.

The only differences between work and home is home has Office 2000 SP3 and I think work SP1. Work is also networked.

Someone commented that similar problems occurred with Office 97, but surely 2000 (all versions) has it sorted??

I don’t fancy personally visiting all the computers I was hoping this would be used on to carefully integrate the code!!!

Skeletal

Clipboard.GetData Gets "Out Of Memory" Error
To All:

I have a program which captures a graphic image currently in the clipboard and saves it to a file. Most of the time it works perfectly. Occasionally, the image which has been copied to the clipboard is quite large. When the image is large, I sometimes get an "Out Of Memory" error. The statement having the problem is:

imgSave.Picture = Clipboard.GetData(vbCFBitmap)

I've isolated the problem further to just:

Clipboard.GetData(vbCFBitmap)

What is causing the problem? I can manually paste the image into word, etc., so I know that it is sitting in the clipboard (in fact, my program checks to make sure the clipboard is containing an image)

On a couple instances where it failed, I rebooted the system and it worked, but I have one example where no matter what I do, it still has the "Out Of Memory" problem ...

FWIW: I have 1.5GB of swap, 1GB of memory and not a lot going on with the machine and I still sometimes get the error.

Any help would be greatly appreciated.

Thanks in advance,

Jim

Compile Error "Out Of Memory" *Resolved*
When I try to compile my project it goes fine until it get's to the "Writing EXE" pahse and it says "Out of Memory". I think this is because I have alot of images in my project. Does anyone know how I can get around this?

Edited by - msg555 on 5/10/2004 12:30:16 PM

ExcelCtl Object - "Out Of Memory" Error
I'm getting an "Out of Memory" error when trying to access an Excel object. I've added a reference to "ExcelCtl Type Library" which adds an Excel component to the Toolbox. I add this component to my form. Now any time I try to access the componenet via code (i.e. Ole1.object) I get the "Out of Memory" error. Any help with this is greatly appreciated.

Getting "Out Of Memory" Error With Database Operations...
After I Add a record, populate it with a string, and Update it, and when I click on my new record in my DataList, I get an error saying "Out of Memory". I have two tables that are linked by an AutoNumber field. Can anyone figure out why I am getting this error? It is not my computer that is out of memory, just an error within VB. Thanks!

How To Export An "image File" And "MSFlexGrid" To A Word Document
I need to output an image file and a table (MSFlexGrid) to WORD, anyone can suggest how to do ?

I use the following to output text fields:

========================================================Private Sub cmdPrtProductionSheet_Click()

Dim objWORD As New Word.Application
Dim objDoc As New Word.Document

Set objDoc = objWORD.Documents.Open("C:PPSheet.doc")

objDoc.FormFields.Item("clientcode").Range = strClientCode
objDoc.FormFields.Item("factorycode").Range = txtFactoryCode
objDoc.FormFields.Item("PPNO").Range = strPPNO
objDoc.FormFields.Item("PDate").Range = strIDate
objDoc.FormFields.Item("EDate").Range = strEDate
objDoc.FormFields.Item("ContactNo").Range = strSONO
objDoc.FormFields.Item("StyleCode").Range = txtPPStyleCode
objDoc.FormFields.Item("BulkQty").Range = txtPPBulkQty
objDoc.FormFields.Item("Quota").Range = txtPPQuota
objDoc.FormFields.Item("description").Range = txtPPStyleName
'objDoc.FormFields.Item("imagefile").Range = LoadPicture(iFile)

objDoc.SaveAs ("C:PPSheet_" & strPPNO & ".doc")

objDoc.Close

Set objDoc = Nothing
Set objWORD = Nothing

End Sub
Thank you in advance

How To Remove Word Document Metadata "author" And "Last Saved By"
hi all

I want to remove meta data of a ms word document.

I m able to do that. but my problem is as i save it after removing meta data value, its again saving the time and author name, that is me as user. so i do not want to keep author name and last saved by and time.

and one more question is
can i get meta data without opening (Programmaticaly) word document.

please help

meena

Weird "out Of Memory" Error
When I run the game I am working on in the VB environment everything goes well. However when I compile it and then try to run it as an EXE it gives me the error: "Run-time error '-2147024882 (8007000e)' Out of memory"

How do I go about fixing this?

The Memory Could Not Be "written" Error
I have used VB to create a COM Addin. The VB generate a dll file, and registered to Word.

Recently, whenever I close Word, i got the following error: The instruction at "0x016181bf" referenced memory at "0x06df3051". The memory could not be "written".

I have found out that it is related to the size of the dll file. If it's small than <1024K, the error won't appear. However, since the size of the project is increasing, the size of the dll is increasing also. Then,the error appears.

Does anyone know how to handle this? I don't think i can reduce the size of the dll quite a lot.........

Please Help!!!

"out Of Memory" Error When Making Exe
Well first let me say that I am new to vb. Anytime I go to make my first program an exe I get "out of memory" error. I`m not quite sure what 'memory' they mean (like if it ment to save the program, which I have deffinatly enough space left). My program is a very simple byte to mb converter and I would really like to figure this out as it is my first one. I will post the source code below.
--------------------------------------------------------------------------
Private Sub Command1_Click()
Text2.Text = Text1.Text / 1048576
End Sub
--------------------------------------------------------------------------
The only componets in my program are a Command Button, and two Text Box`s. This is really making me go crazy as I cannot figure this out. Any help is greatly appreciated and I hope I explained everything clearly, Thank you.

"Memory Full" Error
hi everyone,
    I am trying to display a report created in crystal report on my vb interface (using crystal report viewer).  I am surprised to see the behaviour of my application. When i call the procedure to display the report for the first time, it works good.  but when i call the same procedure second time it gives me "Memory Full" error. Following is the code which i am trying

CODE    Set CRViewer1.ReportSource = Nothing
    CRViewer1.CloseView (CRViewer1.ActiveViewIndex)
    Me.CRViewer1.ReportSource = rptReport
    Me.CRViewer1.Visible = True
    Me.CRViewer1.ShowFirstPage
    Me.CRViewer1.ViewReport

Error "Out Of Memory" (RAM 128Mb)
Hi Guru, this is the first time that I use vb6 and CR 8.5 to develop a system. Everything is all right until at the implementation, I always got error “Out Of Memory”.
My ram is 128 MB. Finally I found that every time I open a form, it increase memory usage. When I close that form it just decrease (release memory) a little. Especially Crviewer, it increases memory usage almost 10Mb and when it close only decreases approximately 2 Mb.
Then I use this .. to clean the variable :

Private Sub TabPrint()
Dim gcrReport As CRAXDRT.Report
Dim crDB As CRAXDRT.Database
Dim crTB As CRAXDRT.DatabaseTable

Dim showreport As New frmViewer
Set gcrReport = New rptSalesReport

Set crDB = gcrReport.Database
For Each crTB In crDB.Tables
crTB.SetLogOnInfo vDNSName, "", vDNSUser, vDNSPwd
Next

Set showreport.Report = gcrReport
showreport.CRViewer1.ReportSource = gcrReport
showreport.CRViewer1.ViewReport
showreport.CRViewer1.Zoom 1
showreport.Show

Set Showreport = nothing -->
Set gcrReport = nothing--> clear variable
Set crDB = nothing-->

End Sub

But it seems useless.

Is there a memory management is VB6. What should I do to solve this problem.
Please help me. Thx
Jay

How Do You Read "smells" And "scents" On Your Computer?
I thought you guys might be interested in the answer.
http://www.digiscents.com

A Stupid Problem: "Error Accessing The System Registry" ("Solved") Thank You
This is a very silly problem. I tried to have a look of References from Project dropdown menu, it returned a critical error:

"Error Accessing the system registry".

I reinstalled VB6 but it seems that the problem still exists. Anybody please tell me how to solve the problem.

thanks in advance

Edited by - kenyiwei on 5/6/2004 2:07:51 AM

"fetching" Error In Word VB During ADADB Query
Hi there, got myself a problem... when I run the following code which I hoped would return the last record in a recordset and print the content of "ordernumber" in a textbox, I got the following error " rowset does not support fetching backward" ???

Code:
Private Sub UserForm_Initialize()

Dim adoConn As New ADODB.Connection
Dim adoRS As New ADODB.Recordset

Const strconn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c: empmanualorders.mdb; persist security info=false"

adoConn.ConnectionString = strconn
adoConn.Open
adoRS.Source = "SELECT * FROM manualorders"
adoRS.CursorType = adOpenForwardOnly
adoRS.ActiveConnection = adoConn
adoRS.Open

adoRS.MoveLast
rc!ordernumber = TextBox7.Text

adoRS.Close
Set adoRS = Nothing
adoConn.Close
Set adoConn = Nothing

End Sub

Help?

"Could Not Find Installable ISAM" Error (Word)
Hi there, I know ISAM error has ben covered before but I cannot find any reference to my particular problem...

I have completed a userform with quite a few requirements to access a database and so, I have 5 ADODB connections in one class module. When there was 4 connections everything was fine and the module worked and I was happy but now that I have added the 5th, I get the ISAM error... All reference I can find to the error is missing files but in my case, it was working fine and other connections run perfectly.

I tried setting all connection instances to new connections, but I still get the error when the module is run.

The 5 private subs all begin with the following:

Code:
Dim cn As New ADODB.Connection
Dim rc As New ADODB.Recordset

Dim addtext As String

Set cn = New ADODB.Connection
Set rc = New ADODB.Recordset

Const strCon As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=g:groupsmstores databasesshippingdetails.mdb;Percist Security Info=False"

cn.ConnectionString = strCon
cn.Open

I am guessing I am making too many requests from one module but I don't know how to publically declare the connection open for the whole module to use.

Has anyone come across this before? Or is there a lateral fix I am not aware of?

"Disk Full" ---- BUT ITS NOT! Error Saving Word Doc W/in VB
I'm using vb with a Word reference to edit and save a word document.

When I try to save the word document I get an error

"Disk is Full...close programs... etc" . . . but it is not full...

Anyone know what is going on here?

Here is some code:

VB Code:
Dim wdApp As Object Dim myDoc As Object Set wdApp = CreateObject("Word.Application") FileCopy PATH + "template.doc", "edit.doc" Set myDoc = wdApp.Documents.Open(fileName:="edit.doc", ReadOnly:=False) 'This updates some bookmarks w/the doc myDoc.Bookmarks("Date").Range.InsertAfter _ CStr(Date) myDoc.Bookmarks("To").Range.InsertAfter _ StrConv(name, vbProperCase) myDoc.Save 'THIS IS WHERE GET THE ERROR myDoc.Close wdApp.Quit

EnumWindows AddressOf EnumWindowsProc, 0 "Syntax Error"</title> <script Type="text/javascript"> <!-- Function PrintTags() { Var Curr=document.getElementById('vB_Editor_QR_textarea').value;
I get "Syntax Error" when i put this code in to a button. Whats wrong?

EnumWindows AddressOf EnumWindowsProc, 0

______________________________________________________________________
Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hwnd As Long) As Long
Declare Function EnumWindows Lib "user32.dll" (ByVal lpEnumFunc As Long, ByVal lParam As Long) As Long

Public Function EnumWindowsProc(ByVal hwnd As Long, ByVal lParam As Long) As Long
Dim Length As Long
Dim sName As String
Dim Temp As String
Static iCount As Integer

iCount = iCount + 1
Length = GetWindowTextLength(hwnd) + 1

If Length > 1 Then
sName = Space(Length)
GetWindowText hwnd, sName, Length
If Left(sName, Length - 1) Like "Order*" Then MsgBox "window found!"
End If

EnumWindowsProc = 1
End Function