Ejemplo de la propiedad Type (Field) (VJ++)
Se aplica a: Access 2013 | Access 2016
En este ejemplo se muestra la propiedad Type mostrando el nombre de la constante que corresponde al valor de la propiedad Type de todos los objetos Field de la tabla Employees . Para que este procedimiento se ejecute se necesita la función FieldType.
// BeginFieldTypeJ
import java.io.*;
import com.ms.wfc.data.*;
public class TypeFieldX
{
// The main entry point of the application.
public static void main (String[] args)
{
TypeFieldX();
System.exit(0);
}
// TypeFieldX Function
static void TypeFieldX()
{
// Define ADO Objects.
Recordset rstEmployees = null;
Field fldLoop = null;
// Declarations.
String strCnn = "Provider='sqloledb';Data Source='MySqlServer';"+
"Initial Catalog='Pubs';Integrated Security='SSPI';";
int intLoop;
int intRecordCount = 0;
BufferedReader in =
new BufferedReader(new InputStreamReader(System.in));
try
{
// Open the Recordset with data from Employees table.
rstEmployees = new Recordset();
rstEmployees.open("employee", strCnn,
AdoEnums.CursorType.FORWARDONLY, AdoEnums.LockType.READONLY,
AdoEnums.CommandType.TABLE);
System.out.println("Fields in the Employees table:\n");
// Enumerate fields collection of Employees table.
for(intLoop = 0;intLoop <
rstEmployees.getFields().getCount();intLoop++)
{
intRecordCount++;
// Loop needed for display of records
if((intRecordCount % 6)==0)
{
System.out.println("Press <Enter> to continue..");
in.readLine();
}
fldLoop = rstEmployees.getFields().getItem(intLoop);
System.out.println(" Name:" + fldLoop.getName() + "\n"+
" Type:" + FieldType(fldLoop.getType()) + "\n");
}
System.out.println("Press <Enter> to continue");
in.readLine();
}
catch(AdoException ae)
{
// Notify the user of any errors that result from ADO.
// As passing a Recordset, check for the null pointer first.
if(rstEmployees != null)
{
PrintProviderError(rstEmployees.getActiveConnection());
}
else
{
System.out.println("Exception: " + ae.getMessage());
}
}
// System read requires this catch.
catch(java.io.IOException je)
{
PrintIOError(je);
}
finally
{
// Cleanup objects before exit.
if (rstEmployees != null)
if (rstEmployees.getState() == 1)
rstEmployees.close();
}
}
// FieldType Function
static String FieldType( int intType )
{
String strLoop = null;
switch(intType)
{
case AdoEnums.DataType.CHAR:
strLoop = "adChar";
break;
case AdoEnums.DataType.VARCHAR:
strLoop ="adVarChar";
break;
case AdoEnums.DataType.SMALLINT:
strLoop = "adSmallInt";
break;
case AdoEnums.DataType.UNSIGNEDTINYINT:
strLoop = "adUnsignedTinyInt" ;
break;
case AdoEnums.DataType.DBTIMESTAMP:
strLoop = "adDBTimeStamp";
break;
default:
break;
}
return strLoop;
}
// PrintProviderError Function
static void PrintProviderError(Connection cnn1)
{
// Print Provider Errors from Connection Object.
// ErrItem is an item object in the Connections Errors Collection.
com.ms.wfc.data.Error ErrItem = null;
long nCount = 0;
int i = 0;
nCount = cnn1.getErrors().getCount();
// If there are any errors in the collection, print them.
if ( nCount > 0)
{
// Collection ranges from 0 to nCount-1.
for ( i=0;i<nCount; i++)
{
ErrItem = cnn1.getErrors().getItem(i);
System.out.println("\t Error Number: " + ErrItem.getNumber()
+ "\t" + ErrItem.getDescription());
}
}
}
// PrintIOError Function
static void PrintIOError(java.io.IOException je)
{
System.out.println("Error: \n");
System.out.println("\t Source: " + je.getClass() + "\n");
System.out.println("\t Description: "+ je.getMessage() + "\n");
}
}
// EndFieldTypeJ
Vea también
- Acceso al foro de desarrolladores
- Acceso a la ayuda en support.office.com
- Acceso a la ayuda en answers.microsoft.com
- Acceso a foros en UtterAccess
- Acceso al centro de ayuda de programadores VBA y desarrolladores (FMS)
- Acceso a las publicaciones en StackOverflow
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.