Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

cannot find device\harddisk2\dr2 error runnint form

Status
Not open for further replies.
jlockley

jlockley

Technical User
Nov 28, 2001
1,522
US
..with changed table.
That's about it. Change the table to use the form I use for just viewing resumes, and I get that error. Clicking continue works, but what's up? It's an annoyance.

I am currently designing a new form for the new table, but it's a pain.
 
Sort by date Sort by votes
It seems you have a reference to that location somewhere.

It might even be a lookup or Referential Integrity (less likely) reference.

View the form in a text editor, and see if you can locate a reference to 'harddisk2'. That may give you a clue.

Does the error give you a '>>' button for more information?

If not, go into an object and turn 'debug' on, save and try opening again.




Tony McGuire
"It's not about having enough time. It's about priorities.
 
Upvote 0 Downvote
running form.

Does the error give you a '>>' button for more information?
I never get more information from the errors. Odd but true.
I'll try to see text editor.
 
Upvote 0 Downvote
Here we go. I must add that the error was reported incorrectly. It says "There is no disk in drive. Please insert a disk into drive\Device\Harddisk2\DR2.
Obviously no such thing below.

I have been moving this form from search to search for several years now without this error. Odd. I'm trying to write a new form without much luck,(different post) but this intrigues me.

MZP    ÿÿ ¸ @ ? º ´ Í!¸LÍ!??This program must be run under Microsoft Windows.
$ NE

