Hello Tom;
>global gDB
>on preparemovie
>
> set gDB = New(Xtra "V12dbe", "Pricelist.V12", "Create")
You are missing a mandatory parameter - the one for your password.
Not using one? Just use empty quotes like this:
set gDB = New(Xtra "V12dbe", "Pricelist.V12", "Create", "")
Simple authoring mode V12 error checking will solve your problem too!
Use V12Error() as such:
on preparemovie
set gDB = New(Xtra "V12dbe", "Pricelist.V12", "Create")
put V12Error()
mCreateTable(gDB, "Pricelist")
put V12Error()
mCreateField(gDB, "Pricelist", "nr", "integer")
put V12Error()
mCreateField(gDB, "Pricelist", "report", "integer")
put V12Error()
mCreateIndex(gDB, "Pricelist", "nrindex", "unique", "nr", "ascending")
put V12Error()
mbuild(gDB)
set gDB = New(Xtra "V12dbe", "Pricelist.V12", "ReadWrite")
put V12Error()
set gTable = New(Xtra "V12dbe", mGetRef(gDB), "Prijslijst")
put V12Error()
mImportFile(gTable, "TEXT", "Pricelist.txt", TAB, RETURN)
put V12Error()
end
The errors will appear in Director's message window.
Even better is to use the [free] V12 Tool available from our
download page. It allows you to Create, Edit, Import, Export...
V12-DBE databases all without ANY Lingo coding at all! Get it
here: http://www.integration.qc.ca/downloads
Note that you should download the executable version, and that
you will need to place the V12-DBE Xtra [regular version] in
the Xtras folder of the Tool for it to function correctly.
Enjoy your day Lingologists!
-Warren.
===========================================================
-- Warren Stolow
-- Technical Support Coordinator
-- Integration New Media
-- http://www.integration.qc.ca
Come see us at TAAC2K! Oct. 26-27, Nashville TN
=============================================================
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
Behalf Of Tom Vandenbossche
Sent: October 24, 2000 8:28 AM
To: [EMAIL PROTECTED]
Subject: Re: <lingo-l> V12 handler not defined
Yes I did
I have put the script with it Mybe it clears something up
global gDB
on preparemovie
set gDB = New(Xtra "V12dbe", "Pricelist.V12", "Create")
mCreateTable(gDB, "Pricelist")
mCreateField(gDB, "Pricelist", "nr", "integer")
mCreateField(gDB, "Pricelist", "report", "integer")
mCreateIndex(gDB, "Pricelist", "nrindex", "unique", "nr", "ascending")
CheckError ()
mbuild(gDB)
checkError()
set gDB = New(Xtra "V12dbe", "Pricelist.V12", "ReadWrite")
set gTable = New(Xtra "V12dbe", mGetRef(gDB), "Prijslijst")
mImportFile(gTable, "TEXT", "Pricelist.txt", TAB, RETURN)
end
on checkError
if V12status() <> 0 then
put v12Error()
return TRUE
end if
reurn FALSE
end
THX
TOM
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
Lingo-L is for learning and helping with programming Lingo. Thanks!]
