Migrating Scripts Written Around Access To Sql.

Feb 27, 2007

Hey guys, I had purchased a program that generates full operational asp.net pages from an access db. I was unfamiliar with the language, and so that was the route I took. After disecting it and studying I've learned a bit and made it work in my environment. However, I now need to migrate everything over to mssql. I got the db portion down and now I'm trying to modify my scripts to point to a sql db rather than an access db. I thought it was going to be relatively simple but it's proving to be quite a challenge for me.

Was wondering if anyone could check my work.

 The original access driven page had the following connection strings.
vb page had [
public strConn as string="PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("../") & "/db/db.mdb"
end class
]
and in my aspx. pages I had
AccessDataSourceControl1.selectcommand="SELECT * FROM table "
AccessDataSourceControl1.ConnectionString = strConn

 My new page now has the following.

I got rid of the .vb page and put this in.

Dim myConnection as New SqlConnection("Server=mysqlserver;Database=db;UID=myusername;PWD=my pw;")

Const strSQL as String ="SELECT * FROM table"

Dim myCommand as New SqlCommand(strSQL, myConnection)

 

further down I have a wmx data grid. I'm assuming I don't need to touch that but there is a line that has,


<wmx:AccessDataSourceControl id="AccessDataSourceControl1" runat="server" ></wmx:AccessDataSourceControl>

and I don't know what the equivilant of that is. I know its pointing to the accessdatasoucrcontrol1 that has the select command, but what would be the equivilant of
wmx:accessdatasourcecontrol?

Also, is this the way to go? by that i mean, should I just rescript everything?

Also,

1) Am I connecting to the sql db properly?
2) some sites say I have to put a connection string in the web.config file, is that true?
3) Does any one have any references I can goto, I'm having some trouble finding a good article that lays down exactly what needs to go where in an sql asp.net environment.

 Thanks guys.

View 2 Replies


ADVERTISEMENT

Need Help -- Migrating From Access To MS SQL

Dec 19, 2006

I am migrating my database from Access to MS SQL. I successfully migrated most of the Tables but I am going through a hellish time with queries/views

Can somwone tell me how to convert this query from Access to MS SQL:
-------------------------------------------------------------------------------------------------------------------
SELECT Manage_Pre_Award.A_ID, Manage_Pre_Award.Event_Name, Manage_Pre_Award.Plan_Date, Manage_Pre_Award.Actual_date, Manage_Pre_Award.Rev_Date, IIf([actual_date] Is Not Null,[actual_date],IIf([rev_date] Is Not Null,[rev_date],IIf([plan_date] Is Not Null,[plan_date],Null))) AS workdate,
FROM Manage_Pre_Award
WHERE (((Manage_Pre_Award.Rev_Date) Is Not Null)) OR (((Manage_Pre_Award.Actual_date) Is Not Null)) OR (((Manage_Pre_Award.Plan_Date) Is Not Null));

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

I have already tried this but get:
The Query Designer does not support the CASE SQL construct.

SELECT Manage_Pre_Award.A_ID, Manage_Pre_Award.Event_Name, Manage_Pre_Award.Plan_Date, Manage_Pre_Award.Actual_date,
Manage_Pre_Award.Rev_Date,
CASE WORKDATE
WHEN [actual_date] IS NOT NULL THEN [actual_date]
WHEN [actual_date] IS NULL AND [rev_date] IS NOT NULL THEN [rev_date] ] ELSE [plan_date]
END AS WORKDATE
FROM Manage_Pre_Award
WHERE (((Manage_Pre_Award.Rev_Date) IS NOT NULL)) OR
(((Manage_Pre_Award.Actual_date) IS NOT NULL))OR (((Manage_Pre_Award.Plan_Date) IS NOT NULL));

View 2 Replies View Related

Migrating From Access To SQL

Mar 21, 2007

Hi guys, its been awhile. I inherited a database thats an MDB and I need to get it on to sql server but I am having problem with this query, can anyone help please. Its suppose to give you the month and year when you click on it, you just put that in and up come the results on a query or report, now I have something similar to this but the code is very different.

SELECT Format$([Main Table].Date,'mmmm yyyy') AS [Date By Month], [Main Table].[Action Type], Sum([Main Table].[Action Type]) AS [Main Table_Action Type]
FROM [Action Type] INNER JOIN [Main Table] ON [Action Type].ID = [Main Table].[Action Type]
GROUP BY Format$([Main Table].Date,'mmmm yyyy'), [Main Table].[Action Type]
HAVING (((Format$([Main Table].[Date],'mmmm yyyy'))=[Enter the month and the Year]));