ƒ    @ P à  š     P    q   ? B û0€ ? = 0€ ? >µ 0€ ? ó 0€ ? û 0€ ? ` 0€ € p 0€ resume only LIBENTRY WEP   ¸ ˸ Ë ©Borland Standard File þ  @ |  þ €~ þ   
@ þ    þ     þ    þ    þ    þ €| Form   UIManager   UIContainer   UIObject   Page   FormObj   Field

EditRegion   Text   Button   þ €ã €Ýÿÿÿÿÿÿ°f% open+ close+ canArrive2 arrive2 setFocus+ canDepart2 removeFocus+ depart2 mouseEnter, mouseExit, mouseMove, mouseDown, mouseUp, mouseDouble, mouseRightDown, mouseRightUp, mouseRightDouble, keyPhysical- keyChar- action. menuAction/ timer4 pushButton+ changeValue0 calcField+ run+ newValue+ proc+ error3 status1 mouseClick, init+ Uses Type Var Const Proc þ €† ÿ €(ÿÿ   =, @)  € ÿÿ   C
 - ~V   ]  - }V ?$ H  €€€       “4Þ}  / Ï .    4 = f:\program files\corel\suite8\Paradox\PDOXHome\CTRL3D.FT B  #Form1 POST >
ÿÿÿÿ  û2 :WORK:searches\LarkCreekPastry\LarkCreekPastry.db   ý   NAME  ‹  Œ  LOCATION  þ  ÿ  TITLE  P  Q  DATE     ™ Resume    ™   PARADOX 7  à  > 0 8 intl , € € ÿ €Œ  #Page1   E  - }V  € ÿÿ   € ¦, V  
* 0  2  < €   € €  € ÿ €Â  DATE      ® 6 » }  € ÿÿ   À ” i  
“ 0  2  < €     ÿÿÿÿ   + € € ÿÿÿÿd   Ì    € ÿ € ÿÿ      >  A S  € ÿÿ  À
   
 0  2  < € ÿÿÿ  ÿ €Ð ÿÿ       K à  € ÿÿ   K à  
  0  2  < € ÿÿÿÿ    
          K     € € ÿ €Â  NAME     © 6 m }  € ÿÿ   À ^ i 
“ 0  2  < €     ÿÿÿÿ   + € ÿÿÿÿd   Ì    € ÿ € ÿÿ
       N Y  € ÿÿ  À  

 0  2  < € ÿÿÿ  ÿ €Ï ÿÿ        à  € ÿÿ    à  
  0  2  < € ÿÿÿÿ   
               € € ÿ €ÿÿ
   Š* Ø I }  €š ÿÿ  |
;// 1. First make sure that the user has no unposted data to prevent
;// accidental data loss.
;//
;// 2. Then move to the next record
;//
method pushButton(var eventInfo Event)
var
fHandle Form ;// tmp handle to current form
strRetVal String ;// tmp handle to returned value
endVar

;// Check to see if we're at the bottom of the table and not in edit
;// mode. This is an illegal move in that case
;//
if active.atLast() AND NOT isEdit() then
beep() ;// error message also possible
return
endIf

;// Attach to the current form
;//
fHandle.attach()

;// Check record status and the touched property to see if the record
;// needs to be posted
;//
if active.recordStatus("New") OR active.recordStatus("Modified") OR
(fHandle.touched = TRUE) then

;// Check with user before posting changes
;//
strRetVal = msgYesNoCancel("This is a new or modified record",
"Do you wish to save these changes before moving to another record?")

switch

;// Save the changes
;//
case strRetVal = "Yes":
if NOT active.unlockRecord() then
msgStop("Attempt to post your changes failed",
"Please check to make sure your entries are valid and try again.")
return
endIf

;// Cancel the changes
;//
case strRetVal = "No":
if NOT active.cancelEdit() then
errorShow() ;// custom error handling calls should go here
return
endIf

;// Abort so user can finish editing record
;//
case strRetVal = "Cancel":
return
endSwitch
endIf

;// If we've gotten this far, we're ready to move to the next record
;// This may fail due to the AutoAppend property for the active table. If this
;// property is enabled, an insertAfterRecord() is necessary.
;//
if NOT active.nextRecord() then
errorShow() ;// custom error handling, if any, should go here
endIf

endMethod pushButton 
€ I }

: 0  2  < €     
€ ÿ €Ó ÿÿ

 ] J Ã  € ÿÿ   J Ã 
 0  2  < € ÿ    
        Next  J     € € ÿ €ãÿÿ 
 Š* 4 g }  €h ÿÿ  J
method pushButton(var eventInfo Event)
var
lEditState Logical ;// tmp handle to the edit state
endVar

;// Get edit state and store it for later use
;//
lEditState = isEdit()

;// Toggle edit mode if necessary. If deletion should be prevented while not
;// in edit mode, uncomment the three lines preceding edit() and comment or
;// delete the edit()
;//
if lEditState = FALSE then
; msgStop("Error deleting record",
; "You cannot delete a record while not in edit mode.")
; return
if NOT edit() then
errorShow() ;// custom error handling can go here
return
endIf
endIf

;// Confirm the deletion
;//
if msgQuestion("Deleting record",
"You are about to permanently delete the current record. Are you sure?") = "Yes" then
if NOT active.deleteRecord() then
switch

;// Check for insufficient rights problems
;//
case errorHasErrorCode(peNoTableRights) OR
errorHasErrorCode(peNotEnoughRights) OR
errorHasErrorCode(peNotSuffSQLRights) :
msgStop("Error deleting record",
"You have insufficient rights to delete records from this table.")

;// Edit mode, should not happen due to above code, but
;// a good check
;//
case errorHasErrorCode(peNotInEditMode) :
msgStop("Error deleting record", "You must be in edit to delete a record.")

;// Further custom error handling can go here
;//
otherWise :
errorShow()
endSwitch
endIf
endIf

;// Restore the edit state, if necessary
;//
if lEditState = FALSE then
endEdit()
endIf

endMethod pushButton  € g }  
: 0  2  < €     € ÿ €Õ ÿÿ  - < Ñ Ã  € ÿÿ   Ñ Ã  
 0  2  < € ÿ    
        Delete  Ñ     € € ÿ €Ç
LOCATION2   
 ' o ³  € ÿÿ  À 3 w 
’P 0  2  < €      + € € ÿÿÿ d €€€  Ì    € ÿ €Ä  Resume  
  Ò
 O) <?  € ÿÿ  À O) 9?  
’P 0  2  < €      + € ÿÿÿ d  Ì   ™ € ÿ €½  Status      ?% ' € ³  € ÿÿ  € D w  
’P 0  2  < €     + € ÿÿÿ d €€€  Ì € ÿ €Ã  TITLE     Y - š ¤  € ÿÿ  € ^ h  
’P 0  2  < €      + € ÿÿÿ d €€€  Ì    € þ €6  ·"œÐ ·"œÐ  þ €ª    ¼ " MS Sans Serif J  ¯qJ 4¿K Ú  ? " MS Sans Serif 7(¢?²?7(þ
ÈÈÈ ? " MS Sans Serif EèD |M XýÞ ã¾þ €&   N(Windows Short),DWSMSDSYSOS J V ± Ê ÿÿÿÿ   º  , É À Ã æ d   ÿÿÿÿ ¤ F   à æ Á É Á    CONTAINER ò Á  ÿÿÿÿ±  ÿÿÿÿ d \ b ACTIVE >   ÿÿÿÿ±  ÿÿÿÿ º ² w LASTMOUSECLICKED ” \  ÿÿÿÿ±  ÿÿÿÿ  ÿ SUBJECT á ²  ÿÿÿÿ±  ÿÿÿÿ b Z LASTMOUSERIGHTCLICKED < ÿ  ÿÿÿÿ±  ÿÿÿÿ , $ SELF † Z  ÿÿÿÿ±  ÿÿÿÿ ™ #FORM1 Ê ¤  ÿÿÿÿ± ? ÿÿÿÿ[ #PAGE1 ±  à  ÿÿÿÿ±  ÿÿÿÿÊ w o TITLE í Q $  ÿÿÿÿ±  ÿÿÿÿ Ã » STATUS í ? o  ÿÿÿÿ±  ÿÿÿÿ   RESUME í é »  ÿÿÿÿ±  ÿÿÿÿ æ Þ  LOCATION2 í 8  ÿÿÿÿ±  ÿÿÿÿ  #BUTTON18 í  V  ÿÿÿÿ±  ÿÿÿÿ æ m #TEXT19 f ü Õ  ÿÿÿÿ±  ÿÿÿÿ V  #BUTTON10 í C 
ÿÿÿÿ±  ÿÿÿÿ 
( #TEXT11 * À ™ ÿÿÿÿ±  ÿÿÿÿC À ¸ NAME í
 Þ ÿÿÿÿ±  ÿÿÿÿ Õ #TEXT14 ñ O (  ÿÿÿÿ±  ÿÿÿÿ
 
#EDITREGION13 ñ š m
ÿÿÿÿ±  ÿÿÿÿ
 DATE í ä ¸  ÿÿÿÿ±  ÿÿÿÿ #TEXT5 Ë (   ÿÿÿÿ±  ÿÿÿÿä  #EDITREGION4 Ë r F  ÿÿÿÿ±  ÿÿÿÿä  ÿÿÿÿ 
PUSHBUTTON    Ð  METHOD_SELFî  EVENTINFO ÿÿÿÿ? ¦ ‰ ú
 METHOD_SELF  Ð  EVENTINFO  î  ÿÿÿÿC 
PUSHBUTTON    Ð  METHOD_SELFî  EVENTINFO ÿÿÿÿÉ /  ß
Â
 METHOD_SELF  Ð  EVENTINFO  î 
LEDITSTATE   ÿÿÿë FHANDLE  ,ÿÿÿÉ  STRRETVAL  ÿÿÿV r‚  ÿ  — H r‚—  ÿ  ÷ J
 ø J  Ã ß r‚
  ? ? „ r‚   3 ÷ ???é èòÿÿÿ
 ø  ‹ ¬ÿÿÿ  ÿÿÿ”ÿÿÿ *”ÿÿÿ*t  ÿÿÿ € %”ÿÿÿX1 ˆÿÿÿ $ˆÿÿÿ&|ÿÿÿð pÿÿÿ 'Apÿÿÿ Tÿÿÿ Œ ¨  LATÿÿÿ Ä %”ÿÿÿPà ˆÿÿÿðþÿÿ ˆÿÿÿ&|ÿÿÿð¢ pÿÿÿ à  Apÿÿÿäþÿÿ è  Aäþÿÿ%Øþÿÿ$Ìþÿÿ ð  AÌþÿÿ%Àþÿÿ$ ø   KA= ”ÿÿÿ 0  A”ÿÿÿ ø 8  KA ”ÿÿÿ 'A”ÿÿÿ ÿÿÿ € %”ÿÿÿX ˆÿÿÿ &ˆÿÿÿ | ¬ÿÿÿ Tÿÿÿ ”ÿÿÿ  ÿÿÿ Àþÿÿ Ìþÿÿ pÿÿÿ Øþÿÿ äþÿÿ |ÿÿÿ ðþÿÿ ˆÿÿÿ ACTIVE 
 + è¿ýÿÿ
 ¤  å ¬ÿÿÿ  þÿÿ¬þÿÿ / þÿÿ”þÿÿ *”þÿÿ&ˆþÿÿð%|þÿÿ
 A?  þÿÿ,ÿÿÿ V þÿÿ þÿÿ¬þÿÿ T  T þÿÿ”þÿÿ¬þÿÿ p  T”þÿÿ%ˆþÿÿ$,ÿÿÿ— %<þÿÿD Œ %|þÿÿH%0þÿÿ$á ÿÿÿþÿÿ ˜ ´  MAþÿÿ*? ÿÿÿ Ä % þÿÿP: ”þÿÿ¬þÿÿ O”þÿÿ&ˆþÿÿð Ð ì  KA¤ n ÿÿÿ  % þÿÿP; ”þÿÿ¬þÿÿ )”þÿÿ&ˆþÿÿð |þÿÿ 'A|þÿÿR  ÿÿÿ $ % þÿÿP 1  þÿÿ¬þÿÿ  þÿÿ&”þÿÿð ˆþÿÿ 'Aˆþÿÿ s ¬þÿÿg |þÿÿ ˆþÿÿ ”þÿÿ þÿÿ  þÿÿ ¬ÿÿÿ 0þÿÿ ÿÿÿ <þÿÿ ,ÿÿÿ ACTIVE 
 + è;ûÿÿ
    èûÿÿ
  ü $ ¯  ª ì ¥ Ð   ´ › ˜ – Œ ‘ p Œ T ‡ 8 ‚ 0 }  v ø q ð l è e à ^ Ä W ¨ R Œ M € H 

    F?  )F‰)    0Deleting recordFYou are about to permanently delete the current record. Are you sure?YesError deleting record?You have insufficient rights to delete records from this table.'You must be in edit to delete a record.NewModified This is a new or modified recordBDo you wish to save these changes before moving to another record?#Attempt to post your changes failed?Please check to make sure your entries are valid and try again.NoCancel
 
Upvote 0 Downvote
Status
Not open for further replies.

Similar threads

Geoff Collins
  • Locked
  • Question
Edit method error.
Replies
1
Views
67
simd01
simd01
Piper2021
  • Locked
  • Question
CALC in a query on a table to find difference between two time fields
Replies
0
Views
70
Piper2021
Piper2021
PDX79
  • Locked
  • Question
Finding File Types Using Filesystem's Findfirst &amp; FindNext Methods
Replies
0
Views
62
PDX79
PDX79
ColumbiaDiver
  • Locked
  • Question
Field on form refuses to update table using simple ObjectPal - what am I missing?
Replies
1
Views
87
Bystander
Bystander
flaregas
  • Locked
  • Question
BDE intialize error
Replies
4
Views
167
flaregas
flaregas

Part and Inventory Search

Sponsor

Back
Top