Visual Basic 6.0 Connect To SQL Server 2000

Jul 20, 2005

We have forms written in Visual Basic 6.0. They were previously
written for an Access database which was moved to SQL Server 2000.

Here's the connect string I used:
ODBC;UID=visualbasic;PWD=password;SERVER=MPSQL;DRI VER={SQL
SERVER};DATABASE=MPPhoto

The user visualbasic and the user logged in to the computer have full
rights to the database.

When they open the form which is based on a view it is opened as read
only with an error 3027. The data control is not set to read only.
The database file is not read only. All of the permissions are set to
allow this user read, write and modify.

Can anyone hep me?

View 3 Replies


ADVERTISEMENT

How Can I Connect A Sql Server Database To Visual Basic 2005 Express

Oct 8, 2007

Hi, i am new to sql server and visual basic, i need to connect my sql server database to a new application i've developed in visual basic 2005 express. Can any one tell me the steps to do this. Many Thanks.

View 2 Replies View Related

Newbie Question: Debugegr For SQL Server 2000 (e.g. Through Visual Basic???)

Apr 28, 2004

I am using the SQL Server 2000 query analyser to write stored procedures for an SQL Server 2000 database.

I would like to find a debugger to help me "look into" my stored procedures as they are executed (e.g. to watch a Cursor fill a table row by row, see the contents of temporary tables as a stored procedure progresses, etc.)

Could anybody, please, direct me to-

* Any debugger that does this
OR
* Simple instructions how to run stored procedures from Visual Basic. I suspect :) that VB's debugger may be able to look into the SQL as it is being executed, but I don't actually know how to use VB itself.

Thanks very much,

Angelos

View 3 Replies View Related

Visual Basic Slow Down Sql Server 2000 Running A Stored Procedure

Nov 30, 2007

I hav the following problem. I have written an stored procedure in sql server 2000 as the following
CREATE PROCEDURE dbo.pa_rellena
@pFechaInicio datetime

AS
declare @pFechaFin datetime
declare @auxcod_cen char(10)

declare @importeEfectivo decimal(17,2)
declare @importeTarjetas1 decimal(17,2)
declare @importeTarjetas2 decimal(17,2)
declare @importeVales decimal(17,2)
declare @importeTalones decimal(17,2)
declare @importeGastos decimal(17,2)


select @pFechaFin=@pFechaInicio+1


--Borramos las tablas temporales si las hemos creado con anterioridad y no se han borrado
if object_id('tmpCentros') is not null
drop table tmpCentros

if object_id('tmpCentros2') is not null
drop table tmpCentros2

if object_id('tmpMaxCajas') is not null
drop table tmpMaxCajas

if object_id('tmpCajasCentro') is not null
drop table tmpCajasCentro

if object_id('tmpVales') is not null
drop table tmpVales

if object_id('tmpDiarioEfectivo') is not null
drop table tmpDiarioEfectivo

if object_id('tmpDiarioTalones') is not null
drop table tmpDiarioTalones

if object_id('tmpDiarioTarjetas') is not null
drop table tmpDiarioTarjetas

if object_id('tmpDiarioSegundaForma') is not null
drop table tmpDiarioSegundaForma

if object_id('tmpDiarioGastosTarjetas') is not null
drop table tmpDiarioGastosTarjetas

if object_id('temp1') is not null
drop table temp1

--Seleccionamos todos los centros de Salvador Bachiller
select * into tmpCentros2
from centros
where centros.tienda=1
order by cod_cen

--Seleccionamos el maximo de cajas por cada centro

select cod_cen, max(cod_caja) as cajas into tmpMaxCajas
from cierrecaja
where fecha>=@pFechaInicio and fecha<@pFechaFin
group by cod_cen
order by cod_cen

--Mezclamos los centros con el maximo de cajas
select c.cod_cen, c.Centro, c.Direccion, c.localidad, c.provincia, c.cpostal, c.telefono, m.cajas, operaciones, cajas_tot, tienda, franquicia into tmpCentros
from tmpCentros2 as c left outer join tmpMaxCajas as m on c.cod_cen=m.cod_cen

