Temas

Hola, estoy haciendo un pequeño proyecto, consiste en consumir un DataService (.svc) desde silverlight 2, he logrado acceder pero cuando ejecuto el siguiente metodo:

Código [Seleccionar] Expandir


        private void Consultar(IAsyncResult Res)
        {
            DataServiceQuery<Contacto> Cont = (DataServiceQuery<Contacto>)Res.AsyncState;
            dgvDatos.ItemsSource = Cont.EndExecute(Res).ToList();
        }


arroja un error en la ultima linea, el error es este:

No hay constructor sin parámetros definido para este objeto.

me parce que si logra traer los datos, pues ejecuto solo el EndExecute(Res) y todo funciona bien, el lio esta al llamar al ToList(), la pila arrojada por el error es la siguiente:

Código [Seleccionar] Expandir


en System.RuntimeTypeHandle.CreateInstance(RuntimeType type, Boolean publicOnly, Boolean noCheck, Boolean& canBeCached, RuntimeMethodHandle& ctor, Boolean& bNeedSecurityCheck)

en System.RuntimeType.CreateInstanceSlow(Boolean publicOnly, Boolean fillCache)\r\n   en System.RuntimeType.CreateInstanceImpl(Boolean publicOnly, Boolean skipVisibilityChecks, Boolean fillCache)

en System.RuntimeType.CreateInstanceImpl(Boolean publicOnly)

en System.Activator.CreateInstance(Type type, Boolean nonPublic)

en System.Activator.CreateInstance(Type type)

en System.Data.Services.Client.ClientType.CreateInstance()

en System.Data.Services.Client.MaterializeAtom.ResolveOrCreateInstance(ClientType type, Uri identity, Uri editLink, String etag, Object& currentValue)

en System.Data.Services.Client.MaterializeAtom.ReadNext(ClientType currentType, Type expectedType, AtomParseState atom, Object& currentValue)

en System.Data.Services.Client.MaterializeAtom.MoveNext()

en System.Collections.Generic.List`1..ctor(IEnumerable`1 collection)

