Search results for query: *

I'm using VB6 and SQL Server 7 Here is the code Dim rcd As New ADODB.Recordset Private Sub cmdGuardar_Click() Dim sSQL As String sSQL = "select * from alta_prod where id_prod = 0" rcd.Open sSQL, cn, adOpenKeyset, adLockOptimistic rcd.AddNew rcd.Fields("ID_PROD") =...

I am working with this code at this time With Printer .ScaleMode = vbCentimeters On Error GoTo Carta .PaperSize = vbPRPSUser '.Width = 21.5 '.Height = 14 PrintRoutine Printer .EndDoc End With SalirImprimir: Exit Sub Carta: Printer.PaperSize = vbPRPSLetter PrintRoutine Printer...

My paper size = 8 1/2 X 5 1/2 inches I need to print on it I know that .papersize exist I tryed this code Printer.ScaleMode = vbCentimeters Printer.PaperSize = xlPaperUser PrintRoutine Printer Printer.EndDoc but I it doesn't work what's wrong with the code???

I got this code: Printer.ScaleMode = vbCentimeters Printer.PaperSize = xlPaperUser PrintRoutine Printer Printer.EndDoc my paper form is 8 1/2 X 5 1/2 inches where I have to put the paper size value??

I have this example: Private Sub Command2_Click() Dim objPrint As Printer CommonDialog1.Flags = cdlPDDisablePrintToFile CommonDialog1.Copies = 3 CommonDialog1.PrinterDefault = True CommonDialog1.ShowPrinter 'what's next?? MsgBox "The default printer is:" & Printer.DeviceName End Sub...

I have this example: Private Sub Command2_Click() Dim objPrint As Printer CommonDialog1.Flags = cdlPDDisablePrintToFile CommonDialog1.Copies = 3 CommonDialog1.PrinterDefault = True CommonDialog1.ShowPrinter 'what's next?? MsgBox "The default printer is:" & Printer.DeviceName End Sub...

My sql script look like this create table ENVIO ( ID Integer not null, CLAVE_REM Integer not null, CLAVE_DES Integer not null, FECHA DateTime not null , GUIA Integer...

My database path looks like this gsDataBaseName = "C:\CVS Mensajeria\cvs2k1.mdb" but if the application is installed into other directory the application does not work how can I put a relative path in my app code???

My sql script look like this create table ENVIO ( ID Integer not null, CLAVE_REM Integer not null, CLAVE_DES Integer not null, FECHA DateTime not null , GUIA Integer...

I have a form with database access and I need to print some records. Can some one show me how to do it??? I don't know if I must print textbox or can I print SQL sentence!

I need to fill a MSFlexGrid Some one give an idea I have this code but, it doesn't not work Dim cad As String cad = "SELECT clave_des,comp_des FROM destinatario WHERE comp_des LIKE " & "'*" & txt_Buscar.Text & "*'" Data1.RecordSource = cad Data1.Refresh...

If I have office 98 or office 2000 can I find the Developers tool. I have a lap top so my info is in cab files. If not please tell me where I can get this info. Thank you.