|
|
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - F_Tanori
Páginas: 1 ... 5 6 [7] 8 9 ... 83
151
« en: Jueves 18 de Noviembre de 2010, 15:29 »
Creo que te Serviria InStr strNumero = InputBox("Proporciona un numero:") if inStr(strNumero,".")>0 then MsgBox("Contiene Punto") else MsgBox("No Contiene Punto") end if
Nota: No lo compile Saludos
152
« en: Jueves 11 de Noviembre de 2010, 10:08 »
Ademas de que Java no es JavaScript... en fin... movido a una zona mejor 
153
« en: Jueves 11 de Noviembre de 2010, 10:06 »
Puedes usar el metodo Find
Saludos
154
« en: Jueves 11 de Noviembre de 2010, 10:03 »
De vez en cuando hay que volver  Saludos
155
« en: Jueves 11 de Noviembre de 2010, 10:01 »
Hola El error esta aqui. Con (variable de VB donde tomas el valor del inputbox) pero en el codigo lo pasas como parte de la cadena: rst1.Open "select * from Estasit_Sdos_Ofic where documento like con;", base
debes concatenar como te dicen en las respuestas anteriores, ahora tomando en cuenta que fuera un campo de tipo texto entonces debera ser encerrado entre comillas (sin interrumpir las propias usadas en la cadena de VB) esto se hace usando apostrofes esto es si fuera una constante rst1.Open "select * from Estasit_Sdos_Ofic where documento like 'con';", base
usando la variable rst1.Open "select * from Estasit_Sdos_Ofic where documento like '"& con &"';", base
y como estas utilizando el operador like es probable que necesites comodines Ejemplo: (para mayor referencia lee acerca del operador like en Access) rst1.Open "select * from Estasit_Sdos_Ofic where documento like '*"& con &"*';", base
Saludos
156
« en: Viernes 15 de Octubre de 2010, 21:30 »
157
« en: Jueves 14 de Octubre de 2010, 02:11 »
Existe un formato estadar ANSI para las fechas en SQL es YYYYMMDD Ej. '20101123' intentalo asi
Saludos
158
« en: Sábado 25 de Septiembre de 2010, 14:24 »
Hola, En tu formulario debes de agregar el visor de reportes de crystal report, y ahi le das la ruta del archivo .rpt Mira esta pagina te explica como, http://www.elguille.info/vb/crystal/cry ... elMaya.htmAutor: Daniel Maya OrtizSaludos
159
« en: Sábado 25 de Septiembre de 2010, 12:23 »
Si, teoricamente cualquier proxy debera servirte, incluso ISA funciona como proxy busca entre las opciones, yo uso CCProxy y funciona muy bien...
Saludos
160
« en: Sábado 25 de Septiembre de 2010, 11:43 »
En que idioma haz publicado tu duda?  Resulta imposible entenderte, pudieras explicarnos mejor? Saludos
161
« en: Miércoles 15 de Septiembre de 2010, 09:45 »
No tienes ni idea de como se usa un foro, creo que tu mensaje es basura ya que no aporta nada, de lo supuestamente resuelto, eso si exiges ayuda pero no la ofreces...
163
« en: Miércoles 8 de Septiembre de 2010, 08:45 »
Hola amigos tengo este dataWindows .
Quisiera validar el campo Abreviatura, que solo admita letras de ser lo contrario al momento de dejar el campo lanze el mensaje de advertencia
Esto pude resolverse usando una mascara #### en la pestana Edit /Edit Mask / Mask de las propiedades de la columna Esto se maneja en el Evento ItenError o talvez en el ItenChange de DataWindows, puede Retornar 1 , 2 , quisiera poder Personalizar el mensaje ponerle uno propio , por otro lado que pasa si tengo varias validaciones
Por ejemplo en la columna nombrecargo o jornal con diferentes validaciones como diferenciaría cada una de ellas , espero contar con su gran ayuda , Saludos a toda la comunidad  Puedes usar cualquiera de los 2 eventos (IteMError e IteMChanged) ejemplo: String ls_columna ls_columna =dwo.name choose case ls_columna case 'nombrecargo' /*Ejemplo*/ if data = 'gerente' then MessageBox('Aviso','A Seleccionado Gerente') end if case 'jornal' /*Ejemplo*/ if data = 'nada' then MessageBox('Aviso','Jornal; Este es un ejemplo') end if end choose return 1 //Mensaje Procesado
Saludos
164
« en: Miércoles 8 de Septiembre de 2010, 08:25 »
Seria bueno que nos mostraras la estructuras de tus tablas (CREATES) incluyendo PKs, FKs, IDX ...
Para poder crear un escenario mas parecido al tuyo, ya que es un poco dificil sin tener la base de datos y desconocer el sistema y la logica del mismo, ademas de que "...me sale un error de foreign key..." como que explica pero no explica es decir un error de foreing key? relacionado con la FK pero que en especifico, no existe, no la puede crear, no es valida etc
Coloca el mensaje de error que te arroja MsSQL y las estructuras de tus tablas en sql para poderlas crear
Saludos
165
« en: Sábado 4 de Septiembre de 2010, 17:46 »
A ver si he logrado entender, lo unico que quieres hacer es incrementar la subcuenta no? Si es asi fijate si este codigo te sirve: CREATE FUNCTION genNumeroCuentaAux(@Num_CM VARCHAR(9)) RETURNS VARCHAR(9) BEGIN DECLARE @Num_CA VARCHAR(9) DECLARE @Numero INT DECLARE @NumSiguiente_CA VARCHAR(9) SELECT @Num_CA=MAX(Num_CA) FROM tblCuentaAuxiliar WHERE Num_CM=@Num_CM SELECT @Num_CA=isnull(@Num_CA,'') SELECT @Numero = 0 SELECT @NumSiguiente_CA=@Num_CM IF @Num_CA<>'' BEGIN SELECT @Numero=CAST(SUBSTRING(@Num_CA,6,4) AS INT) END SELECT @Numero = @Numero+1 SELECT @NumSiguiente_CA=@NumSiguiente_CA+'-'+RIGHT('000'+CAST(@Numero AS VARCHAR(4)),4) RETURN @NumSiguiente_CA END GO SELECT dbo.genNumeroCuentaAux('1010')
Saludos
166
« en: Sábado 4 de Septiembre de 2010, 17:05 »
Hola:
Espero buestra respuesta pues lo he probado todo y no me salgo.
tengo un procedimiento donde quiero insertar una factura nueva en la tabla "factura" ,
pero cuando la ejecuto siempre me sale el error de que no se puede insertar porque es de solo lectura
os envio el codigo para que me digais donde esta el error o si tengo que poner algo más
es urgente porfavor , no puedo facturar!"
If IsNull(DLookup("[Idpedido]", "factura", "[idpedido]=" & posicion)) Then
Dim lin As String
Dim sConnect As String, sSQL As String
Dim cnnActiva As ADODB.Connection
Dim rst_Ado As ADODB.Recordset
Set cnnActiva = New ADODB.Connection
cnnActiva.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=My Dropboxempresarepara-espinosaRepara-Espinosa ultima.mdb;Persist Security Info=False;"
Set rst_Ado = New ADODB.Recordset
rst_Ado.Open "Select Max(idfactura) From factura", _
cnnActiva, adOpenStatic, adLockPessimistic
fac = rst_Ado.Fields(0)
ano = CStr(Year(Forms![clientes1]![subpedidos]![FechaEnvío]))
If Left(fac, 4) <> ano Then
fac = ano & "000"
End If
DoCmd.OpenForm "factura"
rst_Ado.AddNew aqui me sale el error " no se puede actualizar.Base de datos u objeto solo lectura"
Forms![factura]![idfactura] = rst_Ado.Fields(0) + 1
Forms![factura]![IdCliente] = Me.IdCliente
Forms![factura]![fechafactura] = Date
Set rst_Ado = Nothing
' cnactiva.Close
Set cnnActiva = Nothing
GoTo final
Gracias de antemano adOpenStatic es de Solo lectura pero como veras mas que nada el problema es que estas abriendo una consulta con una expresion o campo calculado (generada por la funcion max) la cual es de solo lectura en si misma, ademas no tendrias acceso a los damas campos de tu tabla, necesitas abrir la tabla, rst_Ado.Open "Select Max(idfactura) From factura" _ cnnActiva, adOpenStatic, adLockPessimistic . . . rst_Ado.AddNew
Cierra el RS y abrelo de nuevo utilizando la tabla rst_Ado.Open "Select Max(idfactura) From factura" _ cnnActiva, adOpenStatic, adLockPessimistic . . . rst_Ado.close rst_Ado.Open "factura",cnnActiva, adOpenDynamic . . . rst_Ado.AddNew
Nota: No lo probe por falta de escenario de pruebas, pero la idea es esa Saludos
167
« en: Sábado 4 de Septiembre de 2010, 16:54 »
Parece que el error inicia desde querer cambiar un windows original a uno modificado  , en lo personal creo que esos windows modificados son una basura, y los usan personas que ya no necesitan idea de nada solo colocan el cd y que se haga todo solo, pero estas "ediciones de windows" eliminan archivos y aplicaciones importantes, en muchos casos que hemos tenido que instalar una aplicacion con algun windows de estos ocurre algun problema (99% de los casos) eso hace perder muchisimo tiempo ($) en cosas innecesarias. Mira hay 3 (hay mas) basicamente tipos de usuarios en xp, Administradores, Usuarios Restringidos, Invitados. existen los usuarios TIPO administrador, pero existe EL administrador (el manda mas, al que no se le niega nada) intenta accesar con esa cuenta, incluso puede ser un servicio dentenido, o una aplicacion removida por los pseudoeditores de ese pseudowindows. Mi recomendacion principal Utiliza una version Editada y Aprobada por su propietario ( MICROSOFT por nadie mas) Saludos
168
« en: Miércoles 11 de Agosto de 2010, 18:57 »
si usas Apache tienes que agregar un tipo en tu archivo httpd.conf Busca la seccion AddType y agrega la siguiente linea AddType application/x-httpd-php .html
* necesitas reiniciar el apache Saludos
169
« en: Miércoles 11 de Agosto de 2010, 16:56 »
Me pueden asesorar como hacerle para correr un archivo .bat en pb 10 pero que ejecute la accion bien.
el archivo .bat lo ejecuto manualmente y funciona al 100%
Desde pb 10 ya intente de las siguientes formas, aparentemente se ejecuta por que se abre la ventana del ms-dos pero no hace la accion. lo que contiene el archivo .bat es llamar un programa .jar enviandole unos parametros.
//Prueba 1 run("command. Com C:appaccion.bat") //Prueba 2 run("C:appaccion.bat")
//Prueba 3 String ls_runinput Integer li_rc OleObject wsh CONSTANT integer MAXIMIZED = 3 CONSTANT integer MINIMIZED = 2 CONSTANT integer NORMAL = 1 CONSTANT integer HIDE = 0 CONSTANT boolean WAIT = TRUE CONSTANT boolean NOWAIT = FALSE ls_runinput = "c:appaccion.bat" wsh = CREATE OleObject li_rc = wsh.ConnectToNewObject( "WScript.Shell" ) li_rc = wsh.Run(ls_runinput, NORMAL, TRUE)
He intentado de esas maneras pero no realiza la accion del .bat 
Agradesco cualquier asesoria.  Regularmente el problema es de rutas y referencias dentro del bat, y con la que esta trabajando powerbuilder, si en el archivo bat haces referencia a aplicaciones sin la ruta completa ' cambiate de directorio ' Ejemplo: [BAT] mspaint.exe "C:mapa.bmp" Cambiate de directorio o estaras en el directorio de tu aplicacion [BAT] CD %WINDIR%System32 mspaint.exe "C:mapa.bmp" o usando rutas completas [BAT] %WINDIR%System32mspaint.exe "C:mapa.bmp" Necesitas analizar tu archivo bat Saludos NOTA: command. Com no existe la aplicacion se llama command.com (sin espacio entre el punto y la extension) prueba con start (no lo he probado)
171
« en: Miércoles 11 de Agosto de 2010, 16:11 »
Este hilo es viejisimo, para la proxima intenta abrir un nuevo hilo. esta persona Sagutxo hace eso constantemente pide ayuda, pero no la ofrece cuando logra algo lo ha hecho muchas veces   , inicia sesion solo para decir esa tonteria de que ya lo resolvio pero no ayuda en nada esa respuesta!!! la verdad no entiendo que pretende con eso... Ahora en cuanto a tu problema puedes usar el metodo Navigate2 en algunos casos resuelve el problema, cual es el error que te da a ti? Saludos
172
« en: Domingo 8 de Agosto de 2010, 11:11 »
Exacto, como te dice fonsi3 no es necesario colocar la ruta, finalmente el archivo debe estar en el servidor, y quizas fue subida desde otro equipo, y ahora que se desea actualizar pues de nada sirve esa ruta, te han dado una buena alternativa
saludos
173
« en: Domingo 8 de Agosto de 2010, 11:09 »
Puedes hacer referencia a la primera ventana desde la segunda [doubleclicked] Integer li_row if row>0 then if isValid(w_ventanaMain) then //Comprueba que este cargada,no deberia por que es response, pero mas vale :P li_row = w_ventanaMain.dw_external.insertrow(0) w_ventanaMain.dw_external.setItem(li_row,'idEmpleado',this.getItemString(row,'idEmpleado')) //getItemType? end if end if
Saludos
174
« en: Viernes 6 de Agosto de 2010, 09:01 »
Eso no es posible, el File hace referencia a exporar la maquina cliente, y eso seria una falla de seguridad. quizas exista alguna alternativa para lo que deseas hacer si nos dices que es lo que pretendes lograr.
Saludos
175
« en: Jueves 29 de Julio de 2010, 17:27 »
el Zip contine: * una version de OpenSSL* un certificado (.CER) digital de prueba proporcionado por el SAT* una clave privada (.KEY) tambien proporcionada por SAT * contraseña de la clave privada en .TXT * una cadena original de ejemplo en UTF8 .TXT * el hash de la cadena en Md5 .TXT * una imagen con el procedimiento que describe el SAT * un archivo de s c r i p t de windows .CMD que genera el sello digital usando OpenSSL * un Sello valido y un acceso al validador en linea del SAT (utilizando el mismo certificado que incluye el zip) Si el procedimiento es correcto segun lo describe SAT esto no deberia dar problemas sin embargo el sello generado por OpenSSL no es valido (segun el validador) pero he realizado pruebas con otro software en todos obtengo el sello que me da OpenSSL y si se le aplica verificacion da como correcto asi que estoy dudando de que el validador sea correcto o el proceso descrito por SAT no lo es y estan olvidando pasos!. El otro metodo que he utilizado es PBCrypto en power builder 10 con las librerias Bouncy Castle (Java) Saludos [16 Jul 2010]============================== He agregado algunas otras herramientas que pueden ser de utilidad ya que se esta usando la linea de comando * aplicacion para remover la marca EOF del archivo * aplicacion para generar el hash MD5 * aplicacion para quitar el nombre del archivo que le coloca MD5.exe o el propio OpenSSL dgst -md5 Autor: Francisco Tanori / Foros http://www.ingenieria-soporte.com
Páginas: 1 ... 5 6 [7] 8 9 ... 83
|
|
|
Mostrar Mensajes