--Cajas por centro
select distinct cod_cen as cod_cen, cod_caja as cod_caja into tmpCajasCentro
from cierrecaja
where fecha>=@pFechaInicio and fecha<@pFechaFin

--Los vales de cada centro
select cod_cen,sum(importe) as imp1 into tmpVales
from vales where
fecha>=@pFechaInicio and fecha<@pFechaFin
group by cod_cen

--Efectivo de cada centro
select cod_cen,'01' as vendedor,'EFECTIVO' as descripcion, (sum(diario.TotEuro)-Sum(Diario.Imppa2)) as importe1,0 as exp1, (sum(Diario.TotEuro)-sum(Diario.imppa2)) as importe2 into tmpDiarioEfectivo
from diario
where fecha>=@pFechaInicio and fecha<@pFechaFin and cod_cen in (select cod_cen from tmpCentros) and cod_caja in (select cod_caja from tmpCajasCentro) and diario.cod_pago='01'
group by cod_cen

--Talones por centro
select centros.cod_cen,'02' as vendedor,'TALONES' as descripcion, sum(diario.TotEuro) as importe1,0 as exp1, sum(Diario.TotEuro) as importe2 into tmpDiarioTalones
from centros inner join diario on centros.cod_cen=diario.cod_cen
where fecha>=@pFechaInicio and fecha<@pFechaFin and diario.cod_cen in (select cod_cen from tmpCentros) and cod_caja in (select cod_caja from tmpCajasCentro) and diario.cod_pago='02'
group by centros.cod_cen

--Tarjetas por centro
select cod_cen,'03' as vendedor,'TARJETAS' as descripcion, sum(diario.TotEuro) as importe1,0 as exp1, sum(Diario.TotEuro*(FPago.Descuento/100)) as importe2, sum(Diario.TotEuro) - sum(Diario.TotEuro*(FPago.Descuento/100)) as importe3 into tmpDiarioTarjetas
from FPago left join Diario on fpago.Cod_pago=Diario.cod_pago
where fecha>=@pFechaInicio and fecha<@pFechaFin and cod_cen in (select cod_cen from tmpCentros) and cod_caja in (select cod_caja from tmpCajasCentro) and Fpago.Descuento<>0
group by cod_cen

--Segunda Froma de Pago
select cod_cen,'03' as vendedor,'TARJETAS' as descripcion,sum(diario.imppa2) as importe1 into tmpDiarioSegundaForma
from fpago left join Diario on Fpago.cod_pago=diario.cod_pa1
where fPago.cod_pago<>'99' and fecha>=@pfechaInicio and fecha<@pFechaFin and cod_cen in (select cod_cen from tmpCentros) and cod_caja in (select cod_caja from tmpCajasCentro) and Fpago.Descuento<>0
group by cod_cen

--Comisiones tarjetas de pago
select cod_cen,'10' as vendedor, 'GASTOS (-)' as descripcion, sum(Diario.imppa2*(fPago.Descuento/100)) as importe2 into tmpDiarioGastosTarjetas
from Fpago left join Diario on FPago.cod_pago= Diario.cod_pa1
where fPago.cod_pago<>'99' and fecha>=@pFechaInicio and fecha<@pFechaFin and cod_cen in (select cod_cen from tmpCentros) and cod_caja in (select cod_caja from tmpCajasCentro) and Fpago.Descuento<>0
group by cod_cen
/*
--Venta neta por centro
declare cursortemporal cursor for select cod_cen from TmpCentros2

open cursortemporal
delete detallecaja_aux
fetch next from cursortemporal into @auxcod_cen
while @@fetch_status=0
Begin
select @importeVales=imp1 from tmpVales where cod_cen=@auxcod_Cen
select @importeEfectivo=importe2 from tmpDiarioEfectivo where cod_cen=@auxcod_Cen
select @importeTalones=importe2 from tmpDiarioTalones where cod_cen=@auxcod_cen
select @importeTarjetas1=importe3 from tmpDiarioTarjetas where cod_cen=@auxcod_cen
select @importeTarjetas2=importe1 from tmpDiarioSegundaForma where cod_cen=@auxcod_cen
select @importeGastos=importe2 from tmpDiarioGastosTarjetas where cod_cen=@auxcod_cen

select @importeVales=isnull(@importeVales,0)
select @importeEfectivo=isnull(@importeEfectivo,0)
select @importeTalones=isnull(@importeTalones,0)
select @importeTarjetas1=isnull(@importeTarjetas1,0)
select @importeTarjetas2=isnull(@importeTarjetas2,0)
select @importeGastos=isnull(@importeGastos,0)

print @auxcod_cen
print @importeVales
print @importeEfectivo
print @importeTalones
print @importeTarjetas1
print @importeTarjetas2
print @importeGastos

insert into detallecaja_aux (cod_cen,importe1)
values(@auxcod_cen, @importeVales+@importeEfectivo+@ImporteTalones+@ImporteTarjetas1+@importeTarjetas2-@importeGastos)
fetch next from cursortemporal into @auxcod_cen

select @importeVales=0
select @importeEfectivo=0
select @importeTalones=0
select @importeTarjetas1=0
select @importeTarjetas2=0
select @importeGastos=0
end

close cursortemporal
*/
select * from detallecaja_aux
GO

