diff --git a/ase/com/AwkExtio.cpp b/ase/com/AwkExtio.cpp
index 97b53324..9a29b914 100644
--- a/ase/com/AwkExtio.cpp
+++ b/ase/com/AwkExtio.cpp
@@ -1,5 +1,5 @@
 /*
- * $Id: AwkExtio.cpp,v 1.4 2006-12-11 14:58:25 bacon Exp $
+ * $Id: AwkExtio.cpp,v 1.5 2006-12-12 05:54:33 bacon Exp $
  */
 
 #include "stdafx.h"
@@ -63,7 +63,7 @@ STDMETHODIMP CAwkExtio::get_Mode(int *pVal)
 
 STDMETHODIMP CAwkExtio::get_Handle (VARIANT *pVal)
 {
-	*pVal = handle;
+	VariantCopy (pVal, &handle);
 	return S_OK;
 }
 
diff --git a/ase/test/com/AwkForm.frm b/ase/test/com/AwkForm.frm
index 70dbc738..88fd041a 100644
--- a/ase/test/com/AwkForm.frm
+++ b/ase/test/com/AwkForm.frm
@@ -215,7 +215,7 @@ Function Awk_ReadExtio(ByVal extio As ASELib.AwkExtio, ByVal buf As ASELib.Buffe
         Exit Function
     End If
         
-    Let console = extio.Handle
+    Set console = extio.Handle
     If console.Count = 0 Then
         value = ConsoleIn.Text
         l = Len(value)