View 14 Replies View Related

Migrating From Access To MS-SQL

Jan 7, 2008

We have a huge Access database located on a server, but now it is going very slow due to the transport of Mb file to the clients.

We could export the tables to a SQL server and attach the tables to the access clients.

So the question is, will access still treat the tables as it use to or could we expect access SQL querys to request the sql server as normal. Will access process the query on the client side?

Thanks

Provo

View 4 Replies View Related

Migrating Access To SQL Server

May 4, 2004

We use MS Access 2000 as our database, but run into lots of proplems. So we decided to research the migration to SQL Server.

I used Access Upsizing utitlity to migrate tables and their data to SQL server very easily, and all the relationships, indecies and other information are converted correctly.

Next is to migrate the queries. I found that to be a pain. Is there any tool out there that can do it for me? Any help is greatly appreciated.

Once that's done, then it's the application itself, but I am not worrying that for now.

Thanks, guys

View 1 Replies View Related

Migrating With From Access With VB Scripts

Jan 13, 2004

The company i am working for has been using an Access database for purchasing and inventory. this has become to small/dangerous due to the number of records and frequent 'database needs repair' errors. I am trying to migrate the database to a sql server w/ access front end and am runing into problems with most of the VB proceedures that are built into the database. the most common at the moment is a 'Write Conflict' error saying someone else changed the record i am editing. i know this can't be the case becasue i am working on this in an isolated environment. I have traced it to a VB script that changes a field from 'Entering' to 'Pending' (text field) on the click of the 'new record' button. any ideas?

Access 2000/2003, SQL server 2000

View 3 Replies View Related

Need Help In Migrating From Access To SQL Express

Feb 21, 2007

Hi there,

I am totally new at SQL/SQL express.I have downloaded the sQL express server and wanted to know how i can go about exporting my tables which i created using MS access into SQL express.

Also my application is currently working by using Access and ASP...what will be the changes i would need to incorporate in my code other than the queries and Data connection string.

How would the data connection string in SQL look like if i am using it in my asp code?

Any help or useful links would be a very good help!

thanks in advance

smita

View 4 Replies View Related

Migrating From Access 2003 To SQL CE

Sep 4, 2007

I've a database in Access 2003 that I want to migrate to SQL CE since Pocket Access is no longer supported.

I've researched extensively this issue to no avail.

Even tried to use the ADS but it's not feasible,

Please, any help is welcomed!

View 3 Replies View Related

Migrating From Access Database To SQL Server 7.0

Mar 28, 2001

Hi,
We are planning to migrate data from access to sqlserver. I have good knowledge on sql server...but never used access to migrate. Can anyone help me with the basics to be kept in mind and methods and errors you get in migrateing data.If possible explain in detail and what is to be done while migrating data.....thank you in advance.And its urgent please.

View 3 Replies View Related

Migrating Access Queries To SQL Server 7.0

Nov 2, 2000

I have a query in Access that has an iif statement in the select system like so:

SELECT [01_qryCommonCost_01].*, tblPercent_Afe.AfeDescription,
tblPercent_Vendor.[Vendor%], tblPercent_Afe.[Afe%], IIf([manual%] Is Not
Null,[Manual%],IIf([PropType]="NonMkt",0,IIf([Vendor%] Is Not
Null,[Vendor%],IIf([Afe%] Is Not Null And [GlType]<>"OpExp",[Afe%],[Gl%]))))
AS [%], 0+round2([Amount]*[%]) AS Allocated,
0+round2([Allocated]*[Salvage%]) AS Salvage
FROM (01_qryCommonCost_01 LEFT JOIN tblPercent_Vendor ON
([01_qryCommonCost_01].GlType = tblPercent_Vendor.GlTyp) AND
([01_qryCommonCost_01].VendorName = tblPercent_Vendor.VendorName)) LEFT JOIN
tblPercent_Afe ON ([01_qryCommonCost_01].AfeNo = tblPercent_Afe.AfeNo) AND
([01_qryCommonCost_01].Group = tblPercent_Afe.Group)

But I can't figure out how to nest the iif statement in T-SQL. Any hints?

View 2 Replies View Related

Migrating Access To SQL 2000 Server

Apr 25, 2007

Hi,