en System.Linq.Enumerable.ToList[TSource](IEnumerable`1 source)

en Contactos.Page.Consultar(IAsyncResult Res)

en System.Data.Services.Client.BaseAsyncResult.HandleCompleted()

en System.Data.Services.Client.QueryAsyncResult.AsyncEndRead(IAsyncResult asyncResult)\r\n   en System.IO.Stream.BeginRead(Byte[] buffer, Int32 offset, Int32 count, AsyncCallback callback, Object state)

en System.Data.Services.Client.QueryAsyncResult.AsyncEndGetResponse(IAsyncResult asyncResult)"


Gracias por la colaboracion,
Atentamente,

Juan Manuel Lombana
Medellín - Colombia

Hola tengo un problema con la clase stream, estoy intentando descagar un archivo de un ftp pero no logro saber cual es el tamaño del archivo pues la propiedad length del stream me arroja un error... miren el code.

Código (csharp) [Seleccionar] Expandir


        public bool DescargarArchivo(string NombreArchivo,string Host, string Usuario, string contraseña)
        {
            Uri _uri = new Uri(Host + NombreArchivo);
            WebPermission permisos = new WebPermission(NetworkAccess.Connect, _uri.ToString());
            if (uri.Scheme != Uri.UriSchemeFtp)
            {
                return false;
            }
            Solicitud = (FtpWebRequest)FtpWebRequest.Create(_uri.ToString());
            Solicitud.Credentials = new NetworkCredential(Usuario, contraseña);
            Solicitud.Method = WebRequestMethods.Ftp.DownloadFile;
            Respuesta = (FtpWebResponse)Solicitud.GetResponse();
            Stream RespuestaS = Respuesta.GetResponseStream();
            byte[] ArchivoDescargado = new byte[1024];
            RespuestaS.Read(ArchivoDescargado, 0, ArchivoDescargado.Length);
            File.WriteAllBytes("c://" + NombreArchivo, ArchivoDescargado);
            RespuestaS.Close();
            return true;
        }


este funciona bien pero solo descarga archivo iguales o menores a 1024 bytes (logicamente lo puedo hacer mas grando ampliando este numero pero el objetivo es conocer el tamaño dinamicamente).
osea, si yo lo siguiente lanza una excepcion NotSupportedException:

Código (csharp) [Seleccionar] Expandir


byte[] ArchivoDescargado = new byte[Convert.toInt32(RespuestaS.Length)]

Gracias de antemano...

Atentamente,

Juan Manuel Lombana
Medellìn - Colombia

hola estoy haciendo un app en c# con sql server 2005 y necesito implementar campos de tipo varbinary alguien sabe como los debo de implementar.

Atentamente,

Juan Manuel Lombana
Medellìn - Colombia

hola, me estoy iniciando en el mundo del blend, lo que pasa es que no he podido iniciar ningun evento mediante codigo, osea cada vez que esribo el nombre de un evento para que se genere en el visual studio me saca un error que dice: "No se puede cambiar el archivo de codigo subyacente"... muchas gracias de antemano.

Atentamente,


Juan Manuel Lombana
Medellín - Colombia

PD: tengo el visual studio 2005 team suite, blend (trial).

Hola, mi duda es como puedo generar numero verdaderamente aleatorios en c#.
no crean que no conozco la clase Random pero he tenido algunos problemas,
miren: necesito generar un numero aleatorio de 1 a 4 asta ahi bien haciendolo de la siguiente manera:

Código (csharp) [Seleccionar] Expandir


            Random r = new Random(DateTime.Now.Millisecond);
            int num = r.Next(1,4);


bueno el rollo ocurre cuando quiero generar digamos 7 numeros aleatorios consecutivos todos dento de este mismo rango.
lo que hago es lo mismo de arriba pero dentro de un ciclo e imprimirlo en un label, pero obtengo una salida como esta:

Código [Seleccionar] Expandir

3111111.
no son totalmente aleatorios pues me genera numero respetidos consecutivos, alguien sabe como mas le puedo hacer...

Atentamente,


Juan Manuel Lombana
Medellín - Colombia

Hola, quisiera saber que necesito para empezar a trabajar con crystal reports, es para un proyecto de facturación, y quisiera aprender.

Atentamente,

Juan Manuel Lombana
Medellín - Colombia

Hola Necesito saber como puedo aumentar o disminuir el volumen del pc.... me imagino que es alguna api, espero haberme explicado bien,

Atentamente,


Juan Manuel Lombana

[Juan Manuel LombanaMedellín - Colombia]

Hola, mi pregunta es si hay manera de ocultar la ventana de apagado de windows XP, osea que haga lo que se haga no se muestre, nisiquiera oprimiendo alt f4, que la unica manera de apagar sea por la shell desde un programa externo.

Gracias de antemano.


Atentamente,



Juan Manuel Lombana
Medellín - Colombia

[Juan Manuel LombanaMedellìn - Colombia]

Hola... Quiero saber como elimino todos los archivos de una carpeta...me explico estoy haciendo una aplicacion la cual borrara todos los archivos de una carpeta cada cierto tiempo, cual archivo...

Gracias De Antemano..


Juan Manuel Lombana
Medellìn - Colombia

[Juan Manuel LombanaMedellìn - Colombia]

Hola... Quiero saber como elimino todos los archivos de una carpeta...me explico estoy haciendo una aplicacion la cual borrara todos los archivos de una carpeta cada cierto tiempo, cual archivo...

Gracias De Antemano..


Juan Manuel Lombana
Medellìn - Colombia

[JUAN MANUEL LOMBANAMEDELLÍN - COLOMBIA]

Hola Mi Duda es La Siguiente:
Necesito Iniciar Un Servicio Del Sistema (Windows Xp) mediante codigo en vb como lo hago?, Ademas Antes De Iniciarlo Debo de Saber si esta Habilitado el tipo de inicio como Automatico....

Gracias De AnteMano


JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA

[JUAN MANUEL LOMBANAMEDELLÌN - COLOMBIA]

Hola,
Mi Duda es la siguiente:
Quiero Saber Cuantas Impresiones Se Hacen En Una Impresora, Para Esto Necesito Saber Como Puedo Capturar en un Programa Hecho En VB 6.0 la cantidad de impresiones que pasan por el controlador o como mas lo puedo hacer... habia pensado que depronto se podria por una api pero realmente nose...
agradezco toda la colaboracion prestada a este tema...
atentamente.


JUAN MANUEL LOMBANA
MEDELLÌN - COLOMBIA

[JUAN MANUEL LOMBANAMEDELLÍN - COLOMBIA]

Hola, estoy haciendo un programa para una sala de internet
pero tengo el siguiente problema necesito bloquear el teclado y el mouse... esto ya lo logre a medias pues cuando escribo control + alt + supr se deSbloquea... probe deshabilitando esta convinancion pero cuando se escribe sale el letrerito 'el administrador de tareas ha sido deshabilitado por el administrador' y se desbloquea el mouse y el teclado... alguien sabe como bloqueo completamente el teclado y el mouse hasta que yo quiera....

Atentamente


JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA

[JUAN MANUEL LOMBANAMEDELLÍN - COLOMBIA]

Hola
Quiero Saber Como Puedo Saber Cuantas Imagenes ".BMP" hay en una carpeta determinada....

Gracias Por Su Atencion

JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA

[JUAN MANUEL LOMBANAMEDELLÍN - COLOMBIA]

Hola
Quiero Saber Como Puedo Saber Cuantas Imagenes ".BMP" hay en una carpeta determinada....

Gracias Por Su Atencion

JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA

Hola Estoy Tratando de Hacer una aplicacion que cambie el fondo del escritorio de windowx xp....
Pero no meda aqui posteo mi codigo,

Código [Seleccionar] Expandir


Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByValuParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long

Private Sub cmdAceptar()
    Dim fallo As Integer
    fallo = SystemParametersInfo(20, 0, C:\WINDOWS\AROS.BMP", 0)
End Sub


[JUAN MANUEL LOMBANAMEDELLÍN - COLOMBIA]

Hola....
Un Dia Me Encontraba Pensando y se me ocurrio como se le colocaria clave a una carpeta cualquiera... lo que pasa es que no se como debo de decir que cuando se haga doble click a dicha carpeta mi soft se abra para pedir la clave....
Alguien Me Podria Colaborar.... u orientarme...
Gracias


JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA

[JUAN MANUEL LOMBANAMEDELLÍN - COLOMBIA]

hola....
Mi Pregunta es como puedo cambiar la el año del sistema...
Se que para Saber cual es utilizo esto:

Código [Seleccionar] Expandir


     MsgBox Year(Date)


Gracias....


JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA

[JUAN MANUEL LOMBANAMEDELLÍN - COLOMBIA]

Hola,
Se que este tema ya se habia posteado pero es que he buscado y no encuantro la solucion, o por lo menos no la entiendo....
Necesito Saber Como Mato un proceso..
Se Que el Comando Es taskkill pero no se que api o shell debo de declarar para que este comando funcione...

Gracias


JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA

[JUAN MANUEL LOMBANAMEDELLÍN - COLOMBIA]

Hola...
Alguien me podria decir para que sirben los archivos.ini, como funcionan??.

Gracias


JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA

[JUAN MANUEL LOMBANAMEDELLÍN - COLOMBIA]

hola..
Mi dunda es la siguiente.. Necesito hacer un programa que me bloque entrar a los sitios de red... Osea No quiero que no tenga acceso a los sitios como tal sino que seesconda "Mis sitios de red", que la unicamenra que yo tenga para entrar se escrbiendo en ejecutar:

\\IpEquipoRemoto\Unidad ejemplo:  \\192.168.0.1\D


JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA

[JUAN MANUEL LOMBANAMEDELLÍN - COLOMBIA]

Hola...
Tengo Una Duda y es como puedo hacer para que tansolo se medetecte la primera letra de un frase ej:
si llo tengo u n palabra as: $900 necesito que tansolo se me lea el primer caracter y de acuerdo a esto haga cierta accion como mostrar en un textbox o eliminar el primer caracter etc...

espero haber sido claro.... Gracias


JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA

[JUAN MANUEL LOMBANAMEDELLÍN - COLOMBIA]

Hola
Este Tema Ya lo Habia POSTEADO antes pero nadie me respondio,
Depronto no fui muy claro en mis ideas...
por lo cual me decidi a postearlo de nuevo...
Explivo:
estoy Haciendo Una Aplicación Cliente / Servidor, Utilizando winsock hasta aqui todo muy bien, lo que quiero hacer es que cuando yo mande (Servidor) como mensaje la palabra "tiempo" en el en clinte se activen 2 Timers, he tratado haciendo lo siguiente:
Esto Va en el Cliente.

Código [Seleccionar] Expandir


Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
    Dim Buffer As String
    Winsock1.GetData Buffer
    Select Case Buffer
          case "Tiempo"
                   timer1.enabled = true
                   timer2.enabled = true
   end select
End Sub

pero  esto no funciona !!!
ya he comprobado todo, y todo funciona bien menos esto..
Como mas puedo activar los timers...
Nota: Tambien he probado mandarme solo mensajes y el winsock responde correctamente....
Gracias de Antemano,


JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA   

Hola
Quiero saber como hago para pasar un texto que tenga en textbox a un block de notas tal cual y que despues el archivo del block de notas se guarde con la fecha en el siguiente formato
(Año - Mes - Dia) --> 2006 - 08 - 29

Muchas Gracias

JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA

hola,
Estoy haciendo un programa cliente/servidor el cual utiliza winsock
es muy sencillo, se trata de un contador el cual cuando en el servidor se oprima un boton en el cliente el contador inicie, he tomado como idea que cuando se oprima el boton el dato que se envie sea una variable llamada buffer de tipo string la cual diga "tiempo" o algo parecidoy en el cliente la muestre en un textbox pero cuando le digo que si buffer = "tiempo" no hace nada coloco mi codigo para que me entiendan

CODIGO:
***Cliente

Código [Seleccionar] Expandir


Private Sub Command1_Click()
    Dim DatosaEnviar As String
    DatosaEnviar = Text2.Text
    Winsock1.SendData DatosaEnviar
    Text1.Text = DatosaEnviar
    Text2.Text = ""
End Sub

Private Sub Command2_Click()
    Winsock1.RemoteHost = Text3.Text
    Winsock1.RemotePort = Text4.Text
    Winsock1.Close
    Winsock1.Connect
End Sub

Private Sub Command3_Click()
    Winsock1.Close
End Sub

Private Sub Form_Load()
    Timer1.Enabled = False
    Timer2.Enabled = False
End Sub

Private Sub Text1_Change()
    Select Case Text1.Text
        Case "Tiempo":
            Timer1.Enabled = True
            Timer2.Enabled = True
        Case "Parar":
                Timer1.Enabled = False
                Label1.Caption = "00"
                Label2.Caption = "00"
                Label3.Caption = "00"
                Timer2.Enabled = False
                Label6.Caption = "0"
    End Select
End Sub

Private Sub Winsock1_Close()
    Winsock1.Close
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
    Dim Buffer As String
    Winsock1.GetData Buffer
    Text1.Text = ""
    Text1.Text = Buffer
End Sub

Private Sub Winsock1_Error(ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean)
    Winsock1.Close
End Sub

Private Sub Timer1_Timer()
Label6.Caption = "0"
Label3.Caption = Val(Label3.Caption) + 1
If Val(Label3.Caption) < 10 Then
    Label3.Caption = "0" & Label3.Caption
End If
    If Val(Label3.Caption) > 59 Then
        Label3.Caption = "00"
        Label7.Caption = Val(Label7.Caption) + 1
            If Val(Label7.Caption) < 10 Then
                Label7.Caption = "0" & Label7.Caption
            End If
        If Val(Label7.Caption) > 59 Then
            Label7.Caption = "00"
            Label8.Caption = Val(Label8.Caption) + 1
           
            If Val(Label1.Caption) < 10 Then
                Label1.Caption = "0" & Label1.Caption
            End If
        End If
    End If
End Sub

Private Sub Timer2_Timer()
Label6.Caption = Val(Label6.Caption) + 1
End Sub



***Servidor

Código [Seleccionar] Expandir



Private Sub Command1_Click()
    Winsock1.SendData Text2.Text
    Text1.SelStart = Len(Text1.Text)
    Text1.Text = Text2.Text
    Text1.SelStart = Len(Text1.Text)
    Text2.Text = ""
End Sub

Private Sub Command2_Click()
    Winsock1.Close
    Winsock1.LocalPort = Text3.Text
    Winsock1.Listen
End Sub

Private Sub Command3_Click()
    Winsock1.Close
End Sub

Private Sub Winsock1_Close()
    Winsock1.Close
End Sub

Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
    Winsock1.Close
    Winsock1.Accept requestID
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
    Dim Buffer As String
    Winsock1.GetData Buffer
    Text1.Text = Buffer
End Sub

Private Sub Winsock1_Error(ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean)
    Winsock1.Close
End Sub


Nota: Ya he probado el timer solo y funciona, ya probe solo enviarme a modo de chata y funciona, no se que pasa que no reconoce la palabra para iniciar el cronometro.
por favor diganme donde esta el erro, quiero agregar que la  es una monoconexion (Un solo Cliente - Un solo Servidor)

Gracias de Antemano

Juan Manuel Lombana

Hola tengo un problema hice un aplicacion Cliente/Servidor Multiconexion(Muchos Clientes un Solo Servidor) pero tengo un problema las maquinas en las que voy a colocar el cliente cuando trato de ejecutar el Exe como no tiene VB me saca un error que me dice:
component 'MSWINSOCK.OCX' or one of its dependencies not correctly registered: a file is missing or invalid
Como Puedo Solucionarlo, Donde Tengo Instalado El compilador de VB funciona bien...
Gracias

JUAN MANUEL LOMBANA
MEDELLÌN - COLOMBIA

Hola  Mi nombre es Juan
Estoy haciendo un aplicación en vb6.0  la cual es algo haci como un chat en intranet hasta ahi todo bien.
pero mi problema es que no se como hacer para traspasar archivos por el programa osea del servidor al cliente y viceversa.

Gracias por su colaboracion
Att:
JUAN MANUEL LOMBANA
MI CORREO ES: manulom@gmail.com
                        manulom@une.com.co