How to create a ODBC connection to SQL Server? -

-

i try use access call stored procedure in sql server. have trouble build odbc connection, not know missing something? or need set in sql site?

i have screen this:

enter image description here

and code behind ok button this:

      dim dbpubs dao.database       dim tdfpubs dao.tabledef       dim qdfpubs dao.querydef       dim strmsg string       dim strsql string    ' check existence of server, database , user name.           ' if missing, inform user , exit.               if isnull(me!txtserver)         strmsg = "enter name of company's server." & _             & "(see database administrator)"         msgbox strmsg, vbinformation, "missing data"         me!txtserver.setfocus     elseif isnull(me!txtdatabase)         strmsg = "enter name of database. (example: xxxx)"         msgbox strmsg, vbinformation, "missing data"         me!txtdatabase.setfocus     elseif isnull(me!txtuid)         strmsg = "enter user login.  (example: xx)" = ""         msgbox strmsg, vbinformation, "missing data"         me!txtdatabase.setfocus     else         strserver   = me!txtserver         strdatabase = me!txtdatabase         struid      = me!txtuid         ' password may null, provide possibility         strpwd      = nz(me!txtpwd, "")          ' prepare connection string         strconnect = "odbc;driver={sql server}" _                 & ";server=" & strserver _                 & ";database=" & strdatabase _                 & ";uid=" & struid _                 & ";pwd=" & strpwd & ";"     end if               private function validateconnectstring() boolean            on error resume next              err.clear             docmd.hourglass true         ' assume success         validateconnectstring = true  ' create test query , set properties          set qdfpubs = dbpubs.createquerydef("")          qdfpubs.connect = strconnect         qdfpubs.returnsrecords = false         qdfpubs.odbctimeout = 5  ' attempt delete record doesn't exist            qdfpubs.sql = "delete authors au_lname = 'lesandrini'"  ' test 1 pass through query see previous ' connect string still valid (server has not changed)             qdfpubs.execute  ' if there error, connection failed            if err.number validateconnectstring = false            set qdfpubs = nothing           docmd.hourglass false  end function

you should pay visit connectionstrings site details, however, wouldn't use odbc if you.
my connection (for sql server 2012):

private ocon adodb.connection

public sub initconnection(byref sdatasource string, byref sdbname string) dim sconstr string      set ocon = new adodb.connection     sconstr = "provider=msdatashape;data provider=sqlncli11;" & _               "integrated security=sspi;persist security info=false;data source=" & _                sdatasource & ";initial catalog=" & sdbname     on error resume next         call ocon.open(sconstr)         if (err.number = 0)             'all ok         else             'show error message / throw / sink / etc         end if     on error goto 0 end sub

where sdatasource "[computername]\[sql server instance]" (same in e.g. ssms, it's "myhomepc\sqlexp") , sdbname default catalog, ie default db open. you'll need add reference microsoft activex data objects can use adodb connection, command , recordset objects (in access vb window: "tools" --> "references...").
msdatashape not mandatory comes handy hierarchical grids.


edit: btw, connstr. site: driver={sql server native client 11.0};server=myserveraddress;database=mydatabase; uid=myusername;pwd=mypassword; (again, sql server 2012, 2008 it's "...client 10.")


Comments

Post a Comment

Popular posts from this blog

java - Jmockit String final length method mocking Issue -

-
using jmockit 1.2 jar, trying mock string's length method getting unexpected invocation exception: failed: test java.lang.illegalstateexception: missing invocation mocked type @ point; please make sure such invocations appear after declaration of suitable mock field or parameter @ stringdemo.testa$1.<init>(testa.java:17) @ stringdemo.testa.test(testa.java:13) i using testng: @test public void test() throws exception { new expectations() { @mocked("length") string astring; { astring.length(); result = 2; } }; system.out.println(a.showa("test")); } } actual class a: public class { public static int showa(string str){ int a= str.length(); return a; } } this wrong way of recording expected results. shouldn't mock , record string's length() method, record showa() instead. here solution @suppresswarnings("unused...
Read more

What is the difference between data design and data model(ERD) -

-
i have google question , find answer in day. know, data design many many table have list column,and mark pk , fk. why er-diagram have find this? data design process of designing database. main output of data design detailed logical data model of database. some people data design includes of needed logical , physical design choices , physical storage parameters needed generate design in data definition language. technically, database analysis, database analysts (dbas) trained do. while person can both data design , database analysis, these 2 different tasks. data design models data. database analysis takes model , applies 1 or more database engines (relational, hierarchical, nosql). a logical data model 1 of main outputs of data design. data model represented entity relationship diagram, or er diagram.
Read more

ios - Can NSManagedObject conform to NSCoding -

-
i need transfer single object across device. right converting nsmanagedobject dictionary , archiving , sending nsdata. upon receiving unarchiving it. transfer nsmanagedobject archiving , unarchiving instead of creating intermediate data object. @interface test : nsmanagedobject<nscoding> @property (nonatomic, retain) nsstring * title; @end @implementation test @dynamic title; - (id)initwithcoder:(nscoder *)coder { self = [super init]; if (self) { self.title = [coder decodeobjectforkey:@"title"]; //<crash } return self; } - (void)encodewithcoder:(nscoder *)coder { [coder encodeobject:self.title forkey:@"title"]; } @end nsdata *archivedobjects = [nskeyedarchiver archiveddatawithrootobject:testobj]; nsdata *objectsdata = archivedobjects; if ([objectsdata length] > 0) { nsarray *objects = [nskeyedunarchiver unarchiveobjectwithdata:objectsdata]; } the problem above code is. crashes @ self.title in initwithcoder sa...
Read more