When I try to run it from visual basic it slow down the sql server.

What can I do?

View 2 Replies View Related

Need Help To Get Visual Studio 2003 To Connect To SQL Server 2000

Feb 3, 2007

I need help setting up my laptop so that I can develop using Visual Studio 2003 and SQL Server 2000. I currently have both installed on my laptop but can not get them to play nicely together. Here is my connection code:

//string strConnection = "Provider=Microsoft.Jet.OleDb.4.0;";
//strConnection += @"Data Source=C:BegASPNET11ch12Northwind.mdb";
//Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=guest;Initial Catalog=Volkswagen;Data Source=DEREKLAPTOP;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=DEREKLAPTOP;Use Encryption for Data=False;Tag with column collation when possible=False
string strConnection = "Provider=SQLOLEDB.1";
strConnection += @"Data Source=C:Program FilesMicrosoft SQL ServerMSSQLDataorthwnd.mdf";
////strConnection += @"Data Source=DEREKLAPTOP";
data_src.Text = strConnection;
string strSQL = "SELECT FirstName, LastName FROM Employees";
DataSet objDataSet = new DataSet();
OleDbConnection objConnection = new OleDbConnection(strConnection);
OleDbDataAdapter objAdapter = new OleDbDataAdapter(strSQL, objConnection);
objAdapter.Fill(objDataSet, "Employees");
DataView objDataView = new DataView(objDataSet.Tables["Employees"]);
dgNameList.DataSource=objDataView;
dgNameList.DataBind();


Here is the error message I get in IE:

No error information available: REGDB_E_CLASSNOTREG(0x80040154).
Description:
An unhandled exception occurred during the execution of the current web
request. Please review the stack trace for more information about the error and
where it originated in the code.

Exception Details:
System.Data.OleDb.OleDbException: No error information available:
REGDB_E_CLASSNOTREG(0x80040154).

Source Error:





Line 18: OleDbDataAdapter objAdapter = new OleDbDataAdapter(strSQL, objConnection);
Line 19:
Line 20: objAdapter.Fill(objDataSet, "Employees");
Line 21: DataView objDataView = new DataView(objDataSet.Tables["Employees"]);
Line 22: dgNameList.DataSource=objDataView;
Source
File: C:BegASPNET11ch12datagrid.aspx Line: 20

Stack
Trace:





[OleDbException (0x80040154): No error information available: REGDB_E_CLASSNOTREG(0x80040154).]