I need to migrate my access database to SQL2000 Server. I have three tables in my access database. In each table have 3000-6000 records.
So how to put all these records in to sql2000 server tables.
The table structure in Access database and sql2000 database are same.

Here core work is just insert all these 3000 - 6000 records (rows) from Access database to sql2000 database

Thanks in Advance!!

With regards
Shaji

View 5 Replies View Related

Migrating From Access To SQL Server With A Web Front End

Jul 20, 2005

Afternoon all,Apologies for cross-posting but as my query covers both Access and SQLServer I thought I'd send it both!I have inherited a project to migrate a fairly complex series ofAccess databases into a single proper SQL database with a web frontend.Its quite a nasty job as people are working on a variety of data setsat several Universities around the world and the data has got verymessy; hence the requirement to put it all on one live web enableddatabase server and provide a web-based front end (particularly assome users insist on using Macs so can't run Access as a front endanyway).If anyone could give me hints on how to perform such a migration or ifanyone knows of any good books or other documents on this I'd begrateful for assistance.Many thanksRich MayMuseum of London

View 9 Replies View Related

ASP.NET Application - Migrating From Access 2000 To SQL Server 7

Jul 23, 2005

First off, sorry if my cross posting offends anyone. I'm posting thisin Access and SQL Server groups - not sure which one is appropriate.I have a relatively simple ASP.NET/VB.NET application that is nowhitting an Access 2000 database over an intranet. We have to migratethe database to SQL Server 7. My experience with ASP.NET is prettylimited and my experience with SQL Server is nonexistent.We have an MSDN subscription, so I went to the downloads section to getSQL Server 7. Guess what? SQL Server 6.5 is available, as is 2000 and2005, but no SQL Server 7. So my first question is, does anyone know ifit is available for MSDN subscribers?The next question is, does anyone know of a good resource that explainshow to make the transition from Access 2000 to SQL Server 7? I know thedata has to be migrated and the connection between the application andthe database modified, but am really not sure exactly what to first andthe correct way to go about it. The application is a simple productconfigurator. There's not a lot of data and it's not a very complexdatabase.Thanks in advance. If you'd like, please copy responses tolcifers(AT)yahoo.com (AT) = @TIA.Cheers.- Luther

View 2 Replies View Related

Pbm Migrating Access 2003 Database To Sql 2005Express Edition

Jan 5, 2007

I tried various ways to migrate an access 2003 database with 1 table to
sql Express 2005 Edition without success, I can only find the resulted
sql database in Sql Server Express Edition 2005 without data.
Please advise if any help.

View 2 Replies View Related

Migrating Access XP Database To SQL Server 2005 Express

Sep 5, 2006

I want to migrate my Access XP database to SQL Server 2005 Express Edition. The Start Menu does not display any migration assistant in SQL Server 2005 Express menu list.

How to migrate it?

View 4 Replies View Related

Migrating MS Access Data To SQL Express Data

Feb 17, 2007

Hi all,
We have access database with lots of data in it. I want to move all the dat to the new database which has completely differenet database structure (e.g different tables, different rows).
What I was thinking is that there are 2 ways. one is manually, which will take long tome probably, and the other is to rum queries that will move the data from access to the new sql express. The question is how to that. I know that I used onw CSV files exported for ms access, but now the queries will be much more complex and I will use more then one table for te query.
How can I query from 2 different databases, which from one I read data(access), and from the other I write data (express)?
Thanks alot.

View 5 Replies View Related

Migrating From Access 2000 To SQl Server 2000

Jul 20, 2005

Hi,I have developed an application using VB 6 (SP 5), MS Access 2000 andCrystal Reports 9. I migrated from from access to SQl Server 2000.This wasn't a problem as i could import all the tables to SQL Server.Also, i could make VB6 talk to SQl Server.The problem arsies when i run my application. The sql syntax foraccess seems to be different than that for SQL Server. A simpleexample being: In access boolean datatype is true/false ,whereas inSQL Server the boolean equivalent is bit (numerical 1 or 0). Thesekind of issues are causing problems and most queries don't run.Would i need to go and change all the queries in accordance with SQlServer syntax ,which would be very time consuming or is there anyfunction which will convert the access datatype into its equivalentSQl Server datatype??Any input/thoughts/suggestions would be appreciated.ThanksJatin

View 1 Replies View Related

Same UID Can't Be Written To Database

Dec 18, 2007

