PREGUNTAS CONTESTADAS - Visual Basic

 Hay un total de 3030 Preguntas.<<  >> 

    Pregunta:  23055 - VISUAL 6.0/ORACLE
Autor:  Liliana Millar
Hola: Ojala puedan orientarme, tengo una duda :
necesito ejecutar desde la aplicación Visual(con ADO) una función que se encuentra en un paquete(package body...compilada en Oracle), entonces..Cómo desde Visual rescato lo que retorna esta función??
x ej:
(la funcion retorna un number)

sqq = "pack_proceso.Fn_traspaso (" & "'" & fecha & "')"

fin eje
pd. el Execute es para procedimientos...y el Open para cursores...

muchas gracias....
  Respuesta:  eliseo
si entablas relacion con un resourt de la tabla compiladad ejerces el fichero api de soluciones dinamics

    Pregunta:  23061 - ACUSE DE RECIBO AL ENVIAR CORREO UTILIZANDO LOTUS NOTES
Autor:  Datne Jaimes
Actualmente utilizo una aplicación en Visual Basic para a través del Lotus Notes enviar correos electronicos a diferentes clientes con información relacionada con cada uno de ellos. Mi problema es que no consigo la forma como automatizar que este envío me genere un acuse de recibo, y que este comando lo genera a través de visual sin importar las preferencias que estan predeterminadas para lotus.
  Respuesta:  Sergio Lopez
Usa esto :

Dim doc As NotesDocument
Call doc.ReplaceItemValue("ReturnReceipt", "1")

En el segundo parámetro, si indicas 1 generará acuse de recibo, si indicas 0 no se generará

Saludos

    Pregunta:  23072 - SQL-DMO..("INVALID DESCRIPTOR INDEX")
Autor:  John C.
Estoy trabajando en un proyecto en Visual Basic, utilizando SQL-DMO,
pero me sucede algo que no entiendo, solo en algunos equipos donde lo ejecuto:
-Intento ejecutar una consulta con el comando EXECUTEWITHRESULTS del objeto DATABASE y me aparece el mensaje de error "Invalid Descriptor Index"-

Lo que hago es esto:
Set Query = oCurDB.ExecuteWithResultsAndMessages "SELECT * FROM MITABLA", ,Mensaje)

He aquí unas aclaraciones de lo que sucede

