error en conexion a bd

[alfil123]

hola amigos nose que pasa con esta variable, nose si pueden desirme que pasa con esta variable

DimcnDatosAsNewSqlConnection("server=localhost;Dat aBase=DBApp;Integrated Security=SSPI;")
se produce un error en DimcnDatosAsNewSqlConnection

Dim daMenu As New SqlDataAdapter("ObtenerOpcionesMenu", cnDatos)
y otro en cnDatos


nose si alguien puede ayudarme con esto