I'm having a database insertion problem. I make an entry to my registration form, write it to the database; then the next registration entry displays an error that the same UID can't be written to the database. I don't know where to start tracing this, but here is the stored procedure I use and some of the code that might generate it.
            @UserName nvarchar(128),            @Email nvarchar(50),            @FirstName nvarchar(25),            @LastName nvarchar(50),            @Teacher nvarchar(25),            @GradYr int    DECLARE @UserID uniqueidentifier    SELECT @UserID = NULL    SELECT  @UserID = UserId FROM dbo.aspnet_Users WHERE LOWER(@UserName) = LoweredUserName
INSERT INTO [table name](UserID,UserName,Email,FirstName,LastName,Teacher,GradYr) VALUES (@UserID,@UserName,@Email,@FirstName,@LastName,@Teacher,@GradYr)     Protected Sub cuwCreateUserWizard1_CreatingUser(ByVal sender As Object, ByVal e As System.EventArgs) Handles cuwCreateUserWizard1.CreatedUser        strEmail = CType(cuwCreateUserWizard1.CreateUserStep.ContentTemplateContainer.FindControl("Email"), TextBox).Text        strUserName = CType(cuwCreateUserWizard1.CreateUserStep.ContentTemplateContainer.FindControl("UserName"), TextBox).Text.ToLower        strFirstName = CType(cuwCreateUserWizard1.CreateUserStep.CustomNavigationTemplateContainer.FindControl("txtFirstName"), TextBox).Text        strLastName = CType(cuwCreateUserWizard1.CreateUserStep.CustomNavigationTemplateContainer.FindControl("txtLastName"), TextBox).Text        lngGradYr = CType(cuwCreateUserWizard1.CreateUserStep.CustomNavigationTemplateContainer.FindControl("txtGradYr"), TextBox).Text        strTeacher = CType(cuwCreateUserWizard1.CreateUserStep.CustomNavigationTemplateContainer.FindControl("txtTeacher"), TextBox).Text    End Sub    Protected Sub cuwCreateUserWizard1_CreatedUser(ByVal sender As Object, ByVal e As System.EventArgs) Handles cuwCreateUserWizard1.CreatedUser        Dim cmd As New SqlCommand("sp_CreateUser", con)        cmd.CommandType = Data.CommandType.StoredProcedure        cmd.Parameters.AddWithValue("@UserName", strUserName)        cmd.Parameters.AddWithValue("@Email", strEmail)        cmd.Parameters.AddWithValue("@FirstName", strFirstName)        cmd.Parameters.AddWithValue("@LastName", strLastName)        cmd.Parameters.AddWithValue("@Teacher", strTeacher)        cmd.Parameters.AddWithValue("@GradYr", lngGradYr)        Using con            con.Open()            cmd.ExecuteScalar()            con.Close()        End Using        cmd.Equals(Nothing)    End Sub
Please let me know if any other info is needed to help determine what's wrong.

View 8 Replies View Related

How Can I Check When Something Is Written In A DB?

Oct 6, 1998

Hi,

i have following problem:

I have a DB with 4 tables in MSSQL6.5. In those tables write an NT service (4 threads for each table) 24h/day. I want to know somehow when i have no write in one of those tables for more than 1-2 hours (i dont want to querry those tables everytimes). MSSQL6.5 offer this kind of facilities? Or I can do this using stored procedures or something else?

Thank you very much,
Sebastian Bologescu

View 1 Replies View Related

Is My SProc Written Correctly?

Dec 31, 2005

I am very new to SQL server and I'm using stored procedures for my program. So far I wrote one tonight, that works just fine.
I haven't really written one before, but its kind of similar syntax since I know C++/C# and VB.
My question is, even though this works for what I need it do, is it written correctly? Can you see any problems with it, or would you have done it differently?
I want to make sure its done correctly, and it runs as fast as possible.
Thanks!
[pre]
CREATE PROCEDURE CreateNewUser
 @UserID   int out, @LoginID   nvarchar(30), @Password   nvarchar(30), @RegisterDate  smalldatetime, @LoginIDExists  nvarchar(30)AS /* Check to see if the loginID is already in use before attempting to save it.  We MUST have a unique loginID for each user */ SELECT @LoginIDExists = loginID FROM users WHERE loginID = @LoginID
 /* If we pulled a value from the database, then the loginID already exists, return with error code 1 */ IF (@LoginIDExists = @LoginID)    BEGIN   SELECT 1   RETURN  END
 ELSE BEGIN /* The loginID does not already exist, attemp to add the new user to the database. */ INSERT INTO users (  loginID,  loginpassword,  registerDate )  VALUES (  @LoginID,  @Password,  @RegisterDate )
 /* Grab the UserID for the new user. */ SELECT @UserID = @@identity
 /* return with error code 0 */ SELECT 0   RETURN  ENDGO
