🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: chile.comp.programacion
Article #349

Ayudita en Access 2003

#349
From: Batusay Leal P.
Date: Tue, 05 Aug 2008 14:49
61 lines
3258 bytes
Estimados, estoy haciendo un peque�o gestor de datos de clientes en access 
2003 apra control mio y hace tiempo que no veo access 2003
keria pedir una ayuda para poder avanzar, estoy hace ya 1 semana con lo 
mismo sin tener rrspultados
les explico:
Tengo una base en access 2003 la cual tendre en red accesandola 3 usuarios. 
dentro de la base (base_DB.mdb) tengo 3 tablas (CLIENTES, COMUNA y SOPORTE)

Tabla Clientes             Tabla Comuna            Tabla Soporte
id_cliente                    id_comuna                  id_ticket
cli_rut                        com_nombre               sop_rut
cli_nombre 
sop_detalle_soporte
cli_comuna 
sop_fecha_soporte
cli_direccion

para poblar la tabla soporte, se hace la consulta a traves de un formulario 
la cual tiene texbox, 1 de ellos (textbox1 esta habilitado para escribir)
se ingresar� el RUT (formato 99.999.999-A) y desde un command buttons se 
har� la busqueda por medio de SELECT.
mi pregunta es ver si me pueden ayudar ya que al hacerlo no me arroja nada y 
no cacho como saber cuando la busqueda ha encontrado el registro o no.
Adjunto mi codigo del boton de busqueda.

Private Sub Buscar_Cliente_Click()

Dim strsql As String
Dim Rut_Cliente As String
Dim resultado

Rut_Cliente = Soporte_RUT_Cliente   ' TextBox con formato "99.999.999-A" 
para el RUT del cliente
                                    ' campo texto

strsql = "Select * from CLIENTES where CLI_RUT = '" + Rut_Cliente + "' ;" ' 
consulta sobre la
                                                            ' tabla clientes 
para la busqueda
                                                            ' del cliente
    ' la consulta es la siguiente : SELECT * FROM CLIENTES WHERE CLI_RUT = 
'99.999.999-A';

Me.RecordSource = strsql    ' consulta a la tabla abierta en formulario
                            ' (Base gestion_burtec.mdb tabla CLIENTES)

' Si fue exitosa la busqueda, se pasaran los campos de la tabla clientes 
hacia textbox
' textbox1.Text = tabla.campo1
' textbox2.Text = tabla.campo2
' textbox3.Text = tabla.campo3
' en caso contrario se indicara por un mensaje que el RUT no fue encontrado
' Se esta  programando directamente en access 2003 solamente

End Sub

please si me pueden ayudar a resolver esto

Saluda atte.

Cristian Leal P. 
Technical Details
Message-ID: <g79p90$k2i$1@news.nivel5.cl>
Path: arc1-ca.pugleaf.net!g2news2.google.com!news1.google.com!newshub.sdsu.edu!news.alt.net!news.kjsl.com!news.nivel5.cl!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Thread: 1593cb,6dcde127be151cb7,start
X-Google-Attributes: gid1593cb,domainid0,public,usenet
X-Google-Language: SPANISH,ASCII
Path: arc1-ca.pugleaf.net!g2news2.google.com!news1.google.com!newshub.sdsu.edu!news.alt.net!news.kjsl.com!news.nivel5.cl!not-for-mail
From: "Batusay Leal P." <cristian.leal~@~vtr.net>
Newsgroups: chile.comp.programacion
Subject: Ayudita en Access 2003
Date: Tue, 5 Aug 2008 10:49:02 -0400
Organization: Varios
Lines: 63
Message-ID: <g79p90$k2i$1@news.nivel5.cl>
NNTP-Posting-Host: pc-51-104-120-200.cm.vtr.net
X-Trace: news.nivel5.cl 1217947744 20562 200.120.104.51 (5 Aug 2008 14:49:04 GMT)
X-Complaints-To: news@news.nivel5.cl
NNTP-Posting-Date: Tue, 5 Aug 2008 14:49:04 +0000 (UTC)
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.3138
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.3138
X-RFC2646: Format=Flowed; Original