[InvalidOperationException: The 'SQLOLEDB.1Data Source=C:Program FilesMicrosoft SQL ServerMSSQLDataorthwnd.mdf' provider is not registered on the local machine.]
System.Data.OleDb.OleDbConnection.CreateProviderError(Int32 hr) +81
System.Data.OleDb.OleDbConnection.CreateProvider(OleDbConnectionString constr) +107
System.Data.OleDb.OleDbConnection.Open() +203
System.Data.Common.DbDataAdapter.QuietOpen(IDbConnection connection, ConnectionState& originalState) +44
System.Data.Common.DbDataAdapter.FillFromCommand(Object data, Int32 startRecord, Int32 maxRecords, String srcTable, IDbCommand command, CommandBehavior behavior) +304
System.Data.Common.DbDataAdapter.Fill(DataSet dataSet, Int32 startRecord, Int32 maxRecords, String srcTable, IDbCommand command, CommandBehavior behavior) +77
System.Data.Common.DbDataAdapter.Fill(DataSet dataSet, String srcTable) +36
ASP.datagrid_aspx.Page_Load() in C:BegASPNET11ch12datagrid.aspx:20
System.Web.Util.ArglessEventHandlerDelegateProxy.Callback(Object sender, EventArgs e) +10
System.Web.UI.Control.OnLoad(EventArgs e) +67
System.Web.UI.Control.LoadRecursive() +35
System.Web.UI.Page.ProcessRequestMain() +750



Version Information: Microsoft .NET Framework Version:1.1.4322.2032;
ASP.NET Version:1.1.4322.2032


I know that my problem is in the @DataSource part of the connection string. It works if I use the first two lines (the database file is in the same folder as the code). But not when I use it as above. I think I'm pointing to the wrong place, but I can't figure out the right place to point to. I have SQLServer running on my laptop (I think), so can anyone help me out or maybe give me some example connection strings that you have used? Thanks.

Derek

View 3 Replies View Related

Visual Basic And Sql Server

Jan 3, 2004

Hi experts I am new to SQL Server and have got to do a project using VB & SQL Server. right now i got to prepare case study document wherein i got to mention the pros & cons of using VB+sql server... kindly help me. Thanks in advance.

View 1 Replies View Related

Visual Basic Connecting To MS SQL Server

Aug 3, 2001

is there any way to use Visual Basic and MSSQL without using ODBC?
please let me know.

View 1 Replies View Related

Using SQL Server 2005 Expresss From Visual Basic 6 ?

Jan 17, 2006

I found the following article:

http://msdn.microsoft.com/vbrun/vbfusion/usingsqlexpress/

downloaded the files for it

ran the program and encounter an error about Error Locating Server



anyone tried using that code?

any ideas what I am missing?



thanks.

View 1 Replies View Related

I Cannot Create A Brand New MDF (sql Server Database) With Visual Basic 2005

Apr 20, 2007

Hi everybody:

I go to Server Explorer, right click on Data Connection, input the server name (that is, my own computer), give a new name to the database to create, and then inevitably get the error window saying:

An error occurred while establishing a connection to the server. When connectiong to SQL Server 2005, this failure may be caused by the fact that under the default settings SQL server does not allow remote connections. (Provider: Named Pipes Provider, error 40, could not open a conection to SQL Server)

So, how to open a connection to SQL server 2005? I looked in the msdn but found absolutely nothing.

Please help

Paolo

View 5 Replies View Related

Need For Multi-Threaded Visual Basic.NET To SQL Server Data Access Example Code

Feb 10, 2007

Of all the Visual Basic.NET data access books that I have purchased and all the Internet site example code that I have reviewed, none have had any good examples of multi-threaded VB.NET code doing data access.

I am trying to avoid the non-responsiveness in a VB app while a simple data retrieval from SQL Server 2005 is in progress.

If anyone knows of any book titles or web sites that have example code (good or not) of multi-threaded VB.NET applications doing data access against Microsoft SQL Server (7, 2000, or 2005) or even against Microsoft Access(TM), it would be very much appreciated if you could provide the book title or URL to point me in the right direction.

The more examples the better.

Thanks in advance.

View 5 Replies View Related

DTS And Visual Basic

May 15, 2001

I have already created package which loads a text file to database using the dts wizard in Enterprise Manager.How do I execute that package using visual basic?Please provide the Code!!!Thanks

View 2 Replies View Related

Visual Basic

Jan 19, 1999