[/pre]

View 6 Replies View Related

Written Plan For 6.5 > 7.0 Upgrade?

Oct 12, 1999

I'm wondering if anyone has a written project plan for upgrading a server to 7.0 from 6.5.
I'm looking to make this upgrade myself shortly. I would appreciate any dialog, or a written
working plan. Thanks,



Mark Blackburn o `"._ _ M onterey
mark@mbari.org o / _ |||;._/ ) B ay
Science at its Best! ~ _/@ @ /// ( ~ A quarium
(831) 775-1880 ( (`__, ,`| R esearch
http://www.mbari.org/ '.\_/ |\_.' I nstitute

Database Administrator
MBARI Personal Web Page: http://www.mbari.org/~mark/

View 1 Replies View Related

Does This Script Written For Sql 7 Run With Sql2000?

Aug 27, 2002

If someone can tell me if this script run with sql2000 it would be great.
Thanks in advance.

SELECT "Date du traitement :" = getdate()
go
print 'ORDRE DE TRI '
print '----------------------'
go
EXEC SP_HELPSORT
GO

print ' '
print 'VERSION'
print '-------------'
print ' '
go
SELECT @@VERSION
GO

print ' '
print 'CONFIGURATION DU SERVEUR '
print '----------------------------------------------'
print ' '
go
EXEC SP_CONFIGURE
GO

print ' '
print 'LISTE DES BASES SQL'
print '---------------------------------'
print ' '
go
EXEC SP_HELPDB
GO

PRINT " "
PRINT " "
PRINT 'LISTE DES DEVICES'
PRINT '-----------------'
PRINT " "
EXEC SP_HELPdevice
PRINT " "
GO
DECLARE @cmd NVARCHAR (300)
DECLARE @cmd1 NVARCHAR (300)
DECLARE @cmd2 NVARCHAR (300)
DECLARE @cmd3 NVARCHAR (300)
DECLARE @dbid INT
DECLARE @MaxId INT
DECLARE @dbName SYSNAME
SET @MaxId = (SELECT MAX(dbid) FROM MASTER.dbo.sysdatabases)
SET @dbid = 1
print " "
print " "
print'DETAIL DE CHAQUE BASE 'print" "print" "

WHILE @dbid <= @MaxId
BEGIN
SET @dbName = (SELECT name FROM MASTER.dbo.sysdatabases WHERE dbid = @dbid)
IF (@dbname IS NOT NULL)
BEGIN
select @cmd3 ='DETAIL DE LA BASE ' + @dbname
print @cmd3
PRINT '************************************************* ********************************************'
print ' '
select @cmd = 'use ' + quotename(@dbname) + ' exec sp_helpfile'
exec (@cmd)
print ' '
print ' '
print 'UTILISATEUR DE LA BASE '+ RTRIM(@dbname)
print '************************************************* ******** '
print ' '
select @cmd1 = 'use ' + quotename(@dbname) + ' exec sp_helpuser'
exec (@cmd1)
PRINT ' '
print ' '
print 'DROITS POUR LES OBJETS DE LA BASE '+ RTRIM(@dbname)
print '************************************************* ******** '
print ' '
select @cmd2 = 'use ' + quotename(@dbname) + ' exec sp_helprotect'
exec (@cmd2)
SET @dbid = @dbid + 1
END
ELSE
SET @dbid = @dbid + 1
print " "
print " "
END

View 1 Replies View Related

Num Of Checks Written In 4 Day Period For More Than $400

Apr 25, 2006

I have a transaction table which has Date as datetime field, amount and account number. i want to find out count of checks that were written in a period of 4 days which exceeded i.e. > $400, between 401 and 500, > 501 for a single month. the table has data for more than a year and i want the results then grouped in monthly format like in
OCT between 300 & 400 #30 (30 customers gave checks total worth $300-$400 within any 4 consecutive days period in the month of OCT )
between 400 & 500 # 20
> 501 # 10

NOV between 300 & 400 #30
between 400 & 500 # 20
> 501 # 10

and so on for a 6 month period.

View 1 Replies View Related

LOB Is Written Into Wrong Filegroup

Apr 26, 2006

Hi there!

I've a table with a nvarchar(max) column on Filegroup2. While inserting a lot of big datas (Word documents, each 2.5MB), the primary filegroup is growing - but the Filegroup2 remains still on its creation size.

Is that a bug? By the way, i ve dropped the table and recreated on the other filegroup, after that i've restartet the SQL 2005 Service.

Someone experience?

Thanks, Torsten

View 1 Replies View Related

Additional Column To Table Not Getting Written To..

Feb 27, 2008

I added one crummy column to my table.  I updated the stored procedure and added the thing to the aspx page which is my form for adding an article. I have a strong feeling that something is foul over here...Why is it that Visual Studio will not allow me to capitalize the word get and when I delete the ()  after ShortDesc they immediatlye reappear and the get statement is set to get. Every other one of them, and there are 9 others use GET and there is no () after the public property variable name. Does anyone know the reason for this?  
Public Property Author As System.String
GETReturn _Author
End Get Set(ByVal Value As System.String)
_Author= ValueEnd Set
End PropertyPublic Property ShortDesc() As System.String
GetReturn _ShortDesc
End GetSet(ByVal value As System.String)
End Set
End Property

View 1 Replies View Related

Stored Procedures Written In 6.5 And Upgraded To SQL 7

Oct 22, 1998

I am beginning to write stored procedures for an application which is to be written in VB5. The stored procedures will be written in 6.5 but when the system goes live, we hope to upgrade to SQL server 7
What I want to know is what changes will I have to make to the stored procedures when I upgrade to 7.0?

View 4 Replies View Related

Where To Change Where Log Shipping Log File Is Written

Oct 5, 2001

View 1 Replies View Related

Problem Written With Few Words... Come And Read

Feb 23, 2004

I've created an alias of my computer name
with the Network client utility

Computer name : SCG59730
Instance name : Mercure
Alias : MyProject

When I try to register this new server (MyProjectMercure)
SQL Server doesn't find the server

View 2 Replies View Related

In Which Language Is JDBC Driver Written

Jun 12, 2005

Hello,

View 6 Replies View Related

Reports Rows Written But They Aren't

Oct 16, 2006

I have a 3 data flows with an oledb source, a script component and a sql server destination that reports success and that it wrote the rows to the table in question. However, the rows are not written to the SQL Server 2005 table that is the destination. I have many other data flows in the same package that work exactly the same way that insert the rows they should insert in the destination table.

An example of the message I get indicating success is as follows:

[DTS.Pipeline] Information: "component "SQL Server Destination" (75)" wrote 289 rows.

Has anyone else seen this behavior or have an idea what might be wrong? Why would the data flow report success when the rows were not, in fact, inserted in the destination table?

View 3 Replies View Related

Result Of Expression Cannot Be Written To A Property

Nov 14, 2006

Hello,

We're trying to launch a SSIS package throw a webservice. This WebService loads a configuration file with "myPackage.ImportConfigurationFile(pathConfig)" and assigns values to some variables with "myPackage.Variables.Item(Parameters.Keys.Item(i)).Value = Parameters.Item(i)". Seems to work.

I we execute the webmethod of the WebService, this works but only when we execute first time, the SSIS finished succesfully. But when we execute a second time the Webmethod, we've a lot of failure with messages:

The result of the expression "@[User::Email]" on property "ToLine" cannot be written to the property. The expression was evaluated, but cannot be set on the property.The result of the expression ""The Import of " + @[User::ExcelFile]+ " is successful"" on property "MessageSource" cannot be written to the property. The expression was evaluated, but cannot be set on the property.

Thx for your help

View 1 Replies View Related

Nothing Written In View History Table

Mar 25, 2008



Hi guys,

acutally i have setup a Disaster Recovery plan for my database.. i m taking a full back once in a week,. i dont' know when i right click on the job and trying to check the view history option to check when was last backup has been taken, it's showing nothing..but when i check on acutall location the backup was taken there.. i don't know y it's not writing any info in view history table.. or is it clear once in a week and i cann't see that...

Can any one tell's me about this...

View 3 Replies View Related

Tables Not Being Written Back To DB From Dataset. I'm Going Nutz!

Sep 26, 2006

ok. the problem: some tables are empty, so i can't be sure why some are updating at the DB and some arent.
I have manually picked thru every line of the xml that i'm reading into the dataset here, and it is fine, data is all valid and everything.
the tables i'm most worried about are bulletins and surveys, but they all have to be imported from my upload, the code steps thru just fine and I've been thru it a million times. Did I miss something in my dataadapter configuration?. 'daBulletin        '        Me.daBulletin.ContinueUpdateOnError = True        Me.daBulletin.DeleteCommand = Me.SqlDeleteCommand17        Me.daBulletin.InsertCommand = Me.SqlInsertCommand17        Me.daBulletin.SelectCommand = Me.SqlSelectCommand25        Me.daBulletin.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "tblBulletin", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("BulletinID", "BulletinID"), New System.Data.Common.DataColumnMapping("ContractID", "ContractID"), New System.Data.Common.DataColumnMapping("Msg_Type", "Msg_Type"), New System.Data.Common.DataColumnMapping("DatePosted", "DatePosted"), New System.Data.Common.DataColumnMapping("Subject", "Subject"), New System.Data.Common.DataColumnMapping("B_Body", "B_Body"), New System.Data.Common.DataColumnMapping("I_Read_It", "I_Read_It"), New System.Data.Common.DataColumnMapping("DateRead", "DateRead")})})        Me.daBulletin.UpdateCommand = Me.SqlUpdateCommand16
  here is my merge function: Private Function Merge(ByVal sFilename As String, ByVal User As String) As String
        Dim connMerge As New SqlConnection(ConnectionString)
        Dim dsNew As New dsBeetleTracks
        Dim dsExisting As New dsBeetleTracks
        Dim strResult As String
        SetConnections(connMerge)
        Dim idc As New System.Security.Principal.GenericIdentity(User)
        Dim currentUser As BeetleUser = bu

        dsNew.ReadXml(sFilename)

        If currentUser.IsInRole("Admin") Or currentUser.IsInRole("QA") Then
            If dsNew.tblBulletin.Count > 0 Then
                daBulletin.Fill(dsExisting.tblBulletin)
                dsExisting.Merge(dsNew.tblBulletin)
                strResult += daHelipads.Update(dsExisting.tblBulletin).ToString + " Bulletins updated<br>"
            End If
        End If

        If dsNew.tblHours.Count > 0 And (currentUser.IsInRole("Survey") Or currentUser.IsInRole("Admin")) Then
            daHours.Fill(dsExisting.tblHours)
            dsExisting.Merge(dsNew.tblHours)

            strResult += daHours.Update(dsExisting.tblHours).ToString + " hours updated<br>"
        End If

        If dsNew.tblHeliPads.Count > 0 Then
            daHelipads.Fill(dsExisting.tblHeliPads)
            dsExisting.Merge(dsNew.tblHeliPads)
            strResult += daHelipads.Update(dsExisting.tblHeliPads).ToString & " helipads updated "
        End If

        If dsNew.tblExpenses.Count > 0 Then
            daExpenses.Fill(dsExisting.tblExpenses)
            dsExisting.Merge(dsNew.tblExpenses)

            strResult += daExpenses.Update(dsExisting.tblExpenses).ToString + " expenses updated<br>"
        End If

        If dsNew.tblPersons.Count > 0 And (currentUser.IsInRole("Survey") Or currentUser.IsInRole("FB") Or currentUser.IsInRole("Heli-burn")) Then
            daPersons.Fill(dsExisting.tblPersons)
            dsExisting.Merge(dsNew.tblPersons)
            strResult += daPersons.Update(dsExisting.tblPersons).ToString + " persons updated<br>"
        End If

        If currentUser.IsInRole("Field") Then
            daSurveys.SelectCommand.CommandText = "exec Surveys_Field_Select"
            daSurveys.InsertCommand.CommandText = "exec Surveys_Field_Insert"
            daSurveys.UpdateCommand.CommandText = "exec Surveys_Field_Update"
        End If

        If dsNew.tblSurveys.Count > 0 And (currentUser.IsInRole("Survey") Or currentUser.IsInRole("Field")) Then ' Or CurrentUser.IsInRole("Admin")) Then

            daSurveys.Fill(dsExisting.tblSurveys)
            dsExisting.Merge(dsNew.tblSurveys)

            strResult += daSurveys.Update(dsExisting.tblSurveys).ToString + " surveys updated<br>"
        End If

        If dsNew.tblSurveyChecks.Count > 0 And (currentUser.IsInRole("QA") Or currentUser.IsInRole("Admin")) Then
            daSurveyChecks.Fill(dsExisting.tblSurveyChecks)
            dsExisting.Merge(dsNew.tblSurveyChecks)

            strResult += daSurveyChecks.Update(dsExisting.tblSurveyChecks).ToString + " survey checks updated<br>"
        End If

        If dsNew.tblTreatments.Count > 0 And (currentUser.IsInRole("FB") Or currentUser.IsInRole("Heli-burn")) Then ' Or CurrentUser.IsInRole("Admin")) Then
            daTreatments.Fill(dsExisting.tblTreatments)
            dsExisting.Merge(dsNew.tblTreatments)

            strResult += daTreatments.Update(dsExisting.tblTreatments).ToString + " treatments updated<br>"
        End If

        If dsNew.tblInternalQC.Count > 0 And (currentUser.IsInRole("FB") Or currentUser.IsInRole("Heli-burn") Or currentUser.IsInRole("Survey")) Then ' Or CurrentUser.IsInRole("Admin")) Then
            daInternalQC.Fill(dsExisting.tblInternalQC)
            dsExisting.Merge(dsNew.tblInternalQC)

            strResult += daInternalQC.Update(dsExisting.tblInternalQC).ToString + " internalqc updated<br>"
        End If

        If dsNew.tblTreatmentChecks.Count > 0 And (currentUser.IsInRole("QA") Or currentUser.IsInRole("Admin")) Then
            Try
                daTreatmentChecks.Fill(dsExisting.tblTreatmentChecks)
                dsExisting.Merge(dsNew.tblTreatmentChecks)
                strResult += daTreatmentChecks.Update(dsExisting.tblTreatmentChecks).ToString + " treatment checks updated<br>"
            Catch dbex As DBConcurrencyException
                strResult += vbCrLf & dbex.Message
                For x As Integer = 0 To dbex.Row.Table.Columns.Count - 1
                    strResult += vbCrLf & dbex.Row.GetColumnError(x)
                Next
            End Try
        End If

        If dsNew.tblHeliPiles.Count > 0 And (currentUser.IsInRole("Heli-burn")) Then ' Or CurrentUser.IsInRole("Planner")CurrentUser.IsInRole("QA") Or CurrentUser.IsInRole("Admin") Or
            daHeliPiles.Fill(dsExisting.tblHeliPiles)
            dsExisting.Merge(dsNew.tblHeliPiles)

            strResult += daHeliPiles.Update(dsExisting.tblHeliPiles).ToString + " piles updated<br>"
        End If

        If dsNew.tblHeliCycles.Count > 0 And (currentUser.IsInRole("Heli-burn")) Then ' CurrentUser.IsInRole("Planner") Or Or CurrentUser.IsInRole("Admin")) Then
            daHeliCycles.Fill(dsExisting.tblHeliCycles)
            dsExisting.Merge(dsNew.tblHeliCycles)

            strResult += daHeliCycles.Update(dsExisting.tblHeliCycles).ToString + " cycles updated<br>"
        End If

        If dsNew.tblHeliTurns.Count > 0 And (currentUser.IsInRole("Heli-burn")) Then 'CurrentUser.IsInRole("Admin") Or CurrentUser.IsInRole("Planner") Or
            daHeliTurns.Fill(dsExisting.tblHeliTurns)
            dsExisting.Merge(dsNew.tblHeliTurns)

            strResult += daHeliTurns.Update(dsExisting.tblHeliTurns).ToString + " turns updated<br>"
        End If

        If dsExisting.HasChanges Then
            dsExisting.Merge(dsNew)
        End If
        dsExisting.AcceptChanges()


        'duh.
        'If dsNew.HasChanges Then
        '    dsNew.AcceptChanges()
        'End If
        If dsExisting.HasErrors Then
            Dim bolError As Boolean
            Dim tempDataTable As DataTable
            bolError = True

            strResult += "<br>"

            For Each tempDataTable In dsExisting.Tables
                If (tempDataTable.HasErrors) Then
                    strResult += PrintRowErrs(tempDataTable)
                End If
            Next
        End If

        dsNew.Dispose()
        dsExisting.Dispose()
        connMerge.Close()
        'edebugging will only track strresult
        Dim fsError As New FileStream(Server.MapPath("./incoming/error.txt"), FileMode.Create, FileAccess.Write)
        Dim swError As New StreamWriter(fsError)
        swError.WriteLine("--==ERROR LOG==--")
        swError.WriteLine(Now.Date.ToShortDateString)
        swError.WriteLine("-----------------")
        swError.WriteLine(strResult)
        swError.Close()
        fsError.Close()

        Return strResult
    End Function

View 2 Replies View Related







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