-"MITABLA" tiene mas de 30 columnas
-Ya comprobé que no es problema de memoria del equipo donde lo corra
-Tengo dos o mas equipos con la misma configuración (memoria, procesador, etc) y en unos aparece el error y en otros no
-Si no escribo "SELECT * " , sino que escojo ALGUNOS campos ("SELECT CAMPO1¬cept:
  Respuesta:  Patricio López
El problema sucede específicamente con SQL 7 cuando utilizas SQL-DMO en consultas que entreguen muchas columnas de tipo numérico.
Esto lo puedes solucionar aplicando el Service Pack 4 para SQL 7 en el equipo cliente donde ejecutes tu aplicación.
Por lo menos está comprobado que funciona para la versión en Inglés del SQL 7, para la versión en español no lo creo así.
Para mas información revisa este link:

http://support.microsoft.com/default.aspx?scid=kb;en-us;257515

Saludos...

    Pregunta:  23086 - KOMO SABER EL NUMERO D ERROR Y DESCRIPCION D UN WINSOCK
Autor:  David
Hola a Todos,

Me lei todas las preguntas k kontenian la palabra winsock y no encuentro respuesta a mi problema.

Mi problema es k estoy aciendo un programa para k se comunike kon un servidor remoto , (FTp, WEB , o kualkier otro ) pudiendo acceder a paginas web , ficheros , etc tipo navegador pero sin mostrar informacion komo html o similar.

Bien al "intentar" conectar kon una web (ej. http://yo.es/index.html) tanto sea para visualizarla komo para bajarla . El control winsock siempre me da un error en el state.

Kisiera saber el codigo d komo mostrar en un msgbox o un label el numero d error y la descripcion para intentar poder solucionarlo. Aunk si me ayudan tb se lo agradecere.

Un coordial saludo y gracias d antemano.
  Respuesta:  SuNcO
Cuando existe un error de conexion el objeto te envia a la propiedad WinSock_Errorm ahi solo pon un

MsgBox "Error " & Number & " : " & Description, vbOkOnly, "Error"

    Pregunta:  23116 - DETECTAR FINAL DE IMPRESION CON CRYSTAL REPORT
Autor:  Jose g Montalvo
Como se puede detectar el final de impresion con crystal report
  Respuesta:  Jose Antonio huerta
mira lo que yo hago para poder ver si la impresion con crystal termino y se realizo correctamente es lo siguiente:

Reporte = "C:\leyes\CLIENTE\Reportes\progacad.rpt"
Impresora = 1
Ventana = 0

resultado% = PEPrintReport(Reporte, Impresora, _
Ventana, Titulo, Izq, _
Top, CW_USEDEFAULT, CW_USEDEFAULT, _
CW_USEDEFAULT, _
0)

resul = PECloseEngine()

CrystalReport1.ReportFileName = Reporte
CrystalReport1.WindowTitle = Titulo
CrystalReport1.Destination = crptToWindow
'result = CrystalReport1.PrintReport
If resul <> 0 Then
MsgBox CrystalReport1.LastErrorString
End If

ojala te sirva, =)

    Pregunta:  23129 - IMPRIMIR EL CONTENIDO DE UN MSFLEXGRID
Autor:  Alejandro Nolazco Guerrero
Quiero imprimir el contenido de un msflexgrid como si imprimiera un RichTextBox pero solo me imprime la primera celda.
Quiero saber la forma de imprimir el contenido de un msflexgrid.
  Respuesta:  Oswaldo Monagas
Con el siguiente codigo tienes:

Purpose
Print a FlexGrid control

Method
For each row, loop through the row's columns printing the control's values.

Private Sub PrintFlexGrid(ByVal ptr As Object, ByVal flx As MSFlexGrid, ByVal xmin As Single, ByVal ymin As Single)
Const GAP = 60

Dim xmax As Single
Dim ymax As Single
Dim X As Single
Dim c As Integer
Dim r As Integer

With flxData
' See how wide the whole thing is.
xmax = xmin + GAP
For c = 0 To .Cols - 1
xmax = xmax + .ColWidth(c) + 2 * GAP
Next c

' Print each row.
ptr.CurrentY = ymin
For r = 0 To .Rows - 1
' Draw a line above this row.
If r > 0 Then ptr.Line (xmin, ptr.CurrentY)-(xmax, ptr.CurrentY)
ptr.CurrentY = ptr.CurrentY + GAP

' Print the entries on this row.
X = xmin + GAP
For c = 0 To .Cols - 1
ptr.CurrentX = X
ptr.Print BoundedText(.TextMatrix(r, c), .ColWidth(c));
X = X + .ColWidth(c) + 2 * GAP
Next c
ptr.CurrentY = ptr.CurrentY + GAP

' Move to the next line.
ptr.Print
Next r
ymax = ptr.CurrentY

' Draw a box around everything.
ptr.Line (xmin, ymin)-(xmax, ymax), , B

' Draw lines between the columns.
X = xmin
For c = 0 To .Cols - 2
X = X + .ColWidth(c) + 2 * GAP
ptr.Line (X, ymin)-(X, ymax)
Next c
End With
End Sub

Oswaldo Monagas

    Pregunta:  23146 - RICHTEXTBOX CON LA PROPIEDAD HIPERVINCULO
Autor:  Pakko Siles
El problema es el siguiente:
Yo cargo documentos RTF en Un RichText, y en el documento vienen contenidas URLs, desearía poder hacer que cuando el cursor del mouse pase ensima del url este cambie, así como lo hace Word, y que cuando se le de un click me direccione a la pagina del URL abriendo el navegador.

Agradecería cualquier ayuda
  Respuesta:  SuNcO
Aqui hay un codigo que te haces eso :

http://www.codigoplus.com/index.php?accion=codigos&busqueda=detectar&categoria=1

    Pregunta:  23174 - TIEMPO DE LLAMADA DE UN SP DESDE VB
Autor:  Francisco Biordi
Hola Gente, tengo un problema:
Si llamo a un sp de SQL Server desde VB me tarda un monton de tiempo pero si lo corro desde el analizador de consultas lo hace mucho mas rapido.
Alguien sabe si se puede acortar ese tiempo de llamada a sp o ejecución de querys desde VB.
Gracias, Francisco.
  Respuesta:  Mauricio Leyzaola
Hola Francisco, como ejecutas el sp desde visual basic? Hay como 8 maneras diferentes de hacerlo. Has probado la manera más simple?

Public Function ExisteNumeroSerieBD(NumSerie As String, Optional AlmacenId As Long = 0) As Boolean
Dim sSQL As String
Dim Rs As New ADODB.Recordset

If NumSerie = "" Then Exit Function

sSQL = "SPExisteNumSerie '" & NumSerie & "', " & AlmacenId
Rs.ActiveConnection = ADOQuery.ConnectionString
Rs.Open sSQL
ExisteNumeroSerieBD = Rs(0)
Set Rs = Nothing
End Function

Este es el sp:
CREATE PROCEDURE SPExisteNumSerie

@NumSerie CHAR(18),
@AlmacenId SMALLINT

AS

DECLARE @Existe TINYINT

IF @AlmacenId = 0
BEGIN
SELECT @Existe = COUNT(*)
FROM Equipo
WHERE NoSerie = @NumSerie
END
ELSE
BEGIN
SELECT @Existe = COUNT(*)
FROM Equipo
WHERE NoSerie = @NumSerie
AND Almacen_Id = @AlmacenId
END

IF @Existe > 0
SELECT -1
ELSE
SELECT 0
GO

Saludos.

    Pregunta:  23183 - CONTROLAR WEBCAM
Autor:  Juan Fco. T.
Mi Pregunta es la Siguiente. como es posible controlar una webcam mediante codigo de visual basic.

lo que yo quiero es realizar una aplicacion que sirva como de seguridad y la cual pueda capturar la imagen cada tiempo determinado, como si fuera un historial de imagenes.
  Respuesta:  Wirley Rivas Garcia
men, en esta dir. http://www.shrinkwrapvb.com/ezvidcap.htm tienes el ocx free y el codigo necesario para poder hacer lo que quieres... cualquier cosa me puedes escribir a [email protected] y te las envio por correo... Exito..!!!

    Pregunta:  23184 - SELECCIONAR DE UN DBCOMBO EL TEXTO MIENTRAS SE ESCRIBE
Autor:  raul yañez
Necesito saber como hacer para que se seleccione de la lista el que coincida con el texto a medida que voy escribiendo. Adicionalmente, si es posible se autorellene con el seleccionado; estilo Access o dirección en Internet Explorer.

Gracias
  Respuesta:  Raul Perez
Una vez que ya tienes el datacombo enlazado, solo debes pulsar con el boton derecho sobre el control y acceder a las propiedades.
En la propiedad MatchEntry selecciona dblExtendedMatching y ya esta. Asi de simple, esto te ira buscando las coincidencias a medida que escribes.
En caso de que borres, debes esperar como un par de segundos para que se refresque la nueva busqueda.

Un saludo

|<  <<  184 185 186 187 188 189 190 191 192 193 194  >>  >|