I need help.
160821A network error was encountered while sending results to the front end. Check the SQL Server errorlog for more information.
I need help.
Our SQL Server is crashing. The Database is still recovering. I can not kill any Process when the Server crashed. I shoot down and restarted the server. Nothing to do. I can not access to the database. It is recovering. How long? I do not know. What can be the reason of the recovering? Nor the event log of Windows NT or the log files of the SQL SERVER can help me.

Here is a part of the log file

23216Arithmetic overflow error for type %s, value = %f.

10915There are more columns in the INSERT statement than values specified in the VALUES clause. The number of values in the VALUES clause must match the number of columns specified in the INSERT statement.

99/01/19 01:14:25.69 spid25 bufwait: timeout, BUF_IO, bp 0x1bba600, pg 0x11b50, stat 0x801000/0x6, obj 0x23494814, bpss 0x124a2a0
99/01/19 01:14:27.15 ods Error : 17824, Severity: 10, State: 0
99/01/19 01:14:27.15 ods Unable to write to ListenOn connection '.pipesqlquery', loginname 'sa', hostname 'myserver'.
99/01/19 01:14:27.15 ods OS Error : 232, The pipe is being closed.

View 4 Replies View Related

Visual Basic .NET

Oct 22, 2004

Anyone know any good Visual Basic .NET STep By Step books for an almost beginner.

View 2 Replies View Related

Visual Basic

Feb 27, 2008

What code can I write so that the output is in US dollars?

View 3 Replies View Related

Visual Basic 6.0

Mar 22, 2007

Greetings,

Firstly, apologies if this topic is out of the scope of this board, but I am stumped.

Basically, we have an old Visual Basic 6.0 application which currently accesses an Access database, but which we would like to upgrade to an SQL compact edition database. I have created the database, but have so far turned up next to no details reagarding how to connect to the damn thing in VB6.

Can anyone help? Or at least point me in the right direction?

Many thanks,

MadSkunk

View 11 Replies View Related

Need Help On A Visual Basic.net Pocket Pc App. With SQL Server CE 2005 And SQL Server 2005 Synchronization Problem

Aug 12, 2007



Hi,
I am developing an application for pocket pc 2003 smart device which utilizes synchronization between SQL CE 2005 and SQL server 2005 by means of REMOTE DATA ACCESS method call PULL( ) and PUSH( ) but currently these are the details of the error Im encountering when PULL( ) method is called:


Error code: -2147467259
Descripion: An error occured on the computer running IIS.Restart the IIS server.

Minor error: 28022
Source: SQL server CE
Currently Im developing this application as a final project and due to some limitations I have setup my pc to act as the SQL server and the IIS server both on the same machine.

Any help will be appreciated, thanks.

View 5 Replies View Related

Visual Basic, OLE DB Provider And DTS

Oct 25, 1999

I want to use Visual Basic to create DTS connection. In the example below a connection is created using an ODBC string. However, I would like to make the Connection's DataSource be an OLE-DB provider instead of ODBC. However, I cannot find any information on the syntax for using an OLE-DB provider as the DataSource.

Your help is appreciated.

Les

strODBCdsn = "server1" 'Create a DSN called SQL7 or change name
strUserName = "sa" 'User name assume same source and dest
strPassword = "" 'with the same Password
Set oConnection = oPackage.Connections.New
oConnection.ID = 1
oConnection.DataSource = strODBCdsn
oConnection.UserID = strUserName
oConnection.Password = strPassword
oPackage.Connections.Add oConnection

View 2 Replies View Related

Run DTS Package From Visual Basic 6.3

Jan 6, 2005

Anyone have any code i can use to call a DTS package from Visual Basic. I would like to have an outlook macro that will run a dts package when i receive an email. All i need is the code that will call a dts package for a sql server that is not local to the box. I've tried this code but i get an error
run_tmie error '-2147217900 (80040e14)' automation error


Public Sub main()

Dim oPkg As DTS.Package2
Set oPkg = New DTS.Package2

oPkg.LoadFromSQLServer MyServerName, MyUserName, MyPassword, , MyDTSPackageName

oPkg.Execute
oPkg.UnInitialize

Set oPkg = Nothing

End Sub







Thanks in advance.

View 1 Replies View Related

Which Better For Visual Basic Developer

Jun 19, 2006

