On Mon, 15 May 2000 12:26:50 +0100, Simon Oliver
<[EMAIL PROTECTED]> wrote:

>How do I set a field value to null?
>
>for example:
>
>$rs->Open;
>$rs->AddNew;
>$rs->Fields->Item('col1')->{Value} = undef;
>
>generates an error:
>Win32::OLE(0.1101) error 0x8002000e: "Invalid number of parameters"
>    in PROPERTYPUT "Value" at ...
>
>
>I have tried:
>
>$rs->Fields('col1')->{Value} = VT_NULL;
>$rs->Fields('col1')->{Value} = VT_EMPTY;
>
>Neither worked.  


Make sure you have a

    use Win32::OLE::Variant;

line at the top of your program.  Then try something like:

    $rs->Fields('col1')->{Value} = Variant(VT_EMPTY);
or
    $rs->Fields('col1')->{Value} = Variant(VT_NULL);
or even
    $rs->Fields('col1')->{Value} = Variant(VT_DISPATCH);


-Jan

---
You are currently subscribed to perl-win32-users as: [archive@jab.org]
To unsubscribe, forward this message to
         [EMAIL PROTECTED]
For non-automated Mailing List support, send email to  
         [EMAIL PROTECTED]

Reply via email to