Ayuda

[stealth]

Tengo dos problemas: como se puede utilizar el evento doble click en un datagrid para que haga una sentencia sql por medio de ADODC o ADODB, y la otra como se programa un socket gracias Saludos

[stealth]

:(
Private Sub Dgferias_Click()
With Dgferias
If .SelStartCol <> -1 Then
Dim cadena As String
cadena = "select * from Ferias order by " & Dgferias.Columns(.SelStartCol).DataField

If InStr(1, adodcferia.RecordSource, Dgferias.Columns(.SelStartCol).DataField, vbTextCompare) > 0 And InStr(1, adodcferia.RecordSource, "asc", vbTextCompare) > 0 Then
cadena = cadena & " desc;"
Else
cadena = cadena & " asc;"
End If
' cadena = "select * from Ferias order by " & Dgferias.Columns(.SelStartCol).DataField & " ;"
If adodcferia.Recordset.State <> 0 Then adodcferia.Recordset.Close
adodcferia.Recordset.CursorLocation = adUseClient
adodcferia.CommandType = adCmdText
adodcferia.RecordSource = cadena
adodcferia.Recordset.Open cadena, , adOpenDynamic, adLockOptimistic
Set .DataSource = Nothing
Set .DataSource = adodcferia
Set TxtFeria.DataSource = adodcferia
End If


End With
End Sub
'ME HABEIS QUITADO DE UN APURO
'YA LO CREO

[stealth]

Este tema ya a terminado :mad:

[diarrea]

PEro solucionaste el problema o no???

[NeuroToxina]

Programar un socket no es algo tan sencillo.
Necesitas crear un socket cliente y otro servidor, para transferir datos entre ellos.
Que lenguaje vas a usar para programarlo?

En C,VB, Delphi, hay un componente llamado WinSock que realmente es la conexion a la API .

Un cacho de codigo en Delphi:

// Creacion del socket;
ClientSocket:=TClientSocket.Create(nil);
ClientSocket.Host:=Host;
ClientSocket.Port:=Port;
ClientSocket.ClientType:=ctBlocking;

Try
ClientSocket.Active:=True;
Except Begin
ClientSocket.Free;
Result:=1; //>Conexion denegada
Exit;
End End;

Try Begin
Stream := TWinSocketStream.Create(ClientSocket.Socket,TimeOu t);
Try Begin
FillChar(Buffer,Length(Buffer), 0); { initialize the buffer }

//------Envio----------
// Lee el tamaño del archivo.
FileSize_:=0;
FileHandle:=0;

Blaaa , Blaaa, Blaaa.........

[stealth]

El problema del datagrid con adodb ya esta solucionado. El del socket casi esta gracias por la informacion Saludos a todos

[stealth]

Ya he programado un socket cliente ahora estoy trabajando en uno servidor tengo problemas por las "palabras" que empeare para la comunicacion. Pero muchas gracias por las molestias. Saludos