hi
i found these books for learnning sql server
which better to read for Visual Basic Developer ??


http://www.sqlserver2005books.com/1-3805-0735622507-%20Microsoft_SQL_ServerTM_2005_Reporting_Services_Step_by_Step_Step_by_Step_Microsoft.html

------------------------

http://www.sqlserver2005books.com/1-3805-0735622078-%20Microsoft_SQL_ServerTM_2005_Database_Essentials_Step_by_Step_Step_By_Step_Microsoft.html

thank you

View 2 Replies View Related

SQL CE Trouble In Visual Basic 6

Dec 14, 2006

I use SQL Server 2005 Compact Edition RC1 with Visual Basic 6.0. connection provider that i use is Microsoft.SQLSERVER.MOBILE.OLEDB.3.0. for database management i use SQL Server Management Studio. some query can't execute in visual basic but in sql management studio, that query can run very well. for example:
1. select KodeSatker, KodeSatker + ' - ' + Nama as Nama from TMSatker where len(kodesatker)=3 order by KodeSatker
2. Select a.kdprog, a.nama, b.kodesatker + ' - ' + b.nama as SKPD, a.nonurusan from TMProgram a left join TMSatker b on substring(a.kdprog, 1, len(a.kdprog) - 2) = b.kodesatker

2 query above can run in sql management studio, but in visual basic 6.0, that query have an error.
error msg:run time error '2147217887 (80040e21)':
multiple-step operation generated errors. check each status value

how to solve that problem?
thanks before.

View 5 Replies View Related

Loading Images In A SQL Server Express Database Table At Design Time Using Visual Basic Net Express Editon

Jun 24, 2007

I am new to this type of programming and and have read all articles on adding an image to the database and it seems they all use sql queries to add an image but I want to add an image at design time. I am using Visual Basic 2005. I am also using Visual Basic 2005 Express Edition to try the same thing. I am trying to build a Translator program for english to Brazilian Portuguese and the reason I want to add the images is so that when I translate the word cat from english to Portuguese, I can also show an image of a cat. Can anyone please help me

View 3 Replies View Related

Visual Studio 2005 Connect To SQL Server 7

Mar 13, 2008

Hi all,
Tried this for the first time this morning using a SQLDataSource and received the message:
"Database schema could not be retreived for this connection. Please make sure the connection settings are correct and that the database is online. This server version is not supported. You must have Microsoft SQL Server 2000 and later"
If possible, how can I connect to the SQL Server 7 as I have a small project to complee and all the data and tables exist on our SQL Server 7 installation.
 
Thanks for any pointers
Michael

View 4 Replies View Related

Can't Connect To SQL Server 2005 Express Through Visual C# App

Jun 11, 2006

I've installed SQL server 2005 Express and set up a database called StockData. I'm running the following code in a visual C# windows app to test the connection:

System.Data.Sql.SqlDataSourceEnumerator instance = System.Data.Sql.SqlDataSourceEnumerator.Instance;

DataTable tblSource = instance.GetDataSources();

string strSource = tblSource.Rows[0][0].ToString() + "/" + tblSource.Rows[0][1].ToString();

SqlConnection sqlConn = new SqlConnection();

sqlConn.ConnectionString = "Data Source=(local);Initial Catalog=StockData;Integrated Security=true";

sqlConn.Open();

I have verified that the SQLEXPRESS service is up and running. The strSource variable shows the machine and SQLEXPRESS instance name when I step through, so I know that the application is recognizing the service. But when I get to the "sqlConn.Open()" line, I get the following error message:

Message="An error has occurred while establishing a connection to the server. When connecting to SQL Server 2005, this failure may be caused by the fact that under the default settings SQL Server does not allow remote connections. (provider: Named Pipes Provider, error: 40 - Could not open a connection to SQL Server)"
Source=".Net SqlClient Data Provider"
ErrorCode=-2146232060

Can anyone tell me what I'm doing wrong here? This is driving me nuts. Thanks.


View 1 Replies View Related

Basic Sql Querying In Visual Web Developer

Jun 1, 2008

I'd like to be able to query a database to get the value of a
certain row.  However, I'd like to save this value into a variable
and use them as I'd like, NOT nessessarily display them in a data
control such as a gridview etc.  I've been able to find a lot of
information on binding datasourses to predefined data controls, but I
can't find anything on simply querying a database for values and using
those values to display a page as I want.My basic end goal is to create what's basically a shopping site like Amazon only for about 100 or so products.Thanks
in advance for any help.  I'm just getting into Visual Web
Developer so please excuse my ignorance and lack of posts.

View 2 Replies View Related

Visual Basic .NET, SQL2000 && Images

Feb 20, 2003

I am creating a program in VB .NET to insert an image in one of the fields in MS SQL2000.

VB variant type DIM'd as "Image", SQL field type is "Image". I cannot get the SQL insert statement to work. I'm trying to get a single insert statement to fill all fields in the row, one of which is image.

error=Operator '&' is not defined for types 'String' and 'System.Drawing.Image'

The '&' symbol is used to concatenate the SQL statements items

Any easy way to store an image?

View 3 Replies View Related

Visual Basic Executes DTS Package

Jan 12, 2005

I have created a rule in outlook to run this Visual Basic Script when I receive a specific email. The codes runs a SQL Server DTS Package that imports data and runs a couple of stored procs. If the DTS package takes a while to execute my outlook will lock up until the entire package is complete. I want to run the DTS package to run but I don’t want the application to remain locked till its complete. Anyone have any ideas of how to get around this....


Public Sub RunTVDTSPackage(Item As Outlook.MailItem)
Dim oPackage As New DTS.Package
On Error GoTo eh

oPackage.LoadFromSQLServer "DummyServerName", "DummyUser", "DummyPSWd", _
DTSSQLStgFlag_Default, _
"", "", "", "Top_Customer - TV", 0
'Execute the Package

oPackage.Execute
'MsgBox oPackage.Description, vbInformation, _
"Re-import Excel sheet."

'Clean up.
MsgBox ("Ran DTS Package")
Set oPackage = Nothing
Exit Sub
eh:
MsgBox Err.Description, vbCritical, _
"Error Running Package"

End Sub

View 3 Replies View Related

Collates - CP437 - ADO - Visual Basic

Feb 21, 2005

Hello, I am workink with a Database that has the Collate SQL_Latin1_General_CP437_CI_AS (Instance and Database-SQL2000), this convert the Database in a OEM Server.
I Can save Characters From 0 to 256 ASCII code CP 437 very well on the database (I import this Data with an DTS) but when i retrive the information with Visual Basic 6.0 with ADO some character > 127 are changed.
Did you know how I can fix It ?
I know that the problem is that Windows is ANSI and my SQL Server OEM, but .. a dont´t know how yo fix it.
Thanks I sorry because my poor english. :(

Walter
Argentina

View 8 Replies View Related

How To Create Sql Database In Visual Basic

Jan 11, 2007

First i am newbie in vb and Sql server...

Is possible to create and attaching, via vb classic or VBA, a sql
database in this instance:\DVD377-14D9E48CSQLEXPRESS...
I have Sql Express.

Database name: mydatabase
Database Table: mytable

fileds:
fiedl1 text format
fiedl2 text format
fiedl3 text format
fiedl4 date format
fiedl5 number format
fiedl6 text format

View 2 Replies View Related

Using DTS Object Model In Visual Basic

Apr 17, 2004

Hi Everyone,

I would like to know any good reference books or online material about using DTS Object Model in Visual Basic.

Thanks in advance.

With Regards,
kalyan

View 4 Replies View Related

How To Create Sql Database In Visual Basic

Jan 11, 2007

First i am newbie in vb and Sql server...

Is possible to create and attaching, via vb classic or VBA, a sql
database in this instance:\DVD377-14D9E48CSQLEXPRESS...
I have Sql Express(msde).

Database name: mydatabase
Database Table: mytable

fileds:
fiedl1 text format
fiedl2 text format
fiedl3 text format
fiedl4 date format
fiedl5 number format
fiedl6 text format

View 3 Replies View Related

Visual Basic 2005 Problem

Feb 22, 2007

Hi i am trying to trying to delete a reocrd from a Microsoft Access Database in Visual Basic 2005 Express Edition, but come up with this error with the following code. I'm new to vb 2005 and I'm no expert. Appreciate any help given.

-----------------
InvalidCastException was unhandled
Unable to cast COM object of type 'System.__ComObject' to class type 'System.Windows.Forms.TextBox'. Instances of types that represent COM components cannot be cast to types that do not represent COM components; however they can be cast to interfaces as long as the underlying COM component supports QueryInterface calls for the IID of the interface

Dim db1 As Connection
Dim rs As Recordset

db1 = New ADODB.Connection
db1.Provider = "Mircosoft.jet.OLEDB.4.0;"
db1.ConnectionString = "Provider = 'Microsoft.Jet.OLEDB.4.0';Data Source = 'M:Year2 New262CSvb cwrk1vb cwrk1orders.mdb';"
db1.Open()
rs = New ADODB.Recordset
rs.Open("select * from orders", db1, ADODB.CursorTypeEnum.adOpenDynamic, LockTypeEnum.adLockOptimistic)

txtOrderID = rs("OrderID")
txtProduct = rs("Product")
txtPrice = rs("UnitPrice")
txtQuantity = rs("Quantity")
txtDate = rs("OrderDate")
txtRecieved = rs("Received")
txtSupplierID = rs("SupplierID")

Also when i try to add a record to a database i get the following error i have made sure all the data i have typed in the text boxes are the correct data types.
COME Exception was unhandled
No value given for one or more required parameters.

Dim objcommand As Command = New Command()
Dim conn As Connection = New Connection()
Dim cmdreader As Recordset = New Recordset

conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=M:Year2 New262CSvb cwrk1vb cwrk1orders.mdb")
objcommand.ActiveConnection = conn

Dim stqSQLInsert As String
stqSQLInsert = "INSERT INTO Orders(OrderID, Product, Unitprice, Quantity, Orderdate, Received, SupplierID) VALUES (txtOrderID.Text, txtProduct.Text, txtPrice.Text, txtQuantity.Text, txtDate.Text, txtReceived.Text, txtSupplierID.Text)"

objcommand.CommandText = stqSQLInsert
cmdreader.Open(stqSQLInsert, conn, CursorTypeEnum.adOpenDynamic, LockTypeEnum.adLockOptimistic)

objcommand.Execute()
cmdreader.Update()

Thnx to any who helps...

View 3 Replies View Related

VB.Net (Visual Basic 2005) And MySQL 5.0.41

Jun 15, 2007

Please help me, i am having trouble in Adding data in MySQL Database, and even in Getting or retrieving Data as well.

I use the connection string of Visual Basic 6.0 (ODBC 3.51). Nothing goes wrong with the connection but in updating and adding new data in the MySQL Database then...that's it, nothings go Right!



Please help me in this matter, or can somebody to please give me some simple codes like Address Book using the Visual Basic 2005...







pls pls pls pls pls.... thanx a lot!!!





polarmont@yahoo.com



View 1 Replies View Related

Syscomments.text And Visual Basic 6

May 8, 2008

Has anyone experienced problems calling stored procedures that references syscomments.text from Visual Basic 6?
I have a stored procedure that finds all tables referenced by a specific stored procedure. It works well when I call it from SQL Server Management Studio, but there are cases where it does not find the tables when I call it from VB 6.
I've isolated the failure it to a specific condition in the WHERE clause:


SELECT @howfar = so.id

FROM SYSOBJECTS so

LEFT OUTER JOIN syscomments sc on so.ID = sc.ID

Where lower(so.name) = lower('storedProcName')

AND lower(sc.TEXT) LIKE '%' + lower('update') + ' ' + lower('tableName') + '%'

The call from VB works (finds the record) if

" AND lower(sc.TEXT) LIKE '%' + lower('update') + ' ' + lower('tableName') + '%' "

is omitted, and fails (does not find any records, no error is raised) if that condition is included.

I should also add that the VB Call does work for some combinations of stored procedures and tables.
The old SET NOCOUNT ON trick does not make any difference.